| Symbol | Description | Uses |
| adfsc | 7 |
| File | Line number | Procedure | Code |
| ./pkg/sphere/sphere.F | 100 | ADFSC4DAT |
real adfsc(n) |
| ./pkg/sphere/sphere.F | 105 | ADFSC4DAT |
call FFTRB(n,adfsc,adfsc) |
| ./pkg/sphere/sphere.F | 108 | ADFSC4DAT |
adfsc(i) = 0.0 |
| ./pkg/sphere/sphere.F | 113 | ADFSC4DAT |
adfsc(i) = adfsc(i)/float(n) |
| ./pkg/sphere/sphere.F | 95 | ADFSC4DAT |
subroutine ADFSC4DAT(n,adfsc) |