Lines Matching refs:WA
2 SUBROUTINE RFFTB1 (N, C, CH, WA, IFAC) argument
85 DIMENSION CH(*), C(*), WA(*), IFAC(*)
100 CALL RADB4 (IDO,L1,C,CH,WA(IW),WA(IX2),WA(IX3))
102 101 CALL RADB4 (IDO,L1,CH,C,WA(IW),WA(IX2),WA(IX3))
107 CALL RADB2 (IDO,L1,C,CH,WA(IW))
109 104 CALL RADB2 (IDO,L1,CH,C,WA(IW))
115 CALL RADB3 (IDO,L1,C,CH,WA(IW),WA(IX2))
117 107 CALL RADB3 (IDO,L1,CH,C,WA(IW),WA(IX2))
125 CALL RADB5 (IDO,L1,C,CH,WA(IW),WA(IX2),WA(IX3),WA(IX4))
127 110 CALL RADB5 (IDO,L1,CH,C,WA(IW),WA(IX2),WA(IX3),WA(IX4))
131 CALL RADBG (IDO,IP,L1,IDL1,C,C,C,CH,CH,WA(IW))
133 113 CALL RADBG (IDO,IP,L1,IDL1,CH,CH,CH,C,C,WA(IW))