Symbol | Description | Uses |
ISECT | 7 |
File | Line number | Procedure | Code |
./pkg/sphere/sphere.F | 547 | HELMHOLTZ |
REAL ISECT(0:LMAXLMT) |
./pkg/sphere/sphere.F | 554 | HELMHOLTZ |
SAVE LMAXOLD, ISECT, X, Y, Z |
./pkg/sphere/sphere.F | 560 | HELMHOLTZ |
ISECT(0) = 1 |
./pkg/sphere/sphere.F | 565 | HELMHOLTZ |
ISECT(L) = L*LMAX-L*(L-3)/2+1 |
./pkg/sphere/sphere.F | 575 | HELMHOLTZ |
K = ISECT(M) |
./pkg/sphere/sphere.F | 581 | HELMHOLTZ |
K = ISECT(M)+N |
./pkg/sphere/sphere.F | 589 | HELMHOLTZ |
K = ISECT(M)+N |