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 |