Lines Matching refs:WA
2 SUBROUTINE CFFTB1 (N,C,CH,WA,IFAC) argument
3 DIMENSION CH(*) ,C(*) ,WA(*) ,IFAC(*)
18 CALL PASSB4 (IDOT,L1,C,CH,WA(IW),WA(IX2),WA(IX3))
20 101 CALL PASSB4 (IDOT,L1,CH,C,WA(IW),WA(IX2),WA(IX3))
25 CALL PASSB2 (IDOT,L1,C,CH,WA(IW))
27 104 CALL PASSB2 (IDOT,L1,CH,C,WA(IW))
33 CALL PASSB3 (IDOT,L1,C,CH,WA(IW),WA(IX2))
35 107 CALL PASSB3 (IDOT,L1,CH,C,WA(IW),WA(IX2))
43 CALL PASSB5 (IDOT,L1,C,CH,WA(IW),WA(IX2),WA(IX3),WA(IX4))
45 110 CALL PASSB5 (IDOT,L1,CH,C,WA(IW),WA(IX2),WA(IX3),WA(IX4))
49 CALL PASSB (NAC,IDOT,IP,L1,IDL1,C,C,C,CH,CH,WA(IW))
51 113 CALL PASSB (NAC,IDOT,IP,L1,IDL1,CH,CH,CH,C,C,WA(IW))