Symbol Description Uses
ISECT 7



File Line number Procedure Code
./pkg/sphere/sphere.F 545 HELMHOLTZ
      REAL ISECT(0:LMAXLMT)
./pkg/sphere/sphere.F 552 HELMHOLTZ
      SAVE    LMAXOLD, ISECT, X, Y, Z
./pkg/sphere/sphere.F 558 HELMHOLTZ
         ISECT(0) = 1
./pkg/sphere/sphere.F 563 HELMHOLTZ
            ISECT(L) = L*LMAX-L*(L-3)/2+1
./pkg/sphere/sphere.F 573 HELMHOLTZ
            K = ISECT(M)
./pkg/sphere/sphere.F 579 HELMHOLTZ
            K = ISECT(M)+N
./pkg/sphere/sphere.F 587 HELMHOLTZ
               K = ISECT(M)+N