Lines Matching refs:WA
1 SUBROUTINE RFFTF1 (N,C,CH,WA,IFAC) argument
3 DIMENSION CH(*) ,C(*) ,WA(*) ,IFAC(*)
20 CALL RADF4 (IDO,L1,C,CH,WA(IW),WA(IX2),WA(IX3))
22 101 CALL RADF4 (IDO,L1,CH,C,WA(IW),WA(IX2),WA(IX3))
26 CALL RADF2 (IDO,L1,C,CH,WA(IW))
28 103 CALL RADF2 (IDO,L1,CH,C,WA(IW))
33 CALL RADF3 (IDO,L1,C,CH,WA(IW),WA(IX2))
35 105 CALL RADF3 (IDO,L1,CH,C,WA(IW),WA(IX2))
42 CALL RADF5 (IDO,L1,C,CH,WA(IW),WA(IX2),WA(IX3),WA(IX4))
44 107 CALL RADF5 (IDO,L1,CH,C,WA(IW),WA(IX2),WA(IX3),WA(IX4))
48 CALL RADFG (IDO,IP,L1,IDL1,C,C,C,CH,CH,WA(IW))
51 109 CALL RADFG (IDO,IP,L1,IDL1,CH,CH,CH,C,C,WA(IW))