Lines Matching refs:CKR
538 CBI, CBR, CCHI, CCHR, CKI, CKR, COEFI, COEFR, CONEI, CONER,
666 CKR = CONER
692 STR = CKR*CZR - CKI*CZI
694 CKI = (CKR*CZI + CKI*CZR) * RAK
695 CKR = STR * RAK
696 S1R = CKR*FR - CKI*FI + S1R
697 S1I = CKR*FI + CKI*FR + S1I
738 STR = CKR*CZR - CKI*CZI
740 CKI = (CKR*CZI + CKI*CZR) * RAK
741 CKR = STR * RAK
742 S1R = CKR*FR - CKI*FI + S1R
743 S1I = CKR*FI + CKI*FR + S1I
746 S2R = CKR*STR - CKI*STI + S2R
747 S2I = CKR*STI + CKI*STR + S2I
850 CKR = CAZ + CAZ + CTWOR
855 CBR = CKR / (FK + CONER)
859 CKR = CKR + CTWOR
956 CKR = STR * RZR
987 S2R = CKR*STR - CKI*STI + S1R
988 S2I = CKR*STI + CKI*STR + S1I
991 CKR = CKR + RZR
1045 S2R = CKR*P2R - CKI*P2I + S1R
1046 S2I = CKI*P2R + CKR*P2I + S1I
1049 CKR = CKR + RZR
1092 S2R = STR*CKR - STI*CKI + S1R
1093 S2I = STI*CKR + STR*CKI + S1I
1096 CKR = CKR + RZR
1189 CKR = T2 * RZR
1220 var ACS, AS, CKI, CKR, CSI, CSR, FN, STR, S1I, S1R, S2I,
1280 CKR = FN * RZR
1298 S2R = CKR*CSR - CKI*CSI + S1R
1299 S2I = CKI*CSR + CKR*CSI + S1I
1302 CKR = CKR + RZR
1493 AZ, BB, BK, CKI, CKR, CONEI, CONER, CS1I, CS1R, CS2I, CS2R, CZI,
1593 CKR = CONER
1603 tmp = zdiv(complex(CKR, CKI), complex(DKR, DKI))
1606 CKR = STR * SQK
1608 CS2R = CS2R + CKR
1611 CS1R = CS1R + CKR*SGN
1672 CKR = real(tmp)
1675 STR = YR[I]*CKR - YI[I]*CKI
1676 YI[I] = YR[I]*CKI + YI[I]*CKR
1692 var ACK, AK, AP, AT, AZ, BK, CKI, CKR, CNORMI,
1713 CKR = STR * AT * RAZ
1733 P2R = P1R - (CKR*PTR - CKI*PTI)
1734 P2I = P1I - (CKI*PTR + CKR*PTI)
1737 CKR = CKR + RZR
1760 CKR = STR * AT * RAZ
1768 P2R = P1R - (CKR*PTR - CKI*PTI)
1769 P2I = P1I - (CKR*PTI + CKI*PTR)
1772 CKR = CKR + RZR
1781 ACK = zabs(complex(CKR, CKI))
1885 CKR = STR * P1R
1889 tmp = zmlt(complex(CKR, CKI), complex(PTR, PTI))
1913 AZ, CKI, CKR, COEFI, COEFR, CONEI, CONER, CRSCR, CZI, CZR, DFNU,
1953 CKR = real(tmp)
1960 AK1R = CKR * DFNU
2083 CKR = S2R
2085 S2R = S1R + (AK+FNU)*(RZR*CKR-RZI*CKI)
2086 S2I = S1I + (AK+FNU)*(RZR*CKI+RZI*CKR)
2087 S1R = CKR
2089 CKR = S2R * CRSCR
2091 YR[K] = CKR
2095 if zabs(complex(CKR, CKI)) > ASCLE {