Symbol Description Uses
adfsc 7



File Line number Procedure Code
./pkg/sphere/sphere.F 103 ADFSC4DAT
      call FFTRB(n,adfsc,adfsc)
./pkg/sphere/sphere.F 106 ADFSC4DAT
        adfsc(i) = 0.0
./pkg/sphere/sphere.F 111 ADFSC4DAT
        adfsc(i) = adfsc(i)/float(n)
./pkg/sphere/sphere.F 93 ADFSC4DAT
      subroutine ADFSC4DAT(n,adfsc)
./pkg/sphere/sphere.F 98 ADFSC4DAT
      real adfsc(n)