Lines Matching refs:WA
1 SUBROUTINE RFFTB1(N,C,CH,WA,IFAC) argument
9 DIMENSION CH(*) ,C(*) ,WA(*) ,IFAC(*)
24 CALL RADB4 (IDO,L1,C,CH,WA(IW),WA(IX2),WA(IX3))
26 101 CALL RADB4 (IDO,L1,CH,C,WA(IW),WA(IX2),WA(IX3))
31 CALL RADB2 (IDO,L1,C,CH,WA(IW))
33 104 CALL RADB2 (IDO,L1,CH,C,WA(IW))
39 CALL RADB3 (IDO,L1,C,CH,WA(IW),WA(IX2))
41 107 CALL RADB3 (IDO,L1,CH,C,WA(IW),WA(IX2))
49 CALL RADB5 (IDO,L1,C,CH,WA(IW),WA(IX2),WA(IX3),WA(IX4))
51 110 CALL RADB5 (IDO,L1,CH,C,WA(IW),WA(IX2),WA(IX3),WA(IX4))
55 CALL RADBG (IDO,IP,L1,IDL1,C,C,C,CH,CH,WA(IW))
57 113 CALL RADBG (IDO,IP,L1,IDL1,CH,CH,CH,C,C,WA(IW))