Lines Matching refs:CSCLR
15 DOUBLE PRECISION ALIM, AX, AY, CSCLR, CSCRR, CYI, CYR, DFNU, local
58 CSCLR = 1.0D0
62 CSCLR = 1.0D0/TOL
68 CSCLR = TOL
70 CSCRR = 1.0D0/CSCLR
71 S1R = CYR(2)*CSCLR
72 S1I = CYI(2)*CSCLR
73 S2R = CYR(1)*CSCLR
74 S2I = CYI(1)*CSCLR
101 CSCLR = CSCLR*TOL
102 CSCRR = 1.0D0/CSCLR
103 S1R = S1R*CSCLR
104 S1I = S1I*CSCLR
105 S2R = S2R*CSCLR
106 S2I = S2I*CSCLR
138 CSCLR = CSCLR*TOL
139 CSCRR = 1.0D0/CSCLR
140 S1R = S1R*CSCLR
141 S1I = S1I*CSCLR
142 S2R = S2R*CSCLR
143 S2I = S2I*CSCLR