Lines Matching refs:WA
2 SUBROUTINE CFFTB1 (N, C, CH, WA, IFAC) argument
71 DIMENSION CH(*), C(*), WA(*), IFAC(*)
87 CALL PASSB4 (IDOT,L1,C,CH,WA(IW),WA(IX2),WA(IX3))
89 101 CALL PASSB4 (IDOT,L1,CH,C,WA(IW),WA(IX2),WA(IX3))
94 CALL PASSB2 (IDOT,L1,C,CH,WA(IW))
96 104 CALL PASSB2 (IDOT,L1,CH,C,WA(IW))
102 CALL PASSB3 (IDOT,L1,C,CH,WA(IW),WA(IX2))
104 107 CALL PASSB3 (IDOT,L1,CH,C,WA(IW),WA(IX2))
112 CALL PASSB5 (IDOT,L1,C,CH,WA(IW),WA(IX2),WA(IX3),WA(IX4))
114 110 CALL PASSB5 (IDOT,L1,CH,C,WA(IW),WA(IX2),WA(IX3),WA(IX4))
118 CALL PASSB (NAC,IDOT,IP,L1,IDL1,C,C,C,CH,CH,WA(IW))
120 113 CALL PASSB (NAC,IDOT,IP,L1,IDL1,CH,CH,CH,C,C,WA(IW))