178 #  define cpolar(r,t) polar(r,t)  argument
260 static inline cmplx cpolar(double r, double t)  in cpolar()
815 double t = 2*y100 - 1;  in erfcx_y100()  local
819 double t = 2*y100 - 3;  in erfcx_y100()  local
823 double t = 2*y100 - 5;  in erfcx_y100()  local
827 double t = 2*y100 - 7;  in erfcx_y100()  local
831 double t = 2*y100 - 9;  in erfcx_y100()  local
835 double t = 2*y100 - 11;  in erfcx_y100()  local
839 double t = 2*y100 - 13;  in erfcx_y100()  local
843 double t = 2*y100 - 15;  in erfcx_y100()  local
847 double t = 2*y100 - 17;  in erfcx_y100()  local
851 double t = 2*y100 - 19;  in erfcx_y100()  local
855 double t = 2*y100 - 21;  in erfcx_y100()  local
859 double t = 2*y100 - 23;  in erfcx_y100()  local
863 double t = 2*y100 - 25;  in erfcx_y100()  local
867 double t = 2*y100 - 27;  in erfcx_y100()  local
871 double t = 2*y100 - 29;  in erfcx_y100()  local
875 double t = 2*y100 - 31;  in erfcx_y100()  local
879 double t = 2*y100 - 33;  in erfcx_y100()  local
883 double t = 2*y100 - 35;  in erfcx_y100()  local
887 double t = 2*y100 - 37;  in erfcx_y100()  local
891 double t = 2*y100 - 39;  in erfcx_y100()  local
895 double t = 2*y100 - 41;  in erfcx_y100()  local
899 double t = 2*y100 - 43;  in erfcx_y100()  local
903 double t = 2*y100 - 45;  in erfcx_y100()  local
907 double t = 2*y100 - 47;  in erfcx_y100()  local
911 double t = 2*y100 - 49;  in erfcx_y100()  local
915 double t = 2*y100 - 51;  in erfcx_y100()  local
919 double t = 2*y100 - 53;  in erfcx_y100()  local
923 double t = 2*y100 - 55;  in erfcx_y100()  local
927 double t = 2*y100 - 57;  in erfcx_y100()  local
931 double t = 2*y100 - 59;  in erfcx_y100()  local
935 double t = 2*y100 - 61;  in erfcx_y100()  local
939 double t = 2*y100 - 63;  in erfcx_y100()  local
943 double t = 2*y100 - 65;  in erfcx_y100()  local
947 double t = 2*y100 - 67;  in erfcx_y100()  local
951 double t = 2*y100 - 69;  in erfcx_y100()  local
955 double t = 2*y100 - 71;  in erfcx_y100()  local
959 double t = 2*y100 - 73;  in erfcx_y100()  local
963 double t = 2*y100 - 75;  in erfcx_y100()  local
967 double t = 2*y100 - 77;  in erfcx_y100()  local
971 double t = 2*y100 - 79;  in erfcx_y100()  local
975 double t = 2*y100 - 81;  in erfcx_y100()  local
979 double t = 2*y100 - 83;  in erfcx_y100()  local
983 double t = 2*y100 - 85;  in erfcx_y100()  local
987 double t = 2*y100 - 87;  in erfcx_y100()  local
991 double t = 2*y100 - 89;  in erfcx_y100()  local
995 double t = 2*y100 - 91;  in erfcx_y100()  local
999 double t = 2*y100 - 93;  in erfcx_y100()  local
1003 double t = 2*y100 - 95;  in erfcx_y100()  local
1007 double t = 2*y100 - 97;  in erfcx_y100()  local
1011 double t = 2*y100 - 99;  in erfcx_y100()  local
1015 double t = 2*y100 - 101;  in erfcx_y100()  local
1019 double t = 2*y100 - 103;  in erfcx_y100()  local
1023 double t = 2*y100 - 105;  in erfcx_y100()  local
1027 double t = 2*y100 - 107;  in erfcx_y100()  local
1031 double t = 2*y100 - 109;  in erfcx_y100()  local
1035 double t = 2*y100 - 111;  in erfcx_y100()  local
1039 double t = 2*y100 - 113;  in erfcx_y100()  local
1043 double t = 2*y100 - 115;  in erfcx_y100()  local
1047 double t = 2*y100 - 117;  in erfcx_y100()  local
1051 double t = 2*y100 - 119;  in erfcx_y100()  local
1055 double t = 2*y100 - 121;  in erfcx_y100()  local
1059 double t = 2*y100 - 123;  in erfcx_y100()  local
1063 double t = 2*y100 - 125;  in erfcx_y100()  local
1067 double t = 2*y100 - 127;  in erfcx_y100()  local
1071 double t = 2*y100 - 129;  in erfcx_y100()  local
1075 double t = 2*y100 - 131;  in erfcx_y100()  local
1079 double t = 2*y100 - 133;  in erfcx_y100()  local
1083 double t = 2*y100 - 135;  in erfcx_y100()  local
1087 double t = 2*y100 - 137;  in erfcx_y100()  local
1091 double t = 2*y100 - 139;  in erfcx_y100()  local
1095 double t = 2*y100 - 141;  in erfcx_y100()  local
1099 double t = 2*y100 - 143;  in erfcx_y100()  local
1103 double t = 2*y100 - 145;  in erfcx_y100()  local
1107 double t = 2*y100 - 147;  in erfcx_y100()  local
1111 double t = 2*y100 - 149;  in erfcx_y100()  local
1115 double t = 2*y100 - 151;  in erfcx_y100()  local
1119 double t = 2*y100 - 153;  in erfcx_y100()  local
1123 double t = 2*y100 - 155;  in erfcx_y100()  local
1127 double t = 2*y100 - 157;  in erfcx_y100()  local
1131 double t = 2*y100 - 159;  in erfcx_y100()  local
1135 double t = 2*y100 - 161;  in erfcx_y100()  local
1139 double t = 2*y100 - 163;  in erfcx_y100()  local
1143 double t = 2*y100 - 165;  in erfcx_y100()  local
1147 double t = 2*y100 - 167;  in erfcx_y100()  local
1151 double t = 2*y100 - 169;  in erfcx_y100()  local
1155 double t = 2*y100 - 171;  in erfcx_y100()  local
1159 double t = 2*y100 - 173;  in erfcx_y100()  local
1163 double t = 2*y100 - 175;  in erfcx_y100()  local
1167 double t = 2*y100 - 177;  in erfcx_y100()  local
1171 double t = 2*y100 - 179;  in erfcx_y100()  local
1175 double t = 2*y100 - 181;  in erfcx_y100()  local
1179 double t = 2*y100 - 183;  in erfcx_y100()  local
1183 double t = 2*y100 - 185;  in erfcx_y100()  local
1187 double t = 2*y100 - 187;  in erfcx_y100()  local
1191 double t = 2*y100 - 189;  in erfcx_y100()  local
1195 double t = 2*y100 - 191;  in erfcx_y100()  local
1199 double t = 2*y100 - 193;  in erfcx_y100()  local
1203 double t = 2*y100 - 195;  in erfcx_y100()  local
1207 double t = 2*y100 - 197;  in erfcx_y100()  local
1211 double t = 2*y100 - 199;  in erfcx_y100()  local
1259       double t = 2*y100 - 1;  in w_im_y100()  local
1263       double t = 2*y100 - 3;  in w_im_y100()  local
1267       double t = 2*y100 - 5;  in w_im_y100()  local
1271       double t = 2*y100 - 7;  in w_im_y100()  local
1275       double t = 2*y100 - 9;  in w_im_y100()  local
1279       double t = 2*y100 - 11;  in w_im_y100()  local
1283       double t = 2*y100 - 13;  in w_im_y100()  local
1287       double t = 2*y100 - 15;  in w_im_y100()  local
1291       double t = 2*y100 - 17;  in w_im_y100()  local
1295       double t = 2*y100 - 19;  in w_im_y100()  local
1299       double t = 2*y100 - 21;  in w_im_y100()  local
1303       double t = 2*y100 - 23;  in w_im_y100()  local
1307       double t = 2*y100 - 25;  in w_im_y100()  local
1311       double t = 2*y100 - 27;  in w_im_y100()  local
1315       double t = 2*y100 - 29;  in w_im_y100()  local
1319       double t = 2*y100 - 31;  in w_im_y100()  local
1323       double t = 2*y100 - 33;  in w_im_y100()  local
1327       double t = 2*y100 - 35;  in w_im_y100()  local
1331       double t = 2*y100 - 37;  in w_im_y100()  local
1335       double t = 2*y100 - 39;  in w_im_y100()  local
1339       double t = 2*y100 - 41;  in w_im_y100()  local
1343       double t = 2*y100 - 43;  in w_im_y100()  local
1347       double t = 2*y100 - 45;  in w_im_y100()  local
1351       double t = 2*y100 - 47;  in w_im_y100()  local
1355       double t = 2*y100 - 49;  in w_im_y100()  local
1359       double t = 2*y100 - 51;  in w_im_y100()  local
1363       double t = 2*y100 - 53;  in w_im_y100()  local
1367       double t = 2*y100 - 55;  in w_im_y100()  local
1371       double t = 2*y100 - 57;  in w_im_y100()  local
1375       double t = 2*y100 - 59;  in w_im_y100()  local
1379       double t = 2*y100 - 61;  in w_im_y100()  local
1383       double t = 2*y100 - 63;  in w_im_y100()  local
1387       double t = 2*y100 - 65;  in w_im_y100()  local
1391       double t = 2*y100 - 67;  in w_im_y100()  local
1395       double t = 2*y100 - 69;  in w_im_y100()  local
1399       double t = 2*y100 - 71;  in w_im_y100()  local
1403       double t = 2*y100 - 73;  in w_im_y100()  local
1407       double t = 2*y100 - 75;  in w_im_y100()  local
1411       double t = 2*y100 - 77;  in w_im_y100()  local
1415       double t = 2*y100 - 79;  in w_im_y100()  local
1419       double t = 2*y100 - 81;  in w_im_y100()  local
1423       double t = 2*y100 - 83;  in w_im_y100()  local
1427       double t = 2*y100 - 85;  in w_im_y100()  local
1431       double t = 2*y100 - 87;  in w_im_y100()  local
1435       double t = 2*y100 - 89;  in w_im_y100()  local
1439       double t = 2*y100 - 91;  in w_im_y100()  local
1443       double t = 2*y100 - 93;  in w_im_y100()  local
1447       double t = 2*y100 - 95;  in w_im_y100()  local
1451       double t = 2*y100 - 97;  in w_im_y100()  local
1455       double t = 2*y100 - 99;  in w_im_y100()  local
1459       double t = 2*y100 - 101;  in w_im_y100()  local
1463       double t = 2*y100 - 103;  in w_im_y100()  local
1467       double t = 2*y100 - 105;  in w_im_y100()  local
1471       double t = 2*y100 - 107;  in w_im_y100()  local
1475       double t = 2*y100 - 109;  in w_im_y100()  local
1479       double t = 2*y100 - 111;  in w_im_y100()  local
1483       double t = 2*y100 - 113;  in w_im_y100()  local
1487       double t = 2*y100 - 115;  in w_im_y100()  local
1491       double t = 2*y100 - 117;  in w_im_y100()  local
1495       double t = 2*y100 - 119;  in w_im_y100()  local
1499       double t = 2*y100 - 121;  in w_im_y100()  local
1503       double t = 2*y100 - 123;  in w_im_y100()  local
1507       double t = 2*y100 - 125;  in w_im_y100()  local
1511       double t = 2*y100 - 127;  in w_im_y100()  local
1515       double t = 2*y100 - 129;  in w_im_y100()  local
1519       double t = 2*y100 - 131;  in w_im_y100()  local
1523       double t = 2*y100 - 133;  in w_im_y100()  local
1527       double t = 2*y100 - 135;  in w_im_y100()  local
1531       double t = 2*y100 - 137;  in w_im_y100()  local
1535       double t = 2*y100 - 139;  in w_im_y100()  local
1539       double t = 2*y100 - 141;  in w_im_y100()  local
1543       double t = 2*y100 - 143;  in w_im_y100()  local
1547       double t = 2*y100 - 145;  in w_im_y100()  local
1551       double t = 2*y100 - 147;  in w_im_y100()  local
1555       double t = 2*y100 - 149;  in w_im_y100()  local
1559       double t = 2*y100 - 151;  in w_im_y100()  local
1563       double t = 2*y100 - 153;  in w_im_y100()  local
1567       double t = 2*y100 - 155;  in w_im_y100()  local
1571       double t = 2*y100 - 157;  in w_im_y100()  local
1575       double t = 2*y100 - 159;  in w_im_y100()  local
1579       double t = 2*y100 - 161;  in w_im_y100()  local
1583       double t = 2*y100 - 163;  in w_im_y100()  local
1587       double t = 2*y100 - 165;  in w_im_y100()  local
1591       double t = 2*y100 - 167;  in w_im_y100()  local
1595       double t = 2*y100 - 169;  in w_im_y100()  local
1599       double t = 2*y100 - 171;  in w_im_y100()  local
1603       double t = 2*y100 - 173;  in w_im_y100()  local
1607       double t = 2*y100 - 175;  in w_im_y100()  local
1611       double t = 2*y100 - 177;  in w_im_y100()  local
1615       double t = 2*y100 - 179;  in w_im_y100()  local
1619       double t = 2*y100 - 181;  in w_im_y100()  local
1623       double t = 2*y100 - 183;  in w_im_y100()  local
1627       double t = 2*y100 - 185;  in w_im_y100()  local
1631       double t = 2*y100 - 187;  in w_im_y100()  local
1635       double t = 2*y100 - 189;  in w_im_y100()  local
1639       double t = 2*y100 - 191;  in w_im_y100()  local
1643       double t = 2*y100 - 193;  in w_im_y100()  local