mathlib-slatec.c
1 //! @file mathlib-slatec.c
2 //
3 //! @section copyright
4 //
5 // This file is part of VIF - vintage fortran compiler.
6 // Copyright 2020-2025 J. Marcel van der Veer <algol68g@xs4all.nl>.
7 //
8 //! @section license
9 //
10 // This program is free software; you can redistribute it and/or modify it
11 // under the terms of the gnu general public license as published by the
12 // free software foundation; either version 3 of the license, or
13 // (at your option) any later version.
14 //
15 // This program is distributed in the hope that it will be useful, but
16 // without any warranty; without even the implied warranty of merchantability
17 // or fitness for a particular purpose. See the GNU general public license for
18 // more details. you should have received a copy of the GNU general public
19 // license along with this program. If not, see <http://www.gnu.org/licenses/>.
20 //
21 //! @Synopsis
22 //
23 //! 391 subprograms from SLATEC
24
25 // Compiled from Fortran source code by VIF.
26 // Selected subprograms are:
27 //
28 // AAAAAA COSGEN DC_9 DMPAR DQDOTA DX ISORT PGSF RPQR79 SPLPUP
29 // ASYIK CPADD DCFOD DNBCO DQDOTI DX4 JAIRY PIMACH RPZERO SPOFS
30 // ASYJY CPEVL DCKDER DNBDI DQFORM DXADJ LLSIA PINITM S1MERG SPOIR
31 // AVINT CPEVLR DCOEF DNBFA DQRFAC DXC210 LPDP PNNZRS SBOCLS SPOPT
32 // BCRH CPOFS DCOV DNBFS DQRSLV DXPSI LSEI POISD2 SBOLS SPPERM
33 // BDIFF CPOIR DCSCAL DNBSL DRC DXRED LSI POISN2 SBOLSM SPSORT
34 // BKSOL CPQR79 DCV DNLS1 DRC3JJ DY LSSODS POISP2 SCLOSM SREADP
35 // BLKTR1 CPROC DDES DNLS1E DRC3JM DY4 LSSUDS POLCOF SCOEF SSIEV
36 // BNDACC CPROCP DDOGLG DNSQ DRC6J DYAIRY MACON POLFIT SCOV SSORT
37 // BNDSOL CPROD DEFCMN DNSQE DRD EFCMN MGSBV POLINT SGEEV STOR1
38 // BSGQ8 CPRODP DEFE4 DOHTRL DREADP FCMN MINSO4 POLYVL SGEFS STWAY
39 // BSPLVD CPZERO DEFEHL DORTHR DREORT FDJAC3 MINSOL POS3D1 SGEIR SUDS
40 // BSPLVN CRATI DEFER DP1VLU DRF FDUMP MPADD POSTG2 SGLSS SVECS
41 // BSRH CS1S2 DENORM DPCHNG DRJ FFTDOC MPADD2 PPADD SNBCO SWRITP
42 // C1MERG CSCALE DERKFS DPCOEF DRKFS FULMAT MPADD3 PPGQ8 SNBDI TEVLC
43 // CASYI CSHCH DES DPINCW DSORT FZERO MPBLAS PPGSF SNBFA TEVLS
44 // CBLKT1 CUCHK DFCMN DPINIT DSOS GAMRN MPCDM PPPSF SNBFS TRI3
45 // CCMPB CUNHJ DFDJC1 DPINTM DSOSEQ GAUS8 MPCHK PPSGF SNBIR TRIDQ
46 // CFOD CUNIK DFDJC3 DPLINT DSOSSL H12 MPCMD PPSPF SNBSL TRIS4
47 // CGEEV CV DFEHL DPLPCE DSPLP HFTI MPDIVI PROC SNLS1 TRISP
48 // CGEFS D1MERG DFSPVD DPLPDM DSTOR1 HKSEQ MPERR PROCP SNLS1E TRIX
49 // CGEIR D1MPYQ DFSPVN DPLPFE DSTWAY HPPERM MPMAXR PROD SNSQ U11LS
50 // CHIEV D1UPDT DFULMT DPLPFL DSUDS HPSORT MPMLP PRODP SNSQE U11US
51 // CHKPR4 DASYIK DFZERO DPLPMN DU11LS HSTART MPMUL PRVEC SODS U12LS
52 // CHKPRM DAVINT DGAUS8 DPLPMU DU11US HSTCS1 MPMUL2 PRWPGE SOPENM U12US
53 // CHKSN4 DBDIFF DGEFS DPLPUP DU12LS HVNRM MPMULI PRWVIR SOS ULSIA
54 // CHKSNG DBKSOL DGLSS DPNNZR DU12US HWSCS1 MPNZR PSGF SOSEQS USRMAT
55 // CMPCSG DBNDAC DH12 DPOFS DULSIA HWSSS1 MPOVFL PSIFN SOSSOL VNWRMS
56 // CMPOSD DBNDSL DHFTI DPOLCF DUSRMT I1MERG MPSTR PSIXN SPELI4 WNLIT
57 // CMPOSN DBOCLS DHSTRT DPOLFT DVECS IDLOC MPUNFL PVALUE SPELIP WNLSM
58 // CMPOSP DBOLS DHVNRM DPOLVL DVNRMS INDXA NUMXER PYTHAG SPINCW WNLT1
59 // CMPTR3 DBOLSM DJAIRY DPOPT DWNLIT INDXB OHTROL RC SPINIT WNLT2
60 // CMPTRX DBSGQ8 DLLSIA DPPERM DWNLSM INDXC OHTROR RC3JJ SPLP WNLT3
61 // CNBCO DC_336 DLPDP DPPGQ8 DWNLT1 INXCA ORTHO4 RC3JM SPLPCE WNNLS
62 // CNBDI DC_339 DLSEI DPRVEC DWNLT2 INXCB ORTHOG RC6J SPLPDM XADJ
63 // CNBFA DC_341 DLSI DPRWPG DWNLT3 INXCC ORTHOL RD SPLPFE XC210
64 // CNBFS DC_408 DLSSUD DPRWVR DWNNLS IPLOC ORTHOR REORT SPLPFL XPSI
65 // CNBIR DC_5 DMACON DPSIXN DWRITP IPPERM PCHNGS RF SPLPMN XRED
66 // CNBSL DC_50 DMGSBV DPSORT DWUPDT IPSORT PCOEF RJ SPLPMU YAIRY
67 // COMPB
68
69 // Miscellaneous routines from SLATEC, not in other packages as BLAS,
70 // EISPACK, FISHPACK, FFTPACK, FNLIB, LINPACK etcetera.
71 //
72 // Source: netlib.org/slatec/
73
74 // The license for SLATEC Fortran source code is:
75 //
76 // The SLATEC Common Mathematical Library was developed at
77 // US government research laboratories and is in the public domain.
78 //
79 // Repository: http://www.netlib.org/slatec/
80 //
81 // The SLATEC common mathematical library is issued by the following
82 //
83 // Air Force Weapons Laboratory, Albuquerque
84 // Lawrence Livermore National Laboratory, Livermore
85 // Los Alamos National Laboratory, Los Alamos
86 // National Institute of Standards and Technology, Washington
87 // National Energy Research Supercomputer Center, Livermore
88 // Oak Ridge National Laboratory, Oak Ridge
89 // Sandia National Laboratories, Albuquerque
90 // Sandia National Laboratories, Livermore
91 //
92 // All questions concerning the distribution of the library should be
93 // directed to the NATIONAL ENERGY SOFTWARE CENTER, 9700 Cass Ave.,
94 // Argonne, Illinois 60439, and not to the authors of the subprograms.
95 //
96 // * * * * * Notice * * * * *
97 //
98 // This material was prepared as an account of work sponsored by the
99 // United States Government. Neither the United States, nor the
100 // Department of Energy, nor the Department of Defense, nor any of
101 // their employees, nor any of their contractors, subcontractors, or
102 // their employees, makes any warranty, expressed or implied, or
103 // assumes any legal liability or responsibility for the accuracy,
104 // completeness, or usefulness of any information, apparatus, product,
105 // or process disclosed, or represents that its use would not infringe
106 // upon privately owned rights.
107
108 /*
109 Generated by VIF - experimental VIntage Fortran compiler.
110 VIF release 1.2.12
111 */
891 static CALLS __calls[__ncalls] = {
892 {"aaaaaa", 0}, // subroutine
893 {"asyik", 0}, // subroutine
894 {"asyjy", 0}, // subroutine
895 {"avint", 0}, // subroutine
896 {"bcrh", 0}, // function
897 {"bdiff", 0}, // subroutine
898 {"bksol", 0}, // subroutine
899 {"blktr1", 0}, // subroutine
900 {"bndacc", 0}, // subroutine
901 {"bndsol", 0}, // subroutine
902 {"bsgq8", 0}, // subroutine
903 {"bsplvd", 0}, // subroutine
904 {"bsplvn", 0}, // subroutine
905 {"bsrh", 0}, // function
906 {"c1merg", 0}, // subroutine
907 {"casyi", 0}, // subroutine
908 {"cblkt1", 0}, // subroutine
909 {"ccmpb", 0}, // subroutine
910 {"cfod", 0}, // subroutine
911 {"cgeev", 0}, // subroutine
912 {"cgefs", 0}, // subroutine
913 {"cgeir", 0}, // subroutine
914 {"chiev", 0}, // subroutine
915 {"chkpr4", 0}, // subroutine
916 {"chkprm", 0}, // subroutine
917 {"chksn4", 0}, // subroutine
918 {"chksng", 0}, // subroutine
919 {"cmpcsg", 0}, // subroutine
920 {"cmposd", 0}, // subroutine
921 {"cmposn", 0}, // subroutine
922 {"cmposp", 0}, // subroutine
923 {"cmptr3", 0}, // subroutine
924 {"cmptrx", 0}, // subroutine
925 {"cnbco", 0}, // subroutine
926 {"cnbdi", 0}, // subroutine
927 {"cnbfa", 0}, // subroutine
928 {"cnbfs", 0}, // subroutine
929 {"cnbir", 0}, // subroutine
930 {"cnbsl", 0}, // subroutine
931 {"compb", 0}, // subroutine
932 {"cosgen", 0}, // subroutine
933 {"cpadd", 0}, // subroutine
934 {"cpevl", 0}, // subroutine
935 {"cpevlr", 0}, // subroutine
936 {"cpofs", 0}, // subroutine
937 {"cpoir", 0}, // subroutine
938 {"cpqr79", 0}, // subroutine
939 {"cproc", 0}, // subroutine
940 {"cprocp", 0}, // subroutine
941 {"cprod", 0}, // subroutine
942 {"cprodp", 0}, // subroutine
943 {"cpzero", 0}, // subroutine
944 {"crati", 0}, // subroutine
945 {"cs1s2", 0}, // subroutine
946 {"cscale", 0}, // subroutine
947 {"cshch", 0}, // subroutine
948 {"cuchk", 0}, // subroutine
949 {"cunhj", 0}, // subroutine
950 {"cunik", 0}, // subroutine
951 {"cv", 0}, // real*4 function
952 {"d1merg", 0}, // subroutine
953 {"d1mpyq", 0}, // subroutine
954 {"d1updt", 0}, // subroutine
955 {"dasyik", 0}, // subroutine
956 {"davint", 0}, // subroutine
957 {"dbdiff", 0}, // subroutine
958 {"dbksol", 0}, // subroutine
959 {"dbndac", 0}, // subroutine
960 {"dbndsl", 0}, // subroutine
961 {"dbocls", 0}, // subroutine
962 {"dbols", 0}, // subroutine
963 {"dbolsm", 0}, // subroutine
964 {"dbsgq8", 0}, // subroutine
965 {"dcfod", 0}, // subroutine
966 {"dckder", 0}, // subroutine
967 {"dcoef", 0}, // subroutine
968 {"dcov", 0}, // subroutine
969 {"dcscal", 0}, // subroutine
970 {"dcv", 0}, // real*8 function
971 {"ddes", 0}, // subroutine
972 {"ddoglg", 0}, // subroutine
973 {"defcmn", 0}, // subroutine
974 {"defe4", 0}, // subroutine
975 {"defehl", 0}, // subroutine
976 {"defer", 0}, // subroutine
977 {"denorm", 0}, // real*8 function
978 {"derkfs", 0}, // subroutine
979 {"des", 0}, // subroutine
980 {"dfcmn", 0}, // subroutine
981 {"dfdjc1", 0}, // subroutine
982 {"dfdjc3", 0}, // subroutine
983 {"dfehl", 0}, // subroutine
984 {"dfspvd", 0}, // subroutine
985 {"dfspvn", 0}, // subroutine
986 {"dfulmt", 0}, // subroutine
987 {"dfzero", 0}, // subroutine
988 {"dgaus8", 0}, // subroutine
989 {"dgefs", 0}, // subroutine
990 {"dglss", 0}, // subroutine
991 {"dh12", 0}, // subroutine
992 {"dhfti", 0}, // subroutine
993 {"dhstrt", 0}, // subroutine
994 {"dhvnrm", 0}, // real*8 function
995 {"djairy", 0}, // subroutine
996 {"dllsia", 0}, // subroutine
997 {"dlpdp", 0}, // subroutine
998 {"dlsei", 0}, // subroutine
999 {"dlsi", 0}, // subroutine
1000 {"dlssud", 0}, // subroutine
1001 {"dmacon", 0}, // subroutine
1002 {"dmgsbv", 0}, // subroutine
1003 {"dmpar", 0}, // subroutine
1004 {"dnbco", 0}, // subroutine
1005 {"dnbdi", 0}, // subroutine
1006 {"dnbfa", 0}, // subroutine
1007 {"dnbfs", 0}, // subroutine
1008 {"dnbsl", 0}, // subroutine
1009 {"dnls1e", 0}, // subroutine
1010 {"dnls1", 0}, // subroutine
1011 {"dnsqe", 0}, // subroutine
1012 {"dnsq", 0}, // subroutine
1013 {"dohtrl", 0}, // subroutine
1014 {"dorthr", 0}, // subroutine
1015 {"dp1vlu", 0}, // subroutine
1016 {"dpchng", 0}, // subroutine
1017 {"dpcoef", 0}, // subroutine
1018 {"dpincw", 0}, // subroutine
1019 {"dpinit", 0}, // subroutine
1020 {"dpintm", 0}, // subroutine
1021 {"dplint", 0}, // subroutine
1022 {"dplpce", 0}, // subroutine
1023 {"dplpdm", 0}, // subroutine
1024 {"dplpfe", 0}, // subroutine
1025 {"dplpfl", 0}, // subroutine
1026 {"dplpmn", 0}, // subroutine
1027 {"dplpmu", 0}, // subroutine
1028 {"dplpup", 0}, // subroutine
1029 {"dpnnzr", 0}, // subroutine
1030 {"dpofs", 0}, // subroutine
1031 {"dpolcf", 0}, // subroutine
1032 {"dpolft", 0}, // subroutine
1033 {"dpolvl", 0}, // subroutine
1034 {"dpopt", 0}, // subroutine
1035 {"dpperm", 0}, // subroutine
1036 {"dppgq8", 0}, // subroutine
1037 {"dprvec", 0}, // real*8 function
1038 {"dprwpg", 0}, // subroutine
1039 {"dprwvr", 0}, // subroutine
1040 {"dpsixn", 0}, // real*8 function
1041 {"dpsort", 0}, // subroutine
1042 {"dqdota", 0}, // real*8 function
1043 {"dqdoti", 0}, // real*8 function
1044 {"dqform", 0}, // subroutine
1045 {"dqrfac", 0}, // subroutine
1046 {"dqrslv", 0}, // subroutine
1047 {"drc3jj", 0}, // subroutine
1048 {"drc3jm", 0}, // subroutine
1049 {"drc6j", 0}, // subroutine
1050 {"drc", 0}, // real*8 function
1051 {"drd", 0}, // real*8 function
1052 {"dreadp", 0}, // subroutine
1053 {"dreort", 0}, // subroutine
1054 {"drf", 0}, // real*8 function
1055 {"drj", 0}, // real*8 function
1056 {"drkfs", 0}, // subroutine
1057 {"dsort", 0}, // subroutine
1058 {"dsoseq", 0}, // subroutine
1059 {"dsos", 0}, // subroutine
1060 {"dsossl", 0}, // subroutine
1061 {"dsplp", 0}, // subroutine
1062 {"dstor1", 0}, // subroutine
1063 {"dstway", 0}, // subroutine
1064 {"dsuds", 0}, // subroutine
1065 {"du11ls", 0}, // subroutine
1066 {"du11us", 0}, // subroutine
1067 {"du12ls", 0}, // subroutine
1068 {"du12us", 0}, // subroutine
1069 {"dulsia", 0}, // subroutine
1070 {"dusrmt", 0}, // subroutine
1071 {"dvecs", 0}, // subroutine
1072 {"dvnrms", 0}, // real*8 function
1073 {"dwnlit", 0}, // subroutine
1074 {"dwnlsm", 0}, // subroutine
1075 {"dwnlt1", 0}, // subroutine
1076 {"dwnlt2", 0}, // logical*4 function
1077 {"dwnlt3", 0}, // subroutine
1078 {"dwnnls", 0}, // subroutine
1079 {"dwritp", 0}, // subroutine
1080 {"dwupdt", 0}, // subroutine
1081 {"dx4", 0}, // subroutine
1082 {"dxadj", 0}, // subroutine
1083 {"dxc210", 0}, // subroutine
1084 {"dx", 0}, // subroutine
1085 {"dxpsi", 0}, // real*8 function
1086 {"dxred", 0}, // subroutine
1087 {"dy4", 0}, // subroutine
1088 {"dyairy", 0}, // subroutine
1089 {"dy", 0}, // subroutine
1090 {"efcmn", 0}, // subroutine
1091 {"fcmn", 0}, // subroutine
1092 {"fdjac3", 0}, // subroutine
1093 {"fdump", 0}, // subroutine
1094 {"fftdoc", 0}, // subroutine
1095 {"fulmat", 0}, // subroutine
1096 {"fzero", 0}, // subroutine
1097 {"gamrn", 0}, // real*4 function
1098 {"gaus8", 0}, // subroutine
1099 {"h12", 0}, // subroutine
1100 {"hfti", 0}, // subroutine
1101 {"hkseq", 0}, // subroutine
1102 {"hpperm", 0}, // subroutine
1103 {"hpsort", 0}, // subroutine
1104 {"hstart", 0}, // subroutine
1105 {"hstcs1", 0}, // subroutine
1106 {"hvnrm", 0}, // function
1107 {"hwscs1", 0}, // subroutine
1108 {"hwsss1", 0}, // subroutine
1109 {"i1merg", 0}, // subroutine
1110 {"idloc", 0}, // integer*4 function
1111 {"indxa", 0}, // subroutine
1112 {"indxb", 0}, // subroutine
1113 {"indxc", 0}, // subroutine
1114 {"inxca", 0}, // subroutine
1115 {"inxcb", 0}, // subroutine
1116 {"inxcc", 0}, // subroutine
1117 {"iploc", 0}, // integer*4 function
1118 {"ipperm", 0}, // subroutine
1119 {"ipsort", 0}, // subroutine
1120 {"isort", 0}, // subroutine
1121 {"jairy", 0}, // subroutine
1122 {"llsia", 0}, // subroutine
1123 {"lpdp", 0}, // subroutine
1124 {"lsei", 0}, // subroutine
1125 {"lsi", 0}, // subroutine
1126 {"lssods", 0}, // subroutine
1127 {"lssuds", 0}, // subroutine
1128 {"macon", 0}, // subroutine
1129 {"mgsbv", 0}, // subroutine
1130 {"minso4", 0}, // subroutine
1131 {"minsol", 0}, // subroutine
1132 {"mpadd2", 0}, // subroutine
1133 {"mpadd3", 0}, // subroutine
1134 {"mpadd", 0}, // subroutine
1135 {"mpblas", 0}, // subroutine
1136 {"mpcdm", 0}, // subroutine
1137 {"mpchk", 0}, // subroutine
1138 {"mpcmd", 0}, // subroutine
1139 {"mpdivi", 0}, // subroutine
1140 {"mperr", 0}, // subroutine
1141 {"mpmaxr", 0}, // subroutine
1142 {"mpmlp", 0}, // subroutine
1143 {"mpmul2", 0}, // subroutine
1144 {"mpmul", 0}, // subroutine
1145 {"mpmuli", 0}, // subroutine
1146 {"mpnzr", 0}, // subroutine
1147 {"mpovfl", 0}, // subroutine
1148 {"mpstr", 0}, // subroutine
1149 {"mpunfl", 0}, // subroutine
1150 {"numxer", 0}, // function
1151 {"ohtrol", 0}, // subroutine
1152 {"ohtror", 0}, // subroutine
1153 {"ortho4", 0}, // subroutine
1154 {"orthog", 0}, // subroutine
1155 {"orthol", 0}, // subroutine
1156 {"orthor", 0}, // subroutine
1157 {"pchngs", 0}, // subroutine
1158 {"pcoef", 0}, // subroutine
1159 {"pgsf", 0}, // function
1160 {"pimach", 0}, // function
1161 {"pinitm", 0}, // subroutine
1162 {"pnnzrs", 0}, // subroutine
1163 {"poisd2", 0}, // subroutine
1164 {"poisn2", 0}, // subroutine
1165 {"poisp2", 0}, // subroutine
1166 {"polcof", 0}, // subroutine
1167 {"polfit", 0}, // subroutine
1168 {"polint", 0}, // subroutine
1169 {"polyvl", 0}, // subroutine
1170 {"pos3d1", 0}, // subroutine
1171 {"postg2", 0}, // subroutine
1172 {"ppadd", 0}, // subroutine
1173 {"ppgq8", 0}, // subroutine
1174 {"ppgsf", 0}, // function
1175 {"pppsf", 0}, // function
1176 {"ppsgf", 0}, // function
1177 {"ppspf", 0}, // function
1178 {"proc", 0}, // subroutine
1179 {"procp", 0}, // subroutine
1180 {"prod", 0}, // subroutine
1181 {"prodp", 0}, // subroutine
1182 {"prvec", 0}, // function
1183 {"prwpge", 0}, // subroutine
1184 {"prwvir", 0}, // subroutine
1185 {"psgf", 0}, // function
1186 {"psifn", 0}, // subroutine
1187 {"psixn", 0}, // function
1188 {"pvalue", 0}, // subroutine
1189 {"pythag", 0}, // real*4 function
1190 {"rc3jj", 0}, // subroutine
1191 {"rc3jm", 0}, // subroutine
1192 {"rc6j", 0}, // subroutine
1193 {"rc", 0}, // real*4 function
1194 {"rd", 0}, // real*4 function
1195 {"reort", 0}, // subroutine
1196 {"rf", 0}, // real*4 function
1197 {"rj", 0}, // real*4 function
1198 {"rpqr79", 0}, // subroutine
1199 {"rpzero", 0}, // subroutine
1200 {"s1merg", 0}, // subroutine
1201 {"sbocls", 0}, // subroutine
1202 {"sbols", 0}, // subroutine
1203 {"sbolsm", 0}, // subroutine
1204 {"sclosm", 0}, // subroutine
1205 {"scoef", 0}, // subroutine
1206 {"scov", 0}, // subroutine
1207 {"sgeev", 0}, // subroutine
1208 {"sgefs", 0}, // subroutine
1209 {"sgeir", 0}, // subroutine
1210 {"sglss", 0}, // subroutine
1211 {"snbco", 0}, // subroutine
1212 {"snbdi", 0}, // subroutine
1213 {"snbfa", 0}, // subroutine
1214 {"snbfs", 0}, // subroutine
1215 {"snbir", 0}, // subroutine
1216 {"snbsl", 0}, // subroutine
1217 {"snls1e", 0}, // subroutine
1218 {"snls1", 0}, // subroutine
1219 {"snsqe", 0}, // subroutine
1220 {"snsq", 0}, // subroutine
1221 {"sods", 0}, // subroutine
1222 {"sopenm", 0}, // subroutine
1223 {"soseqs", 0}, // subroutine
1224 {"sos", 0}, // subroutine
1225 {"sossol", 0}, // subroutine
1226 {"speli4", 0}, // subroutine
1227 {"spelip", 0}, // subroutine
1228 {"spincw", 0}, // subroutine
1229 {"spinit", 0}, // subroutine
1230 {"splpce", 0}, // subroutine
1231 {"splpdm", 0}, // subroutine
1232 {"splp", 0}, // subroutine
1233 {"splpfe", 0}, // subroutine
1234 {"splpfl", 0}, // subroutine
1235 {"splpmn", 0}, // subroutine
1236 {"splpmu", 0}, // subroutine
1237 {"splpup", 0}, // subroutine
1238 {"spofs", 0}, // subroutine
1239 {"spoir", 0}, // subroutine
1240 {"spopt", 0}, // subroutine
1241 {"spperm", 0}, // subroutine
1242 {"spsort", 0}, // subroutine
1243 {"sreadp", 0}, // subroutine
1244 {"ssiev", 0}, // subroutine
1245 {"ssort", 0}, // subroutine
1246 {"stor1", 0}, // subroutine
1247 {"stway", 0}, // subroutine
1248 {"suds", 0}, // subroutine
1249 {"svecs", 0}, // subroutine
1250 {"swritp", 0}, // subroutine
1251 {"tevlc", 0}, // subroutine
1252 {"tevls", 0}, // subroutine
1253 {"tri3", 0}, // subroutine
1254 {"tridq", 0}, // subroutine
1255 {"tris4", 0}, // subroutine
1256 {"trisp", 0}, // subroutine
1257 {"trix", 0}, // subroutine
1258 {"u11ls", 0}, // subroutine
1259 {"u11us", 0}, // subroutine
1260 {"u12ls", 0}, // subroutine
1261 {"u12us", 0}, // subroutine
1262 {"ulsia", 0}, // subroutine
1263 {"usrmat", 0}, // subroutine
1264 {"vnwrms", 0}, // real*4 function
1265 {"wnlit", 0}, // subroutine
1266 {"wnlsm", 0}, // subroutine
1267 {"wnlt1", 0}, // subroutine
1268 {"wnlt2", 0}, // logical*4 function
1269 {"wnlt3", 0}, // subroutine
1270 {"wnnls", 0}, // subroutine
1271 {"xadj", 0}, // subroutine
1272 {"xc210", 0}, // subroutine
1273 {"xpsi", 0}, // real*4 function
1274 {"xred", 0}, // subroutine
1275 {"yairy", 0}, // subroutine
1276 {NULL, 0}
1277 };
1278
1279 static struct {
1280 int_4 npp_, k_, nm_, ncmplx_, ik_;
1281 real_4 eps_, cnv_, machep_;
1282 } ccblk_;
1283 static struct {
1284 int_4 npp_, k_, nm_, ncmplx_, ik_;
1285 real_4 eps_, cnv_, machep_;
1286 } cblkt_;
1287 static struct {
1288 int_4 kswx_, kswy_, k_, l_, mit_, nit_, is_, ms_, js_, ns_;
1289 real_4 ait_, bit_, cit_, dit_, dlx_, dly_, tdlx3_, tdly3_, dlx4_, dly4_;
1290 } spl4_;
1291 static struct {
1292 int_4 kswx_, kswy_, k_, l_, mit_, nit_, is_, ms_, js_, ns_;
1293 real_4 ait_, bit_, cit_, dit_, dlx_, dly_, tdlx3_, tdly3_, dlx4_, dly4_;
1294 } splpcm_;
1295 static struct {
1296 int_4 lpar_;
1297 real_8 eps_, fouru_, sqovfl_, sru_, twou_, uro_;
1298 } dml5mc_;
1299 static struct {
1300 int_4 icoco_, indpvt_, integ_, mxnon_, ndisk_, neq_, neqivp_, nfcc_, nic_, nopg_, nps_, ntape_, ntp_, numort_, nxpts_,
1301 lnfcc_;
1302 real_8 ae_, re_, tol_;
1303 } dml18j_;
1304 static struct {
1305 int_4 lp_, lenl_, lenu_, ncp_, lrow_, lcol_;
1306 real_8 small_;
1307 } la05dd_;
1308 static struct {
1309 int_4 mpb_, mpt_, mpm_, mplun_, mpmxr_, mpr_[30], b_, t_, m_, lun_, mxr_, r_[30];
1310 } mpcom_;
1311 static struct {
1312 int_4 igofx_, inhomo_, ivp_, ncompd_, nfc_, ncomp_;
1313 real_8 c_, xsav_;
1314 } dml8sz_;
1315 static struct {
1316 int_4 info_[15], istkop_, knswot_, kop_, lotjp_, mnswot_, nswot_;
1317 real_8 pwcnd_, px_, tnd_, x_, xbeg_, xend_, xop_, xot_;
1318 } dml15t_;
1319 static struct {
1320 int_4 l_, l2_, kmax_;
1321 real_8 radix_, radixl_, rad2l_, dlg10r_;
1322 } dxblk2_;
1323 static struct {
1324 int_4 nlg102_, mlg102_, lg102_[21];
1325 } dxblk3_;
1326 static struct {
1327 int_4 lpar_;
1328 real_4 uro_, sru_, eps_, sqovfl_, twou_, fouru_;
1329 } ml5mco_;
1330 static struct {
1331 int_4 nxpts_, nic_, nopg_, mxnon_, ndisk_, ntape_, neq_, indpvt_, integ_, nps_, ntp_, neqivp_, numort_, nfcc_, icoco_,
1332 lnfcc_;
1333 real_4 ae_, re_, tol_;
1334 } ml18jr_;
1335 static struct {
1336 int_4 igofx_, inhomo_, ivp_, ncompd_, nfc_, ncomp_;
1337 real_4 c_, xsav_;
1338 } ml8sz_;
1339 static struct {
1340 int_4 info_[15], istkop_, knswot_, kop_, lotjp_, mnswot_, nswot_;
1341 real_4 px_, pwcnd_, tnd_, x_, xbeg_, xend_, xot_, xop_;
1342 } ml15to_;
1343 static struct {
1344 int_4 lp_, lenl_, lenu_, ncp_, lrow_, lcol_;
1345 real_4 small_;
1346 } la05ds_;
1347 static struct {
1348 int_4 l_, l2_, kmax_;
1349 real_4 radix_, radixl_, rad2l_, dlg10r_;
1350 } xblk2_;
1351 static struct {
1352 int_4 nlg102_, mlg102_, lg102_[21];
1353 } xblk3_;
1356 arg_, int_4 _p_ in_, real_4 _p_ y_);
1358 y_, real_4 _p_ wk_, int_4 _p_ iflw_);
1360 int_4 _p_ ierr_);
1362 real_4 (*_f)(), real_4 _p_ sgn_);
1366 real_4 _p_ bm_, real_4 _p_ cm_, int_4 _p_ idimy_, real_4 _p_ y_, real_4 _p_ b_, real_4 _p_ w1_, real_4 _p_ w2_, real_4
1367 _p_ w3_, real_4 _p_ wd_, real_4 _p_ ww_, real_4 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)());
1369 int_4 _p_ jt_);
1371 real_4 _p_ x_, int_4 _p_ n_, real_4 _p_ rnorm_);
1373 real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ inbv_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_, real_4 _p_ work_);
1375 nderiv_);
1377 vnikx_);
1379 real_4 (*_f)(), real_4 _p_ sgn_);
1381 );
1383 nz_, real_4 _p_ rl_, real_4 _p_ tol_, real_4 _p_ elim_, real_4 _p_ alim_);
1385 complex_8 _p_ bm_, complex_8 _p_ cm_, int_4 _p_ idimy_, complex_8 _p_ y_, real_4 _p_ b_, complex_8 _p_ w1_, complex_8
1386 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ wd_, complex_8 _p_ ww_, complex_8 _p_ wu_, int_4 (*_prdct)(), int_4
1387 (*_cprdct)());
1389 real_4 _p_ ah_, real_4 _p_ bh_);
1392 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1394 ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1396 ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1398 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1400 c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 _p_ idmn_, int_4 _p_ ierror_);
1402 mbdcnd_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 (*_cofy)(), int_4 _p_
1403 idmn_, int_4 _p_ ierror_);
1405 logical_4 _p_ singlr_);
1407 real_4 _p_ xnu_, int_4 (*_cofx)(), int_4 (*_cofy)(), logical_4 _p_ singlr_);
1410 complex_8 _p_ bc_, complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ w_, complex_8 _p_ d_, complex_8
1411 _p_ tcos_, complex_8 _p_ p_);
1413 _p_ bb_, complex_8 _p_ c_, complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_,
1414 complex_8 _p_ w_, complex_8 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_);
1416 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_, complex_8 _p_ w_, complex_8 _p_ w2_,
1417 complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_);
1419 _p_ y1_, complex_8 _p_ y2_, complex_8 _p_ y3_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w1_, complex_8 _p_
1420 w2_, complex_8 _p_ w3_);
1422 complex_8 _p_ c_, complex_8 _p_ y_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w_);
1424 , real_4 _p_ rcond_, complex_8 _p_ z_);
1426 , complex_8 _p_ det_);
1428 , int_4 _p_ info_);
1430 v_, int_4 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1432 v_, int_4 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1434 , complex_8 _p_ b_, int_4 _p_ job_);
1436 real_4 _p_ ah_, real_4 _p_ bh_);
1439 bp_, real_4 _p_ bh_);
1441 b_, logical_4 _p_ kbd_);
1444 ind_, complex_8 _p_ work_);
1446 ind_, complex_8 _p_ work_);
1448 ;
1450 bm2_, int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_
1451 b_, complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, real_4 _p_ yy_);
1453 bm2_, int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_
1454 b_, complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, real_4 _p_ yy_);
1456 bm2_, int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ yy_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4
1457 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ y_);
1459 bm2_, int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ yy_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4
1460 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ y_);
1462 _p_ s_);
1465 real_4 _p_ alim_, int_4 _p_ iuf_);
1467 colsav_, real_4 _p_ rows_, real_4 _p_ rowsav_, real_4 _p_ anorm_, real_4 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
1468 ;
1472 complex_8 _p_ arg_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ asum_, complex_8 _p_ bsum_);
1474 _p_ init_, complex_8 _p_ phi_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ sum_, complex_8 _p_ cwrk_);
1476 _p_ bkpt_, real_4 _p_ w_);
1480 _p_ w_, logical_4 _p_ sing_);
1482 arg_, int_4 _p_ in_, real_8 _p_ y_);
1484 int_4 _p_ ierr_);
1488 int_4 _p_ jt_);
1490 real_8 _p_ x_, int_4 _p_ n_, real_8 _p_ rnorm_);
1492 bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnormc_, real_8 _p_ rnorm_, int_4 _p_
1493 mode_, real_8 _p_ rw_, int_4 _p_ iw_);
1495 bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ rw_, int_4 _p_ iw_)
1496 ;
1498 bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ rw_, real_8 _p_ ww_
1499 , real_8 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_);
1501 real_8 _p_ a_, real_8 _p_ b_, int_4 _p_ inbv_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_, real_8 _p_ work_);
1504 ldfjac_, real_8 _p_ xp_, real_8 _p_ fvecp_, int_4 _p_ mode_, real_8 _p_ err_);
1506 nic_, real_8 _p_ b_, real_8 _p_ beta_, real_8 _p_ coef_, int_4 _p_ inhomo_, real_8 _p_ re_, real_8 _p_ ae_, real_8 _p_
1507 by_, real_8 _p_ cvec_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_);
1509 real_8 _p_ r_, int_4 _p_ ldr_, int_4 _p_ info_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_);
1511 colsav_, real_8 _p_ rows_, real_8 _p_ rowsav_, real_8 _p_ anorm_, real_8 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
1512 ;
1514 _p_ bkpt_, real_8 _p_ w_);
1516 real_8 _p_ rtol_, real_8 _p_ atol_, int_4 _p_ idid_, real_8 _p_ ypout_, real_8 _p_ yp_, real_8 _p_ yy_, real_8 _p_ wt_,
1517 real_8 _p_ p_, real_8 _p_ phi_, real_8 _p_ alpha_, real_8 _p_ beta_, real_8 _p_ psi_, real_8 _p_ v_, real_8 _p_ w_,
1518 real_8 _p_ sig_, real_8 _p_ g_, real_8 _p_ gi_, real_8 _p_ h_, real_8 _p_ eps_, real_8 _p_ x_, real_8 _p_ xold_, real_8
1519 _p_ hold_, real_8 _p_ told_, real_8 _p_ delsgn_, real_8 _p_ tstop_, real_8 _p_ twou_, real_8 _p_ fouru_, logical_4 _p_
1520 start_, logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4
1521 _p_ kord_, int_4 _p_ kold_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kle4_, int_4 _p_ iquit_, int_4 _p_ kprev_,
1522 int_4 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_8 _p_ rpar_, int_4 _p_ ipar_);
1524 delta_, real_8 _p_ x_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1526 int_4 _p_ nbkpt_, real_8 _p_ bkptin_, int_4 _p_ mdein_, int_4 _p_ mdeout_, real_8 _p_ coeff_, real_8 _p_ bf_, real_8
1527 _p_ xtemp_, real_8 _p_ ptemp_, real_8 _p_ bkpt_, real_8 _p_ g_, int_4 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, int_4
1528 _p_ lw_);
1531 real_4 _p_ f1_, real_4 _p_ f2_, real_4 _p_ f3_, real_4 _p_ f4_, real_4 _p_ f5_, real_4 _p_ ys_, real_4 _p_ rpar_, int_4
1532 _p_ ipar_);
1536 , real_4 _p_ rtol_, real_4 _p_ atol_, int_4 _p_ idid_, real_4 _p_ h_, real_4 _p_ tolfac_, real_4 _p_ yp_, real_4 _p_
1537 f1_, real_4 _p_ f2_, real_4 _p_ f3_, real_4 _p_ f4_, real_4 _p_ f5_, real_4 _p_ ys_, real_4 _p_ told_, real_4 _p_
1538 dtsign_, real_4 _p_ u26_, real_4 _p_ rer_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kop_, int_4 _p_ iquit_,
1539 logical_4 _p_ stiff_, logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_4 _p_ rpar_, int_4 _p_ ipar_);
1541 real_4 _p_ rtol_, real_4 _p_ atol_, int_4 _p_ idid_, real_4 _p_ ypout_, real_4 _p_ yp_, real_4 _p_ yy_, real_4 _p_ wt_,
1542 real_4 _p_ p_, real_4 _p_ phi_, real_4 _p_ alpha_, real_4 _p_ beta_, real_4 _p_ psi_, real_4 _p_ v_, real_4 _p_ w_,
1543 real_4 _p_ sig_, real_4 _p_ g_, real_4 _p_ gi_, real_4 _p_ h_, real_4 _p_ eps_, real_4 _p_ x_, real_4 _p_ xold_, real_4
1544 _p_ hold_, real_4 _p_ told_, real_4 _p_ delsgn_, real_4 _p_ tstop_, real_4 _p_ twou_, real_4 _p_ fouru_, logical_4 _p_
1545 start_, logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4
1546 _p_ kord_, int_4 _p_ kold_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kle4_, int_4 _p_ iquit_, int_4 _p_ kprev_,
1547 int_4 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_4 _p_ rpar_, int_4 _p_ ipar_);
1549 int_4 _p_ nbkpt_, real_8 _p_ bkptin_, int_4 _p_ nconst_, real_8 _p_ xconst_, real_8 _p_ yconst_, int_4 _p_ nderiv_,
1550 int_4 _p_ mode_, real_8 _p_ coeff_, real_8 _p_ bf_, real_8 _p_ xtemp_, real_8 _p_ ptemp_, real_8 _p_ bkpt_, real_8 _p_
1551 g_, int_4 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, real_8 _p_ work_, int_4 _p_ iwork_);
1553 ldfjac_, int_4 _p_ iflag_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ epsfcn_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1555 , int_4 _p_ ldfjac_, int_4 _p_ iflag_, real_8 _p_ epsfcn_, real_8 _p_ wa_);
1557 real_8 _p_ f1_, real_8 _p_ f2_, real_8 _p_ f3_, real_8 _p_ f4_, real_8 _p_ f5_, real_8 _p_ ys_, real_8 _p_ rpar_, int_4
1558 _p_ ipar_);
1560 nderiv_);
1562 vnikx_);
1564 dattrv_, int_4 _p_ iflag_);
1566 int_4 _p_ iflag_);
1568 ierr_);
1570 real_8 _p_ work_, int_4 _p_ iwork_);
1572 _p_ nb_, real_8 _p_ rnorm_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
1574 real_8 _p_ up_, real_8 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_);
1576 _p_ nb_, real_8 _p_ tau_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ g_, int_4 _p_ ip_);
1578 yprime_, real_8 _p_ etol_, int_4 _p_ morder_, real_8 _p_ small_, real_8 _p_ big_, real_8 _p_ spy_, real_8 _p_ pv_,
1579 real_8 _p_ yp_, real_8 _p_ sf_, real_8 _p_ rpar_, int_4 _p_ ipar_, real_8 _p_ h_);
1583 int_4 _p_ nb_, real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4
1584 _p_ ksure_, real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
1586 real_8 _p_ x_, real_8 _p_ wnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ is_);
1588 real_8 _p_ prgopt_, real_8 _p_ x_, real_8 _p_ rnorme_, real_8 _p_ rnorml_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_
1589 ip_);
1591 real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_);
1593 real_8 _p_ u_, int_4 _p_ nrdu_, int_4 _p_ iflag_, int_4 _p_ mlso_, int_4 _p_ irank_, int_4 _p_ iscale_, real_8 _p_ q_,
1594 real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ s_, real_8 _p_ div_, real_8 _p_ td_, int_4 _p_ isflg_, real_8 _p_
1595 scales_);
1598 real_8 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_8 _p_ v_, real_8 _p_ w_, real_8 _p_ wcnd_);
1600 , real_8 _p_ delta_, real_8 _p_ par_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1602 real_8 _p_ rcond_, real_8 _p_ z_);
1604 real_8 _p_ det_);
1606 int_4 _p_ info_);
1608 int_4 _p_ itask_, int_4 _p_ ind_, real_8 _p_ work_, int_4 _p_ iwork_);
1610 real_8 _p_ b_, int_4 _p_ job_);
1612 , real_8 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_8 _p_ wa_, int_4 _p_ lwa_);
1614 real_8 _p_ fjac_, int_4 _p_ ldfjac_, real_8 _p_ ftol_, real_8 _p_ xtol_, real_8 _p_ gtol_, int_4 _p_ maxfev_, real_8
1615 _p_ epsfcn_, real_8 _p_ diag_, int_4 _p_ mode_, real_8 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_
1616 , int_4 _p_ njev_, int_4 _p_ ipvt_, real_8 _p_ qtf_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_
1617 );
1619 fvec_, real_8 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_8 _p_ wa_, int_4 _p_ lwa_);
1621 , real_8 _p_ fjac_, int_4 _p_ ldfjac_, real_8 _p_ xtol_, int_4 _p_ maxfev_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_
1622 epsfcn_, real_8 _p_ diag_, int_4 _p_ mode_, real_8 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_,
1623 int_4 _p_ njev_, real_8 _p_ r_, int_4 _p_ lr_, real_8 _p_ qtf_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_,
1624 real_8 _p_ wa4_);
1626 div_, real_8 _p_ td_);
1628 , int_4 _p_ iscale_, real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ scales_, real_8 _p_ rows_, real_8 _p_ rs_);
1630 ;
1632 ircx_);
1635 jstrt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_
1636 ibb_, real_8 _p_ costsc_, real_8 _p_ gg_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_ amat_, real_8 _p_ basmat_,
1637 real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ costs_, real_8 _p_ colnrm_,
1638 real_8 _p_ duals_, logical_4 _p_ stpedg_);
1640 _p_ ind_, real_8 _p_ primal_, int_4 _p_ info_, real_8 _p_ amat_, real_8 _p_ csc_, real_8 _p_ costsc_, real_8 _p_
1641 colnrm_, real_8 _p_ xlamda_, real_8 _p_ anorm_, real_8 _p_ rhs_, real_8 _p_ rhsnrm_, int_4 _p_ ibasis_, int_4 _p_ ibb_,
1642 int_4 _p_ imat_, logical_4 _p_ lopt_);
1646 _p_ itbrc_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4
1647 _p_ ibb_, real_8 _p_ erdnrm_, real_8 _p_ eps_, real_8 _p_ tune_, real_8 _p_ gg_, real_8 _p_ amat_, real_8 _p_ basmat_,
1648 real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ primal_, real_8 _p_ erd_, real_8 _p_ erp_, logical_4 _p_
1649 singlr_, logical_4 _p_ redbas_);
1651 _p_ info_, int_4 _p_ iopt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4
1652 _p_ ind_, int_4 _p_ ibb_, real_8 _p_ anorm_, real_8 _p_ eps_, real_8 _p_ uu_, real_8 _p_ gg_, real_8 _p_ amat_, real_8
1653 _p_ basmat_, real_8 _p_ csc_, real_8 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_);
1655 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_8
1656 _p_ erdnrm_, real_8 _p_ eps_, real_8 _p_ gg_, real_8 _p_ dulnrm_, real_8 _p_ dirnrm_, real_8 _p_ amat_, real_8 _p_
1657 basmat_, real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ rz_, real_8 _p_
1658 rg_, real_8 _p_ colnrm_, real_8 _p_ duals_, logical_4 _p_ found_);
1660 int_4 _p_ ind_, int_4 _p_ ibb_, real_8 _p_ theta_, real_8 _p_ dirnrm_, real_8 _p_ rprnrm_, real_8 _p_ csc_, real_8 _p_
1661 ww_, real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ erp_, real_8 _p_ rprim_, real_8 _p_ primal_, logical_4 _p_ finite_,
1662 logical_4 _p_ zerolv_);
1664 prgopt_, real_8 _p_ dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ primal_,
1665 real_8 _p_ duals_, real_8 _p_ amat_, real_8 _p_ csc_, real_8 _p_ colnrm_, real_8 _p_ erd_, real_8 _p_ erp_, real_8 _p_
1666 basmat_, real_8 _p_ wr_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ rprim_, real_8 _p_ rhs_, real_8 _p_ ww_, int_4 _p_
1667 lmx_, int_4 _p_ lbm_, int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_
1668 iwr_);
1670 _p_ info_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ iopt_, int_4 _p_ npp_, int_4 _p_ jstrt_, int_4 _p_ ibasis_,
1671 int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_8 _p_ anorm_,
1672 real_8 _p_ eps_, real_8 _p_ uu_, real_8 _p_ gg_, real_8 _p_ rprnrm_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_
1673 theta_, real_8 _p_ costsc_, real_8 _p_ xlamda_, real_8 _p_ rhsnrm_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_
1674 csc_, real_8 _p_ wr_, real_8 _p_ rprim_, real_8 _p_ ww_, real_8 _p_ bu_, real_8 _p_ bl_, real_8 _p_ rhs_, real_8 _p_
1675 erd_, real_8 _p_ erp_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ colnrm_, real_8 _p_ costs_, real_8 _p_ primal_,
1676 real_8 _p_ duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_);
1678 dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ amat_, int_4 _p_ imat_, logical_4
1679 _p_ sizeup_, real_8 _p_ asmall_, real_8 _p_ abig_);
1681 ircx_);
1683 real_8 _p_ work_);
1686 real_8 _p_ eps_, real_8 _p_ r_, int_4 _p_ ierr_, real_8 _p_ a_);
1688 , real_8 _p_ c_, real_8 _p_ work_, int_4 _p_ ierr_);
1690 int_4 _p_ ibasis_, real_8 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_);
1693 , int_4 _p_ id_, real_8 _p_ a_, real_8 _p_ b_, int_4 _p_ inppv_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_);
1700 int_4 _p_ incy_);
1702 int_4 _p_ incy_);
1705 ipvt_, int_4 _p_ lipvt_, real_8 _p_ sigma_, real_8 _p_ acnorm_, real_8 _p_ wa_);
1707 qtb_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa_);
1709 l1max_, real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1711 m2max_, real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1713 l1min_, real_8 _p_ l1max_, real_8 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1718 w_, real_8 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, real_8 _p_ stowa_, int_4 _p_ iflag_);
1722 , real_8 _p_ rtol_, real_8 _p_ atol_, int_4 _p_ idid_, real_8 _p_ h_, real_8 _p_ tolfac_, real_8 _p_ yp_, real_8 _p_
1723 f1_, real_8 _p_ f2_, real_8 _p_ f3_, real_8 _p_ f4_, real_8 _p_ f5_, real_8 _p_ ys_, real_8 _p_ told_, real_8 _p_
1724 dtsign_, real_8 _p_ u26_, real_8 _p_ rer_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kop_, int_4 _p_ iquit_,
1725 logical_4 _p_ stiff_, logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_8 _p_ rpar_, int_4 _p_ ipar_);
1728 _p_ tolf_, int_4 _p_ iflag_, int_4 _p_ mxit_, int_4 _p_ ncjs_, int_4 _p_ nsrrc_, int_4 _p_ nsri_, int_4 _p_ iprint_,
1729 real_8 _p_ fmax_, real_8 _p_ c_, int_4 _p_ nc_, real_8 _p_ b_, real_8 _p_ p_, real_8 _p_ temp_, real_8 _p_ x_, real_8
1730 _p_ y_, real_8 _p_ fac_, int_4 _p_ is_);
1732 _p_ tolf_, int_4 _p_ iflag_, real_8 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_);
1734 _p_ m_);
1736 , real_8 _p_ dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ primal_, real_8 _p_
1737 duals_, int_4 _p_ ibasis_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_);
1739 ndisk_, int_4 _p_ ntape_);
1742 int_4 _p_ iflag_, int_4 _p_ mlso_, real_8 _p_ work_, int_4 _p_ iwork_);
1744 int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_8 _p_ h_, real_8 _p_ w_, real_8 _p_ eb_, int_4
1745 _p_ ic_, int_4 _p_ ir_);
1747 int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_8 _p_ h_, real_8 _p_ w_, real_8 _p_ eb_, int_4
1748 _p_ ir_, int_4 _p_ ic_);
1750 int_4 _p_ nb_, int_4 _p_ mode_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ w_, int_4 _p_ ic_, int_4
1751 _p_ ir_);
1753 int_4 _p_ nb_, int_4 _p_ mode_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ w_, int_4 _p_ ir_, int_4
1754 _p_ ic_);
1756 int_4 _p_ nb_, real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4
1757 _p_ ksure_, real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
1759 dattrv_, int_4 _p_ iflag_);
1761 _p_ inhomo_, int_4 _p_ iflag_);
1764 int_4 _p_ itype_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ rnorm_, int_4 _p_ idope_, real_8 _p_ dope_, logical_4
1765 _p_ done_);
1767 real_8 _p_ prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ ipivot_, int_4 _p_ itype_, real_8 _p_
1768 wd_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ z_, real_8 _p_ temp_, real_8 _p_ d_);
1770 recalc_, int_4 _p_ imax_, real_8 _p_ hbar_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ w_);
1772 _p_ scale_, real_8 _p_ wic_);
1774 real_8 _p_ w_);
1776 real_8 _p_ prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_8 _p_ work_);
1779 real_8 _p_ cos_, real_8 _p_ sin_);
1790 int_4 _p_ nbkpt_, real_4 _p_ bkptin_, int_4 _p_ mdein_, int_4 _p_ mdeout_, real_4 _p_ coeff_, real_4 _p_ bf_, real_4
1791 _p_ xtemp_, real_4 _p_ ptemp_, real_4 _p_ bkpt_, real_4 _p_ g_, int_4 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, int_4
1792 _p_ lw_);
1794 int_4 _p_ nbkpt_, real_4 _p_ bkptin_, int_4 _p_ nconst_, real_4 _p_ xconst_, real_4 _p_ yconst_, int_4 _p_ nderiv_,
1795 int_4 _p_ mode_, real_4 _p_ coeff_, real_4 _p_ bf_, real_4 _p_ xtemp_, real_4 _p_ ptemp_, real_4 _p_ bkpt_, real_4 _p_
1796 g_, int_4 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, real_4 _p_ work_, int_4 _p_ iwork_);
1798 , int_4 _p_ ldfjac_, int_4 _p_ iflag_, real_4 _p_ epsfcn_, real_4 _p_ wa_);
1802 dattrv_, int_4 _p_ iflag_);
1804 int_4 _p_ iflag_);
1807 ierr_);
1809 real_4 _p_ up_, real_4 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_);
1811 _p_ nb_, real_4 _p_ tau_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ g_, int_4 _p_ ip_);
1815 _p_ kflag_, char _p_ work_, int_4 _p_ ier_);
1817 , real_4 _p_ etol_, int_4 _p_ morder_, real_4 _p_ small_, real_4 _p_ big_, real_4 _p_ spy_, real_4 _p_ pv_, real_4 _p_
1818 yp_, real_4 _p_ sf_, real_4 _p_ rpar_, int_4 _p_ ipar_, real_4 _p_ h_);
1820 bda_, real_4 _p_ bdb_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdc_, real_4 _p_ bdd_,
1821 real_4 _p_ elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, int_4 _p_ ierr1_, real_4 _p_ am_, real_4 _p_
1822 bm_, real_4 _p_ cm_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ snth_, real_4 _p_ rsq_, real_4 _p_ wrk_
1823 );
1826 bdts_, real_4 _p_ bdtf_, real_4 _p_ rs_, real_4 _p_ rf_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdrs_, real_4 _p_
1827 bdrf_, real_4 _p_ elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, real_4 _p_ w_, real_4 _p_ s_, real_4
1828 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ r_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_
1829 sint_, real_4 _p_ bmh_);
1831 bdtf_, real_4 _p_ ps_, real_4 _p_ pf_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdps_, real_4 _p_ bdpf_, real_4 _p_
1832 elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4
1833 _p_ sn_, real_4 _p_ ss_, real_4 _p_ sint_, real_4 _p_ d_);
1848 _p_ nb_, real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_
1849 ksure_, real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
1851 real_4 _p_ x_, real_4 _p_ wnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ is_);
1853 _p_ prgopt_, real_4 _p_ x_, real_4 _p_ rnorme_, real_4 _p_ rnorml_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_);
1855 real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_);
1857 int_4 _p_ iflag_, int_4 _p_ irank_, int_4 _p_ iscale_, real_4 _p_ q_, real_4 _p_ diag_, int_4 _p_ kpivot_, int_4 _p_
1858 iter_, real_4 _p_ resnrm_, real_4 _p_ xnorm_, real_4 _p_ z_, real_4 _p_ r_, real_4 _p_ div_, real_4 _p_ td_, real_4 _p_
1859 scales_);
1861 real_4 _p_ u_, int_4 _p_ nrdu_, int_4 _p_ iflag_, int_4 _p_ mlso_, int_4 _p_ irank_, int_4 _p_ iscale_, real_4 _p_ q_,
1862 real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ s_, real_4 _p_ div_, real_4 _p_ td_, int_4 _p_ isflg_, real_4 _p_
1863 scales_);
1866 real_4 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_4 _p_ v_, real_4 _p_ w_, real_4 _p_ wcnd_);
1889 div_, real_4 _p_ td_);
1891 div_, real_4 _p_ td_);
1895 , int_4 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ cols_, real_4 _p_ cs_);
1897 , int_4 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ rows_, real_4 _p_ rs_);
1899 ircx_);
1905 ircx_);
1907 , real_4 _p_ q_, int_4 _p_ idimq_, real_4 _p_ b_, real_4 _p_ w_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
1909 , real_4 _p_ c_, real_4 _p_ q_, int_4 _p_ idimq_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4
1910 _p_ w2_, real_4 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
1912 _p_ idimq_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_, real_4 _p_ w3_, real_4 _p_ d_
1913 , real_4 _p_ tcos_, real_4 _p_ p_);
1916 real_4 _p_ eps_, real_4 _p_ r_, int_4 _p_ ierr_, real_4 _p_ a_);
1919 , real_4 _p_ c_, real_4 _p_ work_, int_4 _p_ ierr_);
1921 _p_ b_, real_4 _p_ c_, int_4 _p_ ldimf_, int_4 _p_ mdimf_, real_4 _p_ f_, real_4 _p_ xrt_, real_4 _p_ yrt_, real_4 _p_
1922 t_, real_4 _p_ d_, real_4 _p_ wx_, real_4 _p_ wy_, real_4 _p_ c1_, real_4 _p_ c2_, real_4 _p_ bb_);
1924 int_4 _p_ idimq_, real_4 _p_ q_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_, real_4
1925 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
1927 bp_, real_4 _p_ bh_);
1929 int_4 _p_ id_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ inppv_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_);
1935 int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
1936 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ u_);
1938 , int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
1939 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ w_);
1941 int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_,
1942 real_4 _p_ d_, real_4 _p_ w_, real_4 _p_ u_);
1944 , int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_
1945 c_, real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ w_);
1951 int_4 _p_ ierr_);
1954 ;
1957 l1max_, real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1959 m2max_, real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1961 l1min_, real_4 _p_ l1max_, real_4 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1965 , real_4 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, real_4 _p_ stowa_, int_4 _p_ iflag_);
1970 s_);
1973 bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnormc_, real_4 _p_ rnorm_, int_4 _p_
1974 mode_, real_4 _p_ rw_, int_4 _p_ iw_);
1976 bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ rw_, int_4 _p_ iw_)
1977 ;
1979 bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ rw_, real_4 _p_ ww_
1980 , real_4 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_);
1983 nic_, real_4 _p_ b_, real_4 _p_ beta_, real_4 _p_ coef_, int_4 _p_ inhomo_, real_4 _p_ re_, real_4 _p_ ae_, real_4 _p_
1984 by_, real_4 _p_ cvec_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_);
1986 real_4 _p_ r_, int_4 _p_ ldr_, int_4 _p_ info_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_);
1988 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1990 real_4 _p_ work_, int_4 _p_ iwork_);
1992 real_4 _p_ work_, int_4 _p_ iwork_);
1994 _p_ nb_, real_4 _p_ rnorm_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
1996 real_4 _p_ rcond_, real_4 _p_ z_);
1998 real_4 _p_ det_);
2000 int_4 _p_ info_);
2002 int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_);
2004 int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_);
2006 real_4 _p_ b_, int_4 _p_ job_);
2008 , real_4 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_4 _p_ wa_, int_4 _p_ lwa_);
2010 real_4 _p_ fjac_, int_4 _p_ ldfjac_, real_4 _p_ ftol_, real_4 _p_ xtol_, real_4 _p_ gtol_, int_4 _p_ maxfev_, real_4
2011 _p_ epsfcn_, real_4 _p_ diag_, int_4 _p_ mode_, real_4 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_
2012 , int_4 _p_ njev_, int_4 _p_ ipvt_, real_4 _p_ qtf_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_
2013 );
2015 fvec_, real_4 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_4 _p_ wa_, int_4 _p_ lwa_);
2017 , real_4 _p_ fjac_, int_4 _p_ ldfjac_, real_4 _p_ xtol_, int_4 _p_ maxfev_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_
2018 epsfcn_, real_4 _p_ diag_, int_4 _p_ mode_, real_4 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_,
2019 int_4 _p_ njev_, real_4 _p_ r_, int_4 _p_ lr_, real_4 _p_ qtf_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_,
2020 real_4 _p_ wa4_);
2022 int_4 _p_ iflag_, real_4 _p_ work_, int_4 _p_ iwork_);
2025 _p_ tolf_, int_4 _p_ iflag_, int_4 _p_ mxit_, int_4 _p_ ncjs_, int_4 _p_ nsrrc_, int_4 _p_ nsri_, int_4 _p_ iprint_,
2026 real_4 _p_ fmax_, real_4 _p_ c_, int_4 _p_ nc_, real_4 _p_ b_, real_4 _p_ p_, real_4 _p_ temp_, real_4 _p_ x_, real_4
2027 _p_ y_, real_4 _p_ fac_, int_4 _p_ is_);
2029 tolf_, int_4 _p_ iflag_, real_4 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_);
2031 _p_ m_);
2033 bda_, real_4 _p_ alpha_, real_4 _p_ bdb_, real_4 _p_ beta_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_
2034 nbdcnd_, real_4 _p_ bdc_, real_4 _p_ bdd_, int_4 (*_cofx)(), real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_
2035 dn_, real_4 _p_ un_, real_4 _p_ zn_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ dm_, real_4 _p_ um_,
2036 real_4 _p_ zm_, real_4 _p_ grhs_, real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_
2037 ierror_);
2039 mbdcnd_, real_4 _p_ bda_, real_4 _p_ alpha_, real_4 _p_ bdb_, real_4 _p_ beta_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_
2040 n_, int_4 _p_ nbdcnd_, real_4 _p_ bdc_, real_4 _p_ gama_, real_4 _p_ bdd_, real_4 _p_ xnu_, int_4 (*_cofx)(), int_4
2041 (*_cofy)(), real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ dn_, real_4 _p_ un_, real_4 _p_ zn_, real_4 _p_
2042 am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ dm_, real_4 _p_ um_, real_4 _p_ zm_, real_4 _p_ grhs_, real_4 _p_ usol_
2043 , int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_);
2045 jstrt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_
2046 ibb_, real_4 _p_ costsc_, real_4 _p_ gg_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_ amat_, real_4 _p_ basmat_,
2047 real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ costs_, real_4 _p_ colnrm_,
2048 real_4 _p_ duals_, logical_4 _p_ stpedg_);
2050 _p_ ind_, real_4 _p_ primal_, int_4 _p_ info_, real_4 _p_ amat_, real_4 _p_ csc_, real_4 _p_ costsc_, real_4 _p_
2051 colnrm_, real_4 _p_ xlamda_, real_4 _p_ anorm_, real_4 _p_ rhs_, real_4 _p_ rhsnrm_, int_4 _p_ ibasis_, int_4 _p_ ibb_,
2052 int_4 _p_ imat_, logical_4 _p_ lopt_);
2054 _p_ itbrc_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4
2055 _p_ ibb_, real_4 _p_ erdnrm_, real_4 _p_ eps_, real_4 _p_ tune_, real_4 _p_ gg_, real_4 _p_ amat_, real_4 _p_ basmat_,
2056 real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ primal_, real_4 _p_ erd_, real_4 _p_ erp_, logical_4 _p_
2057 singlr_, logical_4 _p_ redbas_);
2059 _p_ info_, int_4 _p_ iopt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4
2060 _p_ ind_, int_4 _p_ ibb_, real_4 _p_ anorm_, real_4 _p_ eps_, real_4 _p_ uu_, real_4 _p_ gg_, real_4 _p_ amat_, real_4
2061 _p_ basmat_, real_4 _p_ csc_, real_4 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_);
2063 real_4 _p_ dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ primal_, real_4 _p_
2064 duals_, int_4 _p_ ibasis_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_);
2066 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_4
2067 _p_ erdnrm_, real_4 _p_ eps_, real_4 _p_ gg_, real_4 _p_ dulnrm_, real_4 _p_ dirnrm_, real_4 _p_ amat_, real_4 _p_
2068 basmat_, real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ rz_, real_4 _p_
2069 rg_, real_4 _p_ colnrm_, real_4 _p_ duals_, logical_4 _p_ found_);
2071 int_4 _p_ ind_, int_4 _p_ ibb_, real_4 _p_ theta_, real_4 _p_ dirnrm_, real_4 _p_ rprnrm_, real_4 _p_ csc_, real_4 _p_
2072 ww_, real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ erp_, real_4 _p_ rprim_, real_4 _p_ primal_, logical_4 _p_ finite_,
2073 logical_4 _p_ zerolv_);
2075 prgopt_, real_4 _p_ dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ primal_,
2076 real_4 _p_ duals_, real_4 _p_ amat_, real_4 _p_ csc_, real_4 _p_ colnrm_, real_4 _p_ erd_, real_4 _p_ erp_, real_4 _p_
2077 basmat_, real_4 _p_ wr_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ rprim_, real_4 _p_ rhs_, real_4 _p_ ww_, int_4 _p_
2078 lmx_, int_4 _p_ lbm_, int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_
2079 iwr_);
2081 _p_ info_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ iopt_, int_4 _p_ npp_, int_4 _p_ jstrt_, int_4 _p_ ibasis_,
2082 int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_4 _p_ anorm_,
2083 real_4 _p_ eps_, real_4 _p_ uu_, real_4 _p_ gg_, real_4 _p_ rprnrm_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_
2084 theta_, real_4 _p_ costsc_, real_4 _p_ xlamda_, real_4 _p_ rhsnrm_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_
2085 csc_, real_4 _p_ wr_, real_4 _p_ rprim_, real_4 _p_ ww_, real_4 _p_ bu_, real_4 _p_ bl_, real_4 _p_ rhs_, real_4 _p_
2086 erd_, real_4 _p_ erp_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ colnrm_, real_4 _p_ costs_, real_4 _p_ primal_,
2087 real_4 _p_ duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_);
2089 dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ amat_, int_4 _p_ imat_, logical_4
2090 _p_ sizeup_, real_4 _p_ asmall_, real_4 _p_ abig_);
2092 real_4 _p_ work_);
2094 real_4 _p_ work_);
2096 int_4 _p_ ibasis_, real_4 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_);
2101 int_4 _p_ info_);
2104 ndisk_, int_4 _p_ ntape_);
2107 int_4 _p_ iflag_, int_4 _p_ mlso_, real_4 _p_ work_, int_4 _p_ iwork_);
2109 _p_ inhomo_, int_4 _p_ iflag_);
2114 _p_ y2_, real_4 _p_ y3_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w1_, real_4 _p_ w2_, real_4 _p_ w3_);
2117 _p_ z_);
2119 _p_ z_);
2121 real_4 _p_ y_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w_);
2123 int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_4 _p_ h_, real_4 _p_ w_, real_4 _p_ eb_, int_4
2124 _p_ ic_, int_4 _p_ ir_);
2126 int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_4 _p_ h_, real_4 _p_ w_, real_4 _p_ eb_, int_4
2127 _p_ ir_, int_4 _p_ ic_);
2129 _p_ nb_, int_4 _p_ mode_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ w_, int_4 _p_ ic_, int_4 _p_
2130 ir_);
2132 _p_ nb_, int_4 _p_ mode_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ w_, int_4 _p_ ir_, int_4 _p_
2133 ic_);
2135 _p_ nb_, real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_
2136 ksure_, real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_);
2138 dattrv_, int_4 _p_ iflag_);
2141 int_4 _p_ itype_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ rnorm_, int_4 _p_ idope_, real_4 _p_ dope_, logical_4
2142 _p_ done_);
2144 real_4 _p_ prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ ipivot_, int_4 _p_ itype_, real_4 _p_
2145 wd_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ z_, real_4 _p_ temp_, real_4 _p_ d_);
2147 recalc_, int_4 _p_ imax_, real_4 _p_ hbar_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ w_);
2149 _p_ scale_, real_4 _p_ wic_);
2151 real_4 _p_ w_);
2153 _p_ prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_4 _p_ work_);
2159 int_4 _aaaaaa (char _p_ ver_)
2160 { // ** body not listed **
2164 }
2165
2166 int_4 _asyik (real_4 _p_ x_, real_4 _p_ fnu_, int_4 _p_ kode_, real_4 _p_ flgik_, real_4 _p_ ra_, real_4 _p_ arg_,
2167 int_4 _p_ in_, real_4 _p_ y_)
2168 { // ** body not listed **
2577 }
2578
2579 int_4 _asyjy (int_4 (*_funjy)(), real_4 _p_ x_, real_4 _p_ fnu_, real_4 _p_ flgjy_, int_4 _p_ in_, real_4 _p_ y_,
2580 real_4 _p_ wk_, int_4 _p_ iflw_)
2581 { // ** body not listed **
4661 }
4662
4663 int_4 _avint (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ n_, real_4 _p_ xlo_, real_4 _p_ xup_, real_4 _p_ ans_, int_4 _p_
4664 ierr_)
4665 { // ** body not listed **
4811 }
4812
4813 real_4 _bcrh (real_4 _p_ xll_, real_4 _p_ xrr_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_, real_4
4814 (*_f)(), real_4 _p_ sgn_)
4815 { // ** body not listed **
4850 }
4851
4852 int_4 _bdiff (int_4 _p_ l_, real_4 _p_ v_)
4853 { // ** body not listed **
4868 }
4869
4870 int_4 _bksol (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ x_)
4871 { // ** body not listed **
4888 }
4889
4890 int_4 _blktr1 (int_4 _p_ n_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, int_4 _p_ m_, real_4 _p_ am_, real_4 _p_
4891 bm_, real_4 _p_ cm_, int_4 _p_ idimy_, real_4 _p_ y_, real_4 _p_ b_, real_4 _p_ w1_, real_4 _p_ w2_, real_4 _p_ w3_,
4892 real_4 _p_ wd_, real_4 _p_ ww_, real_4 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)())
4893 { // ** body not listed **
5226 }
5227
5228 int_4 _bndacc (real_4 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, int_4 _p_ mt_, int_4 _p_ jt_
5229 )
5230 { // ** body not listed **
5306 }
5307
5308 int_4 _bndsol (int_4 _p_ mode_, real_4 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, real_4 _p_
5309 x_, int_4 _p_ n_, real_4 _p_ rnorm_)
5310 { // ** body not listed **
5398 }
5399
5400 int_4 _bsgq8 (real_4 (*_fun)(), real_4 _p_ xt_, real_4 _p_ bc_, int_4 _p_ n_, int_4 _p_ kk_, int_4 _p_ id_, real_4 _p_
5401 a_, real_4 _p_ b_, int_4 _p_ inbv_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_, real_4 _p_ work_)
5402 { // ** body not listed **
5671 }
5672
5673 int_4 _bsplvd (real_4 _p_ t_, int_4 _p_ k_, real_4 _p_ x_, int_4 _p_ ileft_, real_4 _p_ vnikx_, int_4 _p_ nderiv_)
5674 { // ** body not listed **
5740 }
5741
5742 int_4 _bsplvn (real_4 _p_ t_, int_4 _p_ jhigh_, int_4 _p_ index_, real_4 _p_ x_, int_4 _p_ ileft_, real_4 _p_ vnikx_)
5743 { // ** body not listed **
5846 }
5847
5848 real_4 _bsrh (real_4 _p_ xll_, real_4 _p_ xrr_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_, real_4
5849 (*_f)(), real_4 _p_ sgn_)
5850 { // ** body not listed **
5885 }
5886
5887 int_4 _c1merg (complex_8 _p_ tcos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_)
5888 { // ** body not listed **
5927 }
5928
5929 int_4 _casyi (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ kode_, int_4 _p_ n_, complex_8 _p_ y_, int_4 _p_ nz_, real_4
5930 _p_ rl_, real_4 _p_ tol_, real_4 _p_ elim_, real_4 _p_ alim_)
5931 { // ** body not listed **
6086 }
6087
6088 int_4 _cblkt1 (int_4 _p_ n_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, int_4 _p_ m_, complex_8 _p_ am_, complex_8
6089 _p_ bm_, complex_8 _p_ cm_, int_4 _p_ idimy_, complex_8 _p_ y_, real_4 _p_ b_, complex_8 _p_ w1_, complex_8 _p_ w2_,
6090 complex_8 _p_ w3_, complex_8 _p_ wd_, complex_8 _p_ ww_, complex_8 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)())
6091 { // ** body not listed **
6424 }
6425
6426 int_4 _ccmpb (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ b_, real_4
6427 _p_ ah_, real_4 _p_ bh_)
6428 { // ** body not listed **
6586 }
6587
6588 int_4 _cfod (int_4 _p_ meth_, real_4 _p_ elco_, real_4 _p_ tesco_)
6589 { // ** body not listed **
6664 }
6665
6666 int_4 _cgeev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ v_, int_4 _p_ ldv_, real_4 _p_
6667 work_, int_4 _p_ job_, int_4 _p_ info_)
6668 { // ** body not listed **
6763 }
6764
6765 int_4 _cgefs (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
6766 complex_8 _p_ work_, int_4 _p_ iwork_)
6767 { // ** body not listed **
6958 }
6959
6960 int_4 _cgeir (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
6961 complex_8 _p_ work_, int_4 _p_ iwork_)
6962 { // ** body not listed **
7172 }
7173
7174 int_4 _chiev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ v_, int_4 _p_ ldv_, real_4 _p_
7175 work_, int_4 _p_ job_, int_4 _p_ info_)
7176 { // ** body not listed **
7289 }
7290
7291 int_4 _chkpr4 (int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ c_, real_4
7292 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 _p_ idmn_, int_4 _p_ ierror_)
7293 { // ** body not listed **
7339 }
7340
7341 int_4 _chkprm (int_4 _p_ intl_, int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_,
7342 real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 (*_cofy)(), int_4 _p_ idmn_,
7343 int_4 _p_ ierror_)
7344 { // ** body not listed **
7399 }
7400
7401 int_4 _chksn4 (int_4 _p_ mbdcnd_, int_4 _p_ nbdcnd_, real_4 _p_ alpha_, real_4 _p_ beta_, int_4 (*_cofx)(), logical_4
7402 _p_ singlr_)
7403 { // ** body not listed **
7428 }
7429
7430 int_4 _chksng (int_4 _p_ mbdcnd_, int_4 _p_ nbdcnd_, real_4 _p_ alpha_, real_4 _p_ beta_, real_4 _p_ gama_, real_4 _p_
7431 xnu_, int_4 (*_cofx)(), int_4 (*_cofy)(), logical_4 _p_ singlr_)
7432 { // ** body not listed **
7471 }
7472
7473 int_4 _cmpcsg (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, complex_8 _p_ a_)
7474 { // ** body not listed **
7507 }
7508
7509 int_4 _cmposd (int_4 _p_ mr_, int_4 _p_ nr_, int_4 _p_ istag_, complex_8 _p_ ba_, complex_8 _p_ bb_, complex_8 _p_ bc_,
7510 complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ w_, complex_8 _p_ d_, complex_8 _p_ tcos_,
7511 complex_8 _p_ p_)
7512 { // ** body not listed **
7934 }
7935
7936 int_4 _cmposn (int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ istag_, int_4 _p_ mixbnd_, complex_8 _p_ a_, complex_8 _p_ bb_,
7937 complex_8 _p_ c_, complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_, complex_8
7938 _p_ w_, complex_8 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_)
7939 { // ** body not listed **
8575 }
8576
8577 int_4 _cmposp (int_4 _p_ m_, int_4 _p_ n_, complex_8 _p_ a_, complex_8 _p_ bb_, complex_8 _p_ c_, complex_8 _p_ q_,
8578 int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_, complex_8 _p_ w_, complex_8 _p_ w2_,
8579 complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_)
8580 { // ** body not listed **
8675 }
8676
8677 int_4 _cmptr3 (int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_, complex_8 _p_ c_, int_4 _p_ k_, complex_8 _p_ y1_,
8678 complex_8 _p_ y2_, complex_8 _p_ y3_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w1_, complex_8 _p_ w2_,
8679 complex_8 _p_ w3_)
8680 { // ** body not listed **
8790 }
8791
8792 int_4 _cmptrx (int_4 _p_ idegbr_, int_4 _p_ idegcr_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_, complex_8 _p_ c_
8793 , complex_8 _p_ y_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w_)
8794 { // ** body not listed **
8847 }
8848
8849 int_4 _cnbco (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_4
8850 _p_ rcond_, complex_8 _p_ z_)
8851 { // ** body not listed **
8884 }
8885
8886 s_ = ({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
8887 (zdum__1_));}) / ({complex_8 zdum__1_ = ek_ - z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
8888 (zdum__1_));});
8889 (void) _csscal (n_, &s_, z_, &_k1);
8890 ek_ = CMPLXF (s_, 0.0) * ek_;
8891 _l30:;
8892 wk_ = ek_ - z_[k_ - 1];
8893 wkm_ = -ek_ - z_[k_ - 1];
8894 s_ = ({complex_8 zdum__1_ = wk_; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8895 sm_ = ({complex_8 zdum__1_ = wkm_; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8896 if (({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
8897 (zdum__1_));}) == 0.0e0) {
8898 goto _l40;
8899 }
8900 wk_ = wk_ / conjf (abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]);
8901 wkm_ = wkm_ / conjf (abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]);
8902 goto _l50;
8903 _l40:;
8904 wk_ = CMPLXF (1.0, 0.0);
8905 wkm_ = CMPLXF (1.0, 0.0);
8906 _l50:;
8907 kp1_ = k_ + 1;
8908 ju_ = _min (_max (ju_, (*mu_) + ipvt_[k_ - 1]), (*n_));
8909 mm_ = ml1_;
8910 if (kp1_ > ju_) {
8911 goto _l90;
8912 }
8913
8914 for (i_ = kp1_; i_ <= ju_; (i_)++) {
8915 mm_ = mm_ + 1;
8916 sm_ = sm_ + ({complex_8 zdum__1_ = z_[i_ - 1] + wkm_ * conjf (abe_[k_ - 1 + ((*lda_)) * ((mm_ - 1))]); _abs ((real_4)
8917 (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8918 z_[i_ - 1] = z_[i_ - 1] + wk_ * conjf (abe_[k_ - 1 + ((*lda_)) * ((mm_ - 1))]);
8919 s_ = s_ + ({complex_8 zdum__1_ = z_[i_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8920 }
8921
8922 if (s_ >= sm_) {
8923 goto _l80;
8924 }
8925
8926 t_ = wkm_ - wk_;
8927 wk_ = wkm_;
8928 mm_ = ml1_;
8929 for (i_ = kp1_; i_ <= ju_; (i_)++) {
8930 mm_ = mm_ + 1;
8931 z_[i_ - 1] = z_[i_ - 1] + t_ * conjf (abe_[k_ - 1 + ((*lda_)) * ((mm_ - 1))]);
8932 }
8933
8934 _l80:;
8935 _l90:;
8936 z_[k_ - 1] = wk_;
8937 }
8938
8939 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8940 (void) _csscal (n_, &s_, z_, &_k1);
8941 for (kb_ = 1; kb_ <= (*n_); (kb_)++) {
8942 k_ = (*n_) + 1 - kb_;
8943 nl_ = _min ((*ml_), (*n_) - k_);
8944 if (k_ < (*n_)) {
8945 z_[k_ - 1] = z_[k_ - 1] + _cdotc (&nl_, &abe_[k_ + nl_ - 1 + ((*lda_)) * ((ml1_ - nl_ - 1))], ($0_ = -ldb_, &$0_),
8946 &z_[k_ + 1 - 1], &_k1);
8947 }
8948 if (({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}) <= 1.0e0) {
8949 goto _l110;
8950 }
8951
8952 s_ = 1.0e0 / ({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8953 (void) _csscal (n_, &s_, z_, &_k1);
8954 _l110:;
8955 l_ = ipvt_[k_ - 1];
8956 t_ = z_[l_ - 1];
8957 z_[l_ - 1] = z_[k_ - 1];
8958 z_[k_ - 1] = t_;
8959 }
8960
8961 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8962 (void) _csscal (n_, &s_, z_, &_k1);
8963 ynorm_ = 1.0;
8964 for (k_ = 1; k_ <= (*n_); (k_)++) {
8965 l_ = ipvt_[k_ - 1];
8966 t_ = z_[l_ - 1];
8967 z_[l_ - 1] = z_[k_ - 1];
8968 z_[k_ - 1] = t_;
8969 nl_ = _min ((*ml_), (*n_) - k_);
8970 if (k_ < (*n_)) {
8971 (void) _caxpy (&nl_, &t_, &abe_[k_ + nl_ - 1 + ((*lda_)) * ((ml1_ - nl_ - 1))], ($1_ = -ldb_, &$1_), &z_[k_ + 1 - 1],
8972 &_k1);
8973 }
8974 if (({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}) <= 1.0e0) {
8975 goto _l130;
8976 }
8977
8978 s_ = 1.0e0 / ({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8979 (void) _csscal (n_, &s_, z_, &_k1);
8980 ynorm_ = s_ * ynorm_;
8981 _l130:;
8982 }
8983
8984 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8985 (void) _csscal (n_, &s_, z_, &_k1);
8986 ynorm_ = s_ * ynorm_;
8987 for (kb_ = 1; kb_ <= (*n_); (kb_)++) {
8988 k_ = (*n_) + 1 - kb_;
8989 if (({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}) <= ({complex_8
8990 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}))
8991 {
8992 goto _l150;
8993 }
8994
8995 s_ = ({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
8996 (zdum__1_));}) / ({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8997 (void) _csscal (n_, &s_, z_, &_k1);
8998 ynorm_ = s_ * ynorm_;
8999 _l150:;
9000 if (({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
9001 (zdum__1_));}) != 0.0e0) {
9002 z_[k_ - 1] = z_[k_ - 1] / abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))];
9003 }
9004
9005 if (({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
9006 (zdum__1_));}) == 0.0e0) {
9007 z_[k_ - 1] = 1.0;
9008 }
9009
9010 lm_ = _min (k_, m_) - 1;
9011 lz_ = k_ - lm_;
9012 t_ = -z_[k_ - 1];
9013 (void) _caxpy (&lm_, &t_, &abe_[k_ - 1 - 1 + ((*lda_)) * (((*ml_) + 2 - 1))], ($2_ = -ldb_, &$2_), &z_[lz_ - 1], &_k1)
9014 ;
9015 }
9016
9017 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
9018 (void) _csscal (n_, &s_, z_, &_k1);
9019 ynorm_ = s_ * ynorm_;
9020 if (anorm_ != 0.0e0) {
9021 (*rcond_) = ynorm_ / anorm_;
9022 }
9023
9024 if (anorm_ == 0.0e0) {
9025 (*rcond_) = 0.0;
9026 }
9027
9028 __calls[33].calls++;
9029 return 0;
9030 }
9031
9032 int_4 _cnbdi (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
9033 complex_8 _p_ det_)
9034 { // ** body not listed **
9052 }
9053
9054 det_[0] = CMPLXF (ten_, 0.0) * det_[0];
9055 det_[1] = det_[1] - CMPLXF (1.0, 0.0);
9056 goto _l10;
9057 _l20:;
9058 _l30:;
9059 if (({complex_8 zdum__1_ = det_[0]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}) < ten_) {
9060 goto _l40;
9061 }
9062
9063 det_[0] = det_[0] / CMPLXF (ten_, 0.0);
9064 det_[1] = det_[1] + CMPLXF (1.0, 0.0);
9065 goto _l30;
9066 _l40:;
9067 }
9068
9069 _l60:;
9070 __calls[34].calls++;
9071 return 0;
9072 }
9073
9074 int_4 _cnbfa (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, int_4
9075 _p_ info_)
9076 { // ** body not listed **
9124 }
9125
9126 _l50:;
9127 ipvt_[(*n_) - 1] = (*n_);
9128 if (({complex_8 zdum__1_ = abe_[(*n_) - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs
9129 (cimagf (zdum__1_));}) == 0.0e0) {
9130 (*info_) = (*n_);
9131 }
9132
9133 __calls[35].calls++;
9134 return 0;
9135 }
9136
9137 int_4 _cnbfs (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, complex_8 _p_ v_, int_4
9138 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_)
9139 { // ** body not listed **
9416 }
9417
9418 int_4 _cnbir (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, complex_8 _p_ v_, int_4
9419 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_)
9420 { // ** body not listed **
9721 }
9722
9723 int_4 _cnbsl (complex_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_,
9724 complex_8 _p_ b_, int_4 _p_ job_)
9725 { // ** body not listed **
9795 }
9796
9797 int_4 _compb (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ b_, real_4
9798 _p_ ah_, real_4 _p_ bh_)
9799 { // ** body not listed **
9957 }
9958
9959 int_4 _cosgen (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, real_4 _p_ a_)
9960 { // ** body not listed **
9993 }
9994
9995 int_4 _cpadd (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ a_, real_4 _p_ c_, complex_8 _p_ cbp_, real_4 _p_ bp_, real_4
9996 _p_ bh_)
9997 { // ** body not listed **
10283 }
10284
10285 int_4 _cpevl (int_4 _p_ n_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ z_, complex_8 _p_ c_, complex_8 _p_ b_,
10286 logical_4 _p_ kbd_)
10287 { // ** body not listed **
10346 }
10347
10348 int_4 _cpevlr (int_4 _p_ n_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ c_)
10349 { // ** body not listed **
10369 }
10370
10371 int_4 _cpofs (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
10372 complex_8 _p_ work_)
10373 { // ** body not listed **
10565 }
10566
10567 int_4 _cpoir (complex_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, complex_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_,
10568 complex_8 _p_ work_)
10569 { // ** body not listed **
10784 }
10785
10786 int_4 _cpqr79 (int_4 _p_ ndeg_, complex_8 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_)
10787 { // ** body not listed **
10838 }
10839
10840 int_4 _cproc (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4
10841 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
10842 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, real_4 _p_ yy_)
10843 { // ** body not listed **
10996 }
10997
10998 int_4 _cprocp (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_,
10999 int_4 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
11000 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, real_4 _p_ yy_)
11001 { // ** body not listed **
11183 }
11184
11185 int_4 _cprod (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4
11186 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ yy_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_,
11187 complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ y_)
11188 { // ** body not listed **
11344 }
11345
11346 int_4 _cprodp (int_4 _p_ nd_, complex_8 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_,
11347 int_4 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ yy_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_
11348 , complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ y_)
11349 { // ** body not listed **
11534 }
11535
11536 int_4 _cpzero (int_4 _p_ in_, complex_8 _p_ a_, complex_8 _p_ r_, complex_8 _p_ t_, int_4 _p_ iflg_, real_4 _p_ s_)
11537 { // ** body not listed **
11658 }
11659
11660 int_4 _crati (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ n_, complex_8 _p_ cy_, real_4 _p_ tol_)
11661 { // ** body not listed **
11770 }
11771
11772 int_4 _cs1s2 (complex_8 _p_ zr_, complex_8 _p_ s1_, complex_8 _p_ s2_, int_4 _p_ nz_, real_4 _p_ ascle_, real_4 _p_
11773 alim_, int_4 _p_ iuf_)
11774 { // ** body not listed **
11824 }
11825
11826 int_4 _cscale (real_4 _p_ a_, int_4 _p_ nrda_, int_4 _p_ nrow_, int_4 _p_ ncol_, real_4 _p_ cols_, real_4 _p_ colsav_,
11827 real_4 _p_ rows_, real_4 _p_ rowsav_, real_4 _p_ anorm_, real_4 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
11828 { // ** body not listed **
11912 }
11913
11914 int_4 _cshch (complex_8 _p_ z_, complex_8 _p_ csh_, complex_8 _p_ cch_)
11915 { // ** body not listed **
11931 }
11932
11933 int_4 _cuchk (complex_8 _p_ y_, int_4 _p_ nz_, real_4 _p_ ascle_, real_4 _p_ tol_)
11934 { // ** body not listed **
11953 }
11954
11955 int_4 _cunhj (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ ipmtr_, real_4 _p_ tol_, complex_8 _p_ phi_, complex_8 _p_
11956 arg_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ asum_, complex_8 _p_ bsum_)
11957 { // ** body not listed **
15212 }
15213
15214 int_4 _cunik (complex_8 _p_ zr_, real_4 _p_ fnu_, int_4 _p_ ikflg_, int_4 _p_ ipmtr_, real_4 _p_ tol_, int_4 _p_ init_,
15215 complex_8 _p_ phi_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ sum_, complex_8 _p_ cwrk_)
15216 { // ** body not listed **
15969 }
15970
15971 real_4 _cv (real_4 _p_ xval_, int_4 _p_ ndata_, int_4 _p_ nconst_, int_4 _p_ nord_, int_4 _p_ nbkpt_, real_4 _p_ bkpt_,
15972 real_4 _p_ w_)
15973 { // ** body not listed **
16003 }
16004
16005 int_4 _d1merg (real_8 _p_ tcos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_)
16006 { // ** body not listed **
16045 }
16046
16047 int_4 _d1mpyq (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ a_, int_4 _p_ lda_, real_8 _p_ v_, real_8 _p_ w_)
16048 { // ** body not listed **
16111 }
16112
16113 int_4 _d1updt (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ s_, int_4 _p_ ls_, real_8 _p_ u_, real_8 _p_ v_, real_8 _p_ w_,
16114 logical_4 _p_ sing_)
16115 { // ** body not listed **
16246 }
16247
16248 int_4 _dasyik (real_8 _p_ x_, real_8 _p_ fnu_, int_4 _p_ kode_, real_8 _p_ flgik_, real_8 _p_ ra_, real_8 _p_ arg_,
16249 int_4 _p_ in_, real_8 _p_ y_)
16250 { // ** body not listed **
16659 }
16660
16661 int_4 _davint (real_8 _p_ x_, real_8 _p_ y_, int_4 _p_ n_, real_8 _p_ xlo_, real_8 _p_ xup_, real_8 _p_ ans_, int_4 _p_
16662 ierr_)
16663 { // ** body not listed **
16807 }
16808
16809 int_4 _dbdiff (int_4 _p_ l_, real_8 _p_ v_)
16810 { // ** body not listed **
16825 }
16826
16827 int_4 _dbksol (int_4 _p_ n_, real_8 _p_ a_, real_8 _p_ x_)
16828 { // ** body not listed **
16845 }
16846
16847 int_4 _dbndac (real_8 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, int_4 _p_ mt_, int_4 _p_ jt_
16848 )
16849 { // ** body not listed **
16925 }
16926
16927 int_4 _dbndsl (int_4 _p_ mode_, real_8 _p_ g_, int_4 _p_ mdg_, int_4 _p_ nb_, int_4 _p_ ip_, int_4 _p_ ir_, real_8 _p_
16928 x_, int_4 _p_ n_, real_8 _p_ rnorm_)
16929 { // ** body not listed **
17017 }
17018
17019 int_4 _dbocls (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mcon_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_8 _p_ bl_,
17020 real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnormc_, real_8 _p_ rnorm_, int_4 _p_ mode_,
17021 real_8 _p_ rw_, int_4 _p_ iw_)
17022 { // ** body not listed **
18547 }
18548
18549 int_4 _dbols (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_8 _p_ bl_, real_8 _p_ bu_, int_4
18550 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ rw_, int_4 _p_ iw_)
18551 { // ** body not listed **
19883 }
19884
19885 int_4 _dbolsm (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ minput_, int_4 _p_ ncols_, real_8 _p_ bl_, real_8 _p_ bu_,
19886 int_4 _p_ ind_, int_4 _p_ iopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ rw_, real_8 _p_ ww_,
19887 real_8 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_)
19888 { // ** body not listed **
21605 }
21606 int_4 _dbsgq8 (real_8 (*_fun)(), real_8 _p_ xt_, real_8 _p_ bc_, int_4 _p_ n_, int_4 _p_ kk_, int_4 _p_ id_, real_8 _p_
21607 a_, real_8 _p_ b_, int_4 _p_ inbv_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_, real_8 _p_ work_)
21608 { // ** body not listed **
21879 }
21880
21881 int_4 _dcfod (int_4 _p_ meth_, real_8 _p_ elco_, real_8 _p_ tesco_)
21882 { // ** body not listed **
21957 }
21958
21959 int_4 _dckder (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_ fjac_, int_4 _p_ ldfjac_, real_8
21960 _p_ xp_, real_8 _p_ fvecp_, int_4 _p_ mode_, real_8 _p_ err_)
21961 { // ** body not listed **
22033 }
22034
22035 int_4 _dcoef (real_8 _p_ yh_, real_8 _p_ yp_, int_4 _p_ ncomp_, int_4 _p_ nrowb_, int_4 _p_ nfc_, int_4 _p_ nic_,
22036 real_8 _p_ b_, real_8 _p_ beta_, real_8 _p_ coef_, int_4 _p_ inhomo_, real_8 _p_ re_, real_8 _p_ ae_, real_8 _p_ by_,
22037 real_8 _p_ cvec_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_)
22038 { // ** body not listed **
22172 }
22173
22174 int_4 _dcov (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_
22175 r_, int_4 _p_ ldr_, int_4 _p_ info_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_)
22176 { // ** body not listed **
22315 }
22316
22317 int_4 _dcscal (real_8 _p_ a_, int_4 _p_ nrda_, int_4 _p_ nrow_, int_4 _p_ ncol_, real_8 _p_ cols_, real_8 _p_ colsav_,
22318 real_8 _p_ rows_, real_8 _p_ rowsav_, real_8 _p_ anorm_, real_8 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
22319 { // ** body not listed **
22403 }
22404
22405 real_8 _dcv (real_8 _p_ xval_, int_4 _p_ ndata_, int_4 _p_ nconst_, int_4 _p_ nord_, int_4 _p_ nbkpt_, real_8 _p_ bkpt_
22406 , real_8 _p_ w_)
22407 { // ** body not listed **
22437 }
22438
22439 int_4 _ddes (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ t_, real_8 _p_ y_, real_8 _p_ tout_, int_4 _p_ info_, real_8
22440 _p_ rtol_, real_8 _p_ atol_, int_4 _p_ idid_, real_8 _p_ ypout_, real_8 _p_ yp_, real_8 _p_ yy_, real_8 _p_ wt_, real_8
22441 _p_ p_, real_8 _p_ phi_, real_8 _p_ alpha_, real_8 _p_ beta_, real_8 _p_ psi_, real_8 _p_ v_, real_8 _p_ w_, real_8 _p_
22442 sig_, real_8 _p_ g_, real_8 _p_ gi_, real_8 _p_ h_, real_8 _p_ eps_, real_8 _p_ x_, real_8 _p_ xold_, real_8 _p_ hold_,
22443 real_8 _p_ told_, real_8 _p_ delsgn_, real_8 _p_ tstop_, real_8 _p_ twou_, real_8 _p_ fouru_, logical_4 _p_ start_,
22444 logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4 _p_
22445 kord_, int_4 _p_ kold_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kle4_, int_4 _p_ iquit_, int_4 _p_ kprev_, int_4
22446 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_8 _p_ rpar_, int_4 _p_ ipar_)
22447 { // ** body not listed **
23326 }
23327
23328 int_4 _ddoglg (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ lr_, real_8 _p_ diag_, real_8 _p_ qtb_, real_8 _p_ delta_, real_8
23329 _p_ x_, real_8 _p_ wa1_, real_8 _p_ wa2_)
23330 { // ** body not listed **
23439 }
23440
23441 int_4 _defcmn (int_4 _p_ ndata_, real_8 _p_ xdata_, real_8 _p_ ydata_, real_8 _p_ sddata_, int_4 _p_ nord_, int_4 _p_
23442 nbkpt_, real_8 _p_ bkptin_, int_4 _p_ mdein_, int_4 _p_ mdeout_, real_8 _p_ coeff_, real_8 _p_ bf_, real_8 _p_ xtemp_,
23443 real_8 _p_ ptemp_, real_8 _p_ bkpt_, real_8 _p_ g_, int_4 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ lw_)
23444 { // ** body not listed **
23639 }
23640
23641 int_4 _defe4 (int_4 (*_cofx)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_)
23642 { // ** body not listed **
23674 }
23675
23676 int_4 _defehl (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ t_, real_4 _p_ y_, real_4 _p_ h_, real_4 _p_ yp_, real_4 _p_
23677 f1_, real_4 _p_ f2_, real_4 _p_ f3_, real_4 _p_ f4_, real_4 _p_ f5_, real_4 _p_ ys_, real_4 _p_ rpar_, int_4 _p_ ipar_)
23678 { // ** body not listed **
23716 }
23717
23718 int_4 _defer (int_4 (*_cofx)(), int_4 (*_cofy)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_)
23719 { // ** body not listed **
23753 }
23754
23755 real_8 _denorm (int_4 _p_ n_, real_8 _p_ x_)
23756 { // ** body not listed **
23853 }
23854
23855 int_4 _derkfs (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ t_, real_4 _p_ y_, real_4 _p_ tout_, int_4 _p_ info_, real_4
23856 _p_ rtol_, real_4 _p_ atol_, int_4 _p_ idid_, real_4 _p_ h_, real_4 _p_ tolfac_, real_4 _p_ yp_, real_4 _p_ f1_, real_4
23857 _p_ f2_, real_4 _p_ f3_, real_4 _p_ f4_, real_4 _p_ f5_, real_4 _p_ ys_, real_4 _p_ told_, real_4 _p_ dtsign_, real_4
23858 _p_ u26_, real_4 _p_ rer_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kop_, int_4 _p_ iquit_, logical_4 _p_ stiff_,
23859 logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_4 _p_ rpar_, int_4 _p_ ipar_)
23860 { // ** body not listed **
24700 }
24701
24702 int_4 _des (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ t_, real_4 _p_ y_, real_4 _p_ tout_, int_4 _p_ info_, real_4 _p_
24703 rtol_, real_4 _p_ atol_, int_4 _p_ idid_, real_4 _p_ ypout_, real_4 _p_ yp_, real_4 _p_ yy_, real_4 _p_ wt_, real_4 _p_
24704 p_, real_4 _p_ phi_, real_4 _p_ alpha_, real_4 _p_ beta_, real_4 _p_ psi_, real_4 _p_ v_, real_4 _p_ w_, real_4 _p_
24705 sig_, real_4 _p_ g_, real_4 _p_ gi_, real_4 _p_ h_, real_4 _p_ eps_, real_4 _p_ x_, real_4 _p_ xold_, real_4 _p_ hold_,
24706 real_4 _p_ told_, real_4 _p_ delsgn_, real_4 _p_ tstop_, real_4 _p_ twou_, real_4 _p_ fouru_, logical_4 _p_ start_,
24707 logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4 _p_
24708 kord_, int_4 _p_ kold_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kle4_, int_4 _p_ iquit_, int_4 _p_ kprev_, int_4
24709 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_4 _p_ rpar_, int_4 _p_ ipar_)
24710 { // ** body not listed **
25590 }
25591
25592 int_4 _dfcmn (int_4 _p_ ndata_, real_8 _p_ xdata_, real_8 _p_ ydata_, real_8 _p_ sddata_, int_4 _p_ nord_, int_4 _p_
25593 nbkpt_, real_8 _p_ bkptin_, int_4 _p_ nconst_, real_8 _p_ xconst_, real_8 _p_ yconst_, int_4 _p_ nderiv_, int_4 _p_
25594 mode_, real_8 _p_ coeff_, real_8 _p_ bf_, real_8 _p_ xtemp_, real_8 _p_ ptemp_, real_8 _p_ bkpt_, real_8 _p_ g_, int_4
25595 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, real_8 _p_ work_, int_4 _p_ iwork_)
25596 { // ** body not listed **
25961 }
25962
25963 int_4 _dfdjc1 (int_4 (*_fcn)(), int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_ fjac_, int_4 _p_ ldfjac_,
25964 int_4 _p_ iflag_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ epsfcn_, real_8 _p_ wa1_, real_8 _p_ wa2_)
25965 { // ** body not listed **
26037 }
26038
26039 int_4 _dfdjc3 (int_4 (*_fcn)(), int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_ fjac_, int_4
26040 _p_ ldfjac_, int_4 _p_ iflag_, real_8 _p_ epsfcn_, real_8 _p_ wa_)
26041 { // ** body not listed **
26079 }
26080
26081 int_4 _dfehl (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ t_, real_8 _p_ y_, real_8 _p_ h_, real_8 _p_ yp_, real_8 _p_
26082 f1_, real_8 _p_ f2_, real_8 _p_ f3_, real_8 _p_ f4_, real_8 _p_ f5_, real_8 _p_ ys_, real_8 _p_ rpar_, int_4 _p_ ipar_)
26083 { // ** body not listed **
26121 }
26122
26123 int_4 _dfspvd (real_8 _p_ t_, int_4 _p_ k_, real_8 _p_ x_, int_4 _p_ ileft_, real_8 _p_ vnikx_, int_4 _p_ nderiv_)
26124 { // ** body not listed **
26190 }
26191
26192 int_4 _dfspvn (real_8 _p_ t_, int_4 _p_ jhigh_, int_4 _p_ index_, real_8 _p_ x_, int_4 _p_ ileft_, real_8 _p_ vnikx_)
26193 { // ** body not listed **
26296 }
26297
26298 int_4 _dfulmt (int_4 _p_ i_, int_4 _p_ j_, real_8 _p_ aij_, int_4 _p_ indcat_, real_8 _p_ prgopt_, real_8 _p_ dattrv_,
26299 int_4 _p_ iflag_)
26300 { // ** body not listed **
26371 }
26372
26373 int_4 _dfzero (real_8 (*_f)(), real_8 _p_ b_, real_8 _p_ c_, real_8 _p_ r_, real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_
26374 iflag_)
26375 { // ** body not listed **
26505 }
26506
26507 int_4 _dgaus8 (real_8 (*_fun)(), real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_)
26508 { // ** body not listed **
26759 }
26760
26761 int_4 _dgefs (real_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_8 _p_
26762 work_, int_4 _p_ iwork_)
26763 { // ** body not listed **
26954 }
26955
26956 int_4 _dglss (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
26957 real_8 _p_ rnorm_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
26958 { // ** body not listed **
26986 }
26987
26988 int_4 _dh12 (int_4 _p_ mode_, int_4 _p_ lpivot_, int_4 _p_ l1_, int_4 _p_ m_, real_8 _p_ u_, int_4 _p_ iue_, real_8 _p_
26989 up_, real_8 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_)
26990 { // ** body not listed **
27092 }
27093
27094 int_4 _dhfti (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
27095 real_8 _p_ tau_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ g_, int_4 _p_ ip_)
27096 { // ** body not listed **
27280 }
27281
27282 int_4 _dhstrt (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ a_, real_8 _p_ b_, real_8 _p_ y_, real_8 _p_ yprime_, real_8
27283 _p_ etol_, int_4 _p_ morder_, real_8 _p_ small_, real_8 _p_ big_, real_8 _p_ spy_, real_8 _p_ pv_, real_8 _p_ yp_,
27284 real_8 _p_ sf_, real_8 _p_ rpar_, int_4 _p_ ipar_, real_8 _p_ h_)
27285 { // ** body not listed **
27430 }
27431
27432 real_8 _dhvnrm (real_8 _p_ v_, int_4 _p_ ncomp_)
27433 { // ** body not listed **
27442 }
27443
27444 int_4 _djairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ ai_, real_8 _p_ dai_)
27445 { // ** body not listed **
29034 }
29035
29036 int_4 _dllsia (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
29037 real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_,
29038 real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
29039 { // ** body not listed **
29288 }
29289
29290 int_4 _dlpdp (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n1_, int_4 _p_ n2_, real_8 _p_ prgopt_, real_8 _p_
29291 x_, real_8 _p_ wnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ is_)
29292 { // ** body not listed **
29451 }
29452
29453 int_4 _dlsei (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_8 _p_
29454 prgopt_, real_8 _p_ x_, real_8 _p_ rnorme_, real_8 _p_ rnorml_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_)
29455 { // ** body not listed **
29959 }
29960
29961 int_4 _dlsi (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_8 _p_ prgopt_, real_8 _p_
29962 x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_)
29963 { // ** body not listed **
30180 }
30181
30182 int_4 _dlssud (real_8 _p_ a_, real_8 _p_ x_, real_8 _p_ b_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, real_8 _p_ u_,
30183 int_4 _p_ nrdu_, int_4 _p_ iflag_, int_4 _p_ mlso_, int_4 _p_ irank_, int_4 _p_ iscale_, real_8 _p_ q_, real_8 _p_
30184 diag_, int_4 _p_ kpivot_, real_8 _p_ s_, real_8 _p_ div_, real_8 _p_ td_, int_4 _p_ isflg_, real_8 _p_ scales_)
30185 { // ** body not listed **
30357 }
30358
30359 int_4 _dmacon (void)
30360 { // ** body not listed **
30376 }
30377
30378 int_4 _dmgsbv (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ a_, int_4 _p_ ia_, int_4 _p_ niv_, int_4 _p_ iflag_, real_8 _p_
30379 s_, real_8 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_8 _p_ v_, real_8 _p_ w_, real_8 _p_ wcnd_)
30380 { // ** body not listed **
30619 }
30620
30621 int_4 _dmpar (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ ldr_, int_4 _p_ ipvt_, real_8 _p_ diag_, real_8 _p_ qtb_, real_8
30622 _p_ delta_, real_8 _p_ par_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa1_, real_8 _p_ wa2_)
30623 { // ** body not listed **
30782 }
30783
30784 int_4 _dnbco (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_8 _p_
30785 rcond_, real_8 _p_ z_)
30786 { // ** body not listed **
30935 }
30936
30937 int_4 _dnbdi (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_8 _p_
30938 det_)
30939 { // ** body not listed **
30973 }
30974
30975 int_4 _dnbfa (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, int_4 _p_
30976 info_)
30977 { // ** body not listed **
31032 }
31033
31034 int_4 _dnbfs (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ v_, int_4 _p_
31035 itask_, int_4 _p_ ind_, real_8 _p_ work_, int_4 _p_ iwork_)
31036 { // ** body not listed **
31313 }
31314
31315 int_4 _dnbsl (real_8 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_8 _p_
31316 b_, int_4 _p_ job_)
31317 { // ** body not listed **
31387 }
31388
31389 int_4 _dnls1e (real_8 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8
31390 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_8 _p_ wa_, int_4 _p_ lwa_)
31391 { // ** body not listed **
31441 }
31442
31443 int_4 _dnls1 (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8 _p_
31444 fjac_, int_4 _p_ ldfjac_, real_8 _p_ ftol_, real_8 _p_ xtol_, real_8 _p_ gtol_, int_4 _p_ maxfev_, real_8 _p_ epsfcn_,
31445 real_8 _p_ diag_, int_4 _p_ mode_, real_8 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_, int_4 _p_
31446 njev_, int_4 _p_ ipvt_, real_8 _p_ qtf_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_ wa4_)
31447 { // ** body not listed **
32020 }
32021
32022 int_4 _dnsqe (real_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8
32023 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_8 _p_ wa_, int_4 _p_ lwa_)
32024 { // ** body not listed **
32080 }
32081
32082 int_4 _dnsq (int_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ fvec_, real_8
32083 _p_ fjac_, int_4 _p_ ldfjac_, real_8 _p_ xtol_, int_4 _p_ maxfev_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ epsfcn_,
32084 real_8 _p_ diag_, int_4 _p_ mode_, real_8 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_, int_4 _p_
32085 njev_, real_8 _p_ r_, int_4 _p_ lr_, real_8 _p_ qtf_, real_8 _p_ wa1_, real_8 _p_ wa2_, real_8 _p_ wa3_, real_8 _p_
32086 wa4_)
32087 { // ** body not listed **
32400 }
32401
32402 int_4 _dohtrl (real_8 _p_ q_, int_4 _p_ n_, int_4 _p_ nrda_, real_8 _p_ diag_, int_4 _p_ irank_, real_8 _p_ div_,
32403 real_8 _p_ td_)
32404 { // ** body not listed **
32437 }
32438
32439 int_4 _dorthr (real_8 _p_ a_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, int_4 _p_ iflag_, int_4 _p_ irank_, int_4
32440 _p_ iscale_, real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ scales_, real_8 _p_ rows_, real_8 _p_ rs_)
32441 { // ** body not listed **
32547 }
32548
32549 int_4 _dp1vlu (int_4 _p_ l_, int_4 _p_ nder_, real_8 _p_ x_, real_8 _p_ yfit_, real_8 _p_ yp_, real_8 _p_ a_)
32550 { // ** body not listed **
32723 }
32724
32725 int_4 _dpchng (int_4 _p_ ii_, real_8 _p_ xval_, int_4 _p_ iplace_, real_8 _p_ sx_, int_4 _p_ ix_, int_4 _p_ ircx_)
32726 { // ** body not listed **
32936 }
32937
32938 int_4 _dpcoef (int_4 _p_ l_, real_8 _p_ c_, real_8 _p_ tc_, real_8 _p_ a_)
32939 { // ** body not listed **
32968 }
32969
32970 int_4 _dpincw (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ npp_, int_4 _p_ jstrt_,
32971 int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_,
32972 real_8 _p_ costsc_, real_8 _p_ gg_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_ amat_, real_8 _p_ basmat_,
32973 real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ costs_, real_8 _p_ colnrm_,
32974 real_8 _p_ duals_, logical_4 _p_ stpedg_)
32975 { // ** body not listed **
33107 }
33108
33109 int_4 _dpinit (int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_,
33110 real_8 _p_ primal_, int_4 _p_ info_, real_8 _p_ amat_, real_8 _p_ csc_, real_8 _p_ costsc_, real_8 _p_ colnrm_, real_8
33111 _p_ xlamda_, real_8 _p_ anorm_, real_8 _p_ rhs_, real_8 _p_ rhsnrm_, int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_
33112 , logical_4 _p_ lopt_)
33113 { // ** body not listed **
33385 }
33386
33387 int_4 _dpintm (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ sx_, int_4 _p_ ix_, int_4 _p_ lmx_, int_4 _p_ ipagef_)
33388 { // ** body not listed **
33461 }
33462
33463 int_4 _dplint (int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ c_)
33464 { // ** body not listed **
33495 }
33496
33497 int_4 _dplpce (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ itlp_, int_4 _p_ itbrc_,
33498 int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_,
33499 real_8 _p_ erdnrm_, real_8 _p_ eps_, real_8 _p_ tune_, real_8 _p_ gg_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_
33500 csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ primal_, real_8 _p_ erd_, real_8 _p_ erp_, logical_4 _p_ singlr_,
33501 logical_4 _p_ redbas_)
33502 { // ** body not listed **
33695 }
33696
33697 int_4 _dplpdm (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4 _p_ info_,
33698 int_4 _p_ iopt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_,
33699 int_4 _p_ ibb_, real_8 _p_ anorm_, real_8 _p_ eps_, real_8 _p_ uu_, real_8 _p_ gg_, real_8 _p_ amat_, real_8 _p_
33700 basmat_, real_8 _p_ csc_, real_8 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_)
33701 { // ** body not listed **
33798 }
33799
33800 int_4 _dplpfe (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ ienter_, int_4 _p_
33801 ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_8 _p_
33802 erdnrm_, real_8 _p_ eps_, real_8 _p_ gg_, real_8 _p_ dulnrm_, real_8 _p_ dirnrm_, real_8 _p_ amat_, real_8 _p_ basmat_,
33803 real_8 _p_ csc_, real_8 _p_ wr_, real_8 _p_ ww_, real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ rz_, real_8 _p_ rg_, real_8
33804 _p_ colnrm_, real_8 _p_ duals_, logical_4 _p_ found_)
33805 { // ** body not listed **
33954 }
33955
33956 int_4 _dplpfl (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ ibasis_, int_4 _p_
33957 ind_, int_4 _p_ ibb_, real_8 _p_ theta_, real_8 _p_ dirnrm_, real_8 _p_ rprnrm_, real_8 _p_ csc_, real_8 _p_ ww_,
33958 real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ erp_, real_8 _p_ rprim_, real_8 _p_ primal_, logical_4 _p_ finite_,
33959 logical_4 _p_ zerolv_)
33960 { // ** body not listed **
34110 }
34111
34112 int_4 _dplpmn (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ prgopt_, real_8
34113 _p_ dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ primal_, real_8 _p_ duals_,
34114 real_8 _p_ amat_, real_8 _p_ csc_, real_8 _p_ colnrm_, real_8 _p_ erd_, real_8 _p_ erp_, real_8 _p_ basmat_, real_8 _p_
34115 wr_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ rprim_, real_8 _p_ rhs_, real_8 _p_ ww_, int_4 _p_ lmx_, int_4 _p_ lbm_
34116 , int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_)
34117 { // ** body not listed **
35383 }
35384
35385 int_4 _dplpmu (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4 _p_ info_,
35386 int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ iopt_, int_4 _p_ npp_, int_4 _p_ jstrt_, int_4 _p_ ibasis_, int_4 _p_
35387 imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_8 _p_ anorm_, real_8 _p_
35388 eps_, real_8 _p_ uu_, real_8 _p_ gg_, real_8 _p_ rprnrm_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_ theta_,
35389 real_8 _p_ costsc_, real_8 _p_ xlamda_, real_8 _p_ rhsnrm_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_ csc_,
35390 real_8 _p_ wr_, real_8 _p_ rprim_, real_8 _p_ ww_, real_8 _p_ bu_, real_8 _p_ bl_, real_8 _p_ rhs_, real_8 _p_ erd_,
35391 real_8 _p_ erp_, real_8 _p_ rz_, real_8 _p_ rg_, real_8 _p_ colnrm_, real_8 _p_ costs_, real_8 _p_ primal_, real_8 _p_
35392 duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_)
35393 { // ** body not listed **
35851 }
35852
35853 int_4 _dplpup (int_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ prgopt_, real_8 _p_ dattrv_, real_8
35854 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ amat_, int_4 _p_ imat_, logical_4 _p_ sizeup_,
35855 real_8 _p_ asmall_, real_8 _p_ abig_)
35856 { // ** body not listed **
36397 }
36398
36399 int_4 _dpnnzr (int_4 _p_ i_, real_8 _p_ xval_, int_4 _p_ iplace_, real_8 _p_ sx_, int_4 _p_ ix_, int_4 _p_ ircx_)
36400 { // ** body not listed **
36604 }
36605
36606 int_4 _dpofs (real_8 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_8 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_8 _p_
36607 work_)
36608 { // ** body not listed **
36800 }
36801
36802 int_4 _dpolcf (real_8 _p_ xx_, int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ c_, real_8 _p_ d_, real_8 _p_ work_)
36803 { // ** body not listed **
36842 }
36843
36844 int_4 _dpolft (int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ w_, int_4 _p_ maxdeg_, int_4 _p_ ndeg_, real_8
36845 _p_ eps_, real_8 _p_ r_, int_4 _p_ ierr_, real_8 _p_ a_)
36846 { // ** body not listed **
37155 }
37156
37157 int_4 _dpolvl (int_4 _p_ nder_, real_8 _p_ xx_, real_8 _p_ yfit_, real_8 _p_ yp_, int_4 _p_ n_, real_8 _p_ x_, real_8
37158 _p_ c_, real_8 _p_ work_, int_4 _p_ ierr_)
37159 { // ** body not listed **
37253 }
37254
37255 int_4 _dpopt (real_8 _p_ prgopt_, int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ info_, real_8 _p_ csc_, int_4 _p_
37256 ibasis_, real_8 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_)
37257 { // ** body not listed **
37613 }
37614
37615 int_4 _dpperm (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
37616 { // ** body not listed **
37661 }
37662
37663 int_4 _dppgq8 (real_8 (*_fun)(), int_4 _p_ ldc_, real_8 _p_ c_, real_8 _p_ xi_, int_4 _p_ lxi_, int_4 _p_ kk_, int_4
37664 _p_ id_, real_8 _p_ a_, real_8 _p_ b_, int_4 _p_ inppv_, real_8 _p_ err_, real_8 _p_ ans_, int_4 _p_ ierr_)
37665 { // ** body not listed **
37936 }
37937
37938 real_8 _dprvec (int_4 _p_ m_, real_8 _p_ u_, real_8 _p_ v_)
37939 { // ** body not listed **
37950 }
37951
37952 int_4 _dprwpg (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_)
37953 { // ** body not listed **
37973 }
37974
37975 int_4 _dprwvr (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_)
37976 { // ** body not listed **
38021 }
38022
38023 real_8 _dpsixn (int_4 _p_ n_)
38024 { // ** body not listed **
38623 }
38624
38625 int_4 _dpsort (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
38626 { // ** body not listed **
38782 }
38783
38784 real_8 _dqdota (int_4 _p_ n_, real_8 _p_ db_, int_4 _p_ qc_, real_8 _p_ dx_, int_4 _p_ incx_, real_8 _p_ dy_, int_4 _p_
38785 incy_)
38786 { // ** body not listed **
38833 }
38834
38835 real_8 _dqdoti (int_4 _p_ n_, real_8 _p_ db_, int_4 _p_ qc_, real_8 _p_ dx_, int_4 _p_ incx_, real_8 _p_ dy_, int_4 _p_
38836 incy_)
38837 { // ** body not listed **
38885 }
38886
38887 int_4 _dqform (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ q_, int_4 _p_ ldq_, real_8 _p_ wa_)
38888 { // ** body not listed **
38954 }
38955
38956 int_4 _dqrfac (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ a_, int_4 _p_ lda_, logical_4 _p_ pivot_, int_4 _p_ ipvt_, int_4
38957 _p_ lipvt_, real_8 _p_ sigma_, real_8 _p_ acnorm_, real_8 _p_ wa_)
38958 { // ** body not listed **
39061 }
39062
39063 int_4 _dqrslv (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ ldr_, int_4 _p_ ipvt_, real_8 _p_ diag_, real_8 _p_ qtb_, real_8
39064 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa_)
39065 { // ** body not listed **
39174 }
39175
39176 int_4 _drc3jj (real_8 _p_ l2_, real_8 _p_ l3_, real_8 _p_ m2_, real_8 _p_ m3_, real_8 _p_ l1min_, real_8 _p_ l1max_,
39177 real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
39178 { // ** body not listed **
39456 }
39457
39458 int_4 _drc3jm (real_8 _p_ l1_, real_8 _p_ l2_, real_8 _p_ l3_, real_8 _p_ m1_, real_8 _p_ m2min_, real_8 _p_ m2max_,
39459 real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
39460 { // ** body not listed **
39730 }
39731
39732 int_4 _drc6j (real_8 _p_ l2_, real_8 _p_ l3_, real_8 _p_ l4_, real_8 _p_ l5_, real_8 _p_ l6_, real_8 _p_ l1min_, real_8
39733 _p_ l1max_, real_8 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
39734 { // ** body not listed **
40028 }
40029
40030 real_8 _drc (real_8 _p_ x_, real_8 _p_ y_, int_4 _p_ ier_)
40031 { // ** body not listed **
40404 }
40405
40406 real_8 _drd (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_)
40407 { // ** body not listed **
40884 }
40885
40886 int_4 _dreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
40887 { // ** body not listed **
40992 }
40993
40994 int_4 _dreort (int_4 _p_ ncomp_, real_8 _p_ y_, real_8 _p_ yp_, real_8 _p_ yhp_, int_4 _p_ niv_, real_8 _p_ w_, real_8
40995 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, real_8 _p_ stowa_, int_4 _p_ iflag_)
40996 { // ** body not listed **
41139 }
41140
41141 real_8 _drf (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_)
41142 { // ** body not listed **
41646 }
41647
41648 real_8 _drj (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, real_8 _p_ p_, int_4 _p_ ier_)
41649 { // ** body not listed **
42245 }
42246
42247 int_4 _drkfs (int_4 (*_df)(), int_4 _p_ neq_, real_8 _p_ t_, real_8 _p_ y_, real_8 _p_ tout_, int_4 _p_ info_, real_8
42248 _p_ rtol_, real_8 _p_ atol_, int_4 _p_ idid_, real_8 _p_ h_, real_8 _p_ tolfac_, real_8 _p_ yp_, real_8 _p_ f1_, real_8
42249 _p_ f2_, real_8 _p_ f3_, real_8 _p_ f4_, real_8 _p_ f5_, real_8 _p_ ys_, real_8 _p_ told_, real_8 _p_ dtsign_, real_8
42250 _p_ u26_, real_8 _p_ rer_, int_4 _p_ init_, int_4 _p_ ksteps_, int_4 _p_ kop_, int_4 _p_ iquit_, logical_4 _p_ stiff_,
42251 logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_8 _p_ rpar_, int_4 _p_ ipar_)
42252 { // ** body not listed **
43106 }
43107
43108 int_4 _dsort (real_8 _p_ dx_, real_8 _p_ dy_, int_4 _p_ n_, int_4 _p_ kflag_)
43109 { // ** body not listed **
43350 }
43351
43352 int_4 _dsoseq (real_8 (*_fnc)(), int_4 _p_ n_, real_8 _p_ s_, real_8 _p_ rtolx_, real_8 _p_ atolx_, real_8 _p_ tolf_,
43353 int_4 _p_ iflag_, int_4 _p_ mxit_, int_4 _p_ ncjs_, int_4 _p_ nsrrc_, int_4 _p_ nsri_, int_4 _p_ iprint_, real_8 _p_
43354 fmax_, real_8 _p_ c_, int_4 _p_ nc_, real_8 _p_ b_, real_8 _p_ p_, real_8 _p_ temp_, real_8 _p_ x_, real_8 _p_ y_,
43355 real_8 _p_ fac_, int_4 _p_ is_)
43356 { // ** body not listed **
43734 }
43735
43736 int_4 _dsos (real_8 (*_fnc)(), int_4 _p_ neq_, real_8 _p_ x_, real_8 _p_ rtolx_, real_8 _p_ atolx_, real_8 _p_ tolf_,
43737 int_4 _p_ iflag_, real_8 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_)
43738 { // ** body not listed **
44066 }
44067
44068 int_4 _dsossl (int_4 _p_ k_, int_4 _p_ n_, int_4 _p_ l_, real_8 _p_ x_, real_8 _p_ c_, real_8 _p_ b_, int_4 _p_ m_)
44069 { // ** body not listed **
44103 }
44104
44105 int_4 _dsplp (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ prgopt_, real_8
44106 _p_ dattrv_, real_8 _p_ bl_, real_8 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_8 _p_ primal_, real_8 _p_ duals_,
44107 int_4 _p_ ibasis_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_)
44108 { // ** body not listed **
44407 }
44408
44409 int_4 _dstor1 (real_8 _p_ u_, real_8 _p_ yh_, real_8 _p_ v_, real_8 _p_ yp_, int_4 _p_ ntemp_, int_4 _p_ ndisk_, int_4
44410 _p_ ntape_)
44411 { // ** body not listed **
44456 }
44457
44458 int_4 _dstway (real_8 _p_ u_, real_8 _p_ v_, real_8 _p_ yhp_, int_4 _p_ inout_, real_8 _p_ stowa_)
44459 { // ** body not listed **
44517 }
44518
44519 int_4 _dsuds (real_8 _p_ a_, real_8 _p_ x_, real_8 _p_ b_, int_4 _p_ neq_, int_4 _p_ nuk_, int_4 _p_ nrda_, int_4 _p_
44520 iflag_, int_4 _p_ mlso_, real_8 _p_ work_, int_4 _p_ iwork_)
44521 { // ** body not listed **
44534 }
44535
44536 int_4 _du11ls (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ ub_, real_8 _p_ db_, int_4 _p_
44537 mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_8 _p_ h_, real_8 _p_ w_, real_8 _p_ eb_, int_4 _p_ ic_,
44538 int_4 _p_ ir_)
44539 { // ** body not listed **
44821 }
44822
44823 int_4 _du11us (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ ub_, real_8 _p_ db_, int_4 _p_
44824 mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_8 _p_ h_, real_8 _p_ w_, real_8 _p_ eb_, int_4 _p_ ir_,
44825 int_4 _p_ ic_)
44826 { // ** body not listed **
45108 }
45109
45110 int_4 _du12ls (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
45111 int_4 _p_ mode_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ w_, int_4 _p_ ic_, int_4 _p_ ir_)
45112 { // ** body not listed **
45253 }
45254
45255 int_4 _du12us (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
45256 int_4 _p_ mode_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ w_, int_4 _p_ ir_, int_4 _p_ ic_)
45257 { // ** body not listed **
45397 }
45398
45399 int_4 _dulsia (real_8 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
45400 real_8 _p_ re_, real_8 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_,
45401 real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
45402 { // ** body not listed **
45651 }
45652
45653 int_4 _dusrmt (int_4 _p_ i_, int_4 _p_ j_, real_8 _p_ aij_, int_4 _p_ indcat_, real_8 _p_ prgopt_, real_8 _p_ dattrv_,
45654 int_4 _p_ iflag_)
45655 { // ** body not listed **
45693 }
45694
45695 int_4 _dvecs (int_4 _p_ ncomp_, int_4 _p_ lnfc_, real_8 _p_ yhp_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ inhomo_
45696 , int_4 _p_ iflag_)
45697 { // ** body not listed **
45735 }
45736
45737 real_8 _dvnrms (int_4 _p_ n_, real_8 _p_ v_, real_8 _p_ w_)
45738 { // ** body not listed **
45750 }
45751
45752 int_4 _dwnlit (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ l_, int_4 _p_ ipivot_, int_4 _p_
45753 itype_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ rnorm_, int_4 _p_ idope_, real_8 _p_ dope_, logical_4 _p_ done_)
45754 { // ** body not listed **
45919 }
45920
45921 int_4 _dwnlsm (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mme_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_, real_8 _p_
45922 prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ ipivot_, int_4 _p_ itype_, real_8 _p_ wd_, real_8
45923 _p_ h_, real_8 _p_ scale_, real_8 _p_ z_, real_8 _p_ temp_, real_8 _p_ d_)
45924 { // ** body not listed **
46352 }
46353
46354 int_4 _dwnlt1 (int_4 _p_ i_, int_4 _p_ lend_, int_4 _p_ mend_, int_4 _p_ ir_, int_4 _p_ mdw_, logical_4 _p_ recalc_,
46355 int_4 _p_ imax_, real_8 _p_ hbar_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ w_)
46356 { // ** body not listed **
46381 }
46382
46383 logical_4 _dwnlt2 (int_4 _p_ me_, int_4 _p_ mend_, int_4 _p_ ir_, real_8 _p_ factor_, real_8 _p_ tau_, real_8 _p_
46384 scale_, real_8 _p_ wic_)
46385 { // ** body not listed **
46407 }
46408
46409 int_4 _dwnlt3 (int_4 _p_ i_, int_4 _p_ imax_, int_4 _p_ m_, int_4 _p_ mdw_, int_4 _p_ ipivot_, real_8 _p_ h_, real_8
46410 _p_ w_)
46411 { // ** body not listed **
46426 }
46427
46428 int_4 _dwnnls (real_8 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_, real_8 _p_
46429 prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_8 _p_ work_)
46430 { // ** body not listed **
46552 }
46553
46554 int_4 _dwritp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
46555 { // ** body not listed **
46660 }
46661
46662 int_4 _dwupdt (int_4 _p_ n_, real_8 _p_ r_, int_4 _p_ ldr_, real_8 _p_ w_, real_8 _p_ b_, real_8 _p_ alpha_, real_8 _p_
46663 cos_, real_8 _p_ sin_)
46664 { // ** body not listed **
46731 }
46732
46733 int_4 _dx4 (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uxxx_, real_4 _p_ uxxxx_)
46734 { // ** body not listed **
46823 }
46824
46825 int_4 _dxadj (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
46826 { // ** body not listed **
46880 }
46881
46882 int_4 _dxc210 (int_4 _p_ k_, real_8 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_)
46883 { // ** body not listed **
46947 }
46948
46949 int_4 _dx (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uxxx_, real_4 _p_ uxxxx_)
46950 { // ** body not listed **
47040 }
47041
47042 real_8 _dxpsi (real_8 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_)
47043 { // ** body not listed **
47200 }
47201
47202 int_4 _dxred (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
47203 { // ** body not listed **
47274 }
47275
47276 int_4 _dy4 (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uyyy_, real_4 _p_ uyyyy_)
47277 { // ** body not listed **
47365 }
47366
47367 int_4 _dyairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ bi_, real_8 _p_ dbi_)
47368 { // ** body not listed **
49205 }
49206
49207 int_4 _dy (real_4 _p_ u_, int_4 _p_ idmn_, int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ uyyy_, real_4 _p_ uyyyy_)
49208 { // ** body not listed **
49298 }
49299
49300 int_4 _efcmn (int_4 _p_ ndata_, real_4 _p_ xdata_, real_4 _p_ ydata_, real_4 _p_ sddata_, int_4 _p_ nord_, int_4 _p_
49301 nbkpt_, real_4 _p_ bkptin_, int_4 _p_ mdein_, int_4 _p_ mdeout_, real_4 _p_ coeff_, real_4 _p_ bf_, real_4 _p_ xtemp_,
49302 real_4 _p_ ptemp_, real_4 _p_ bkpt_, real_4 _p_ g_, int_4 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ lw_)
49303 { // ** body not listed **
49498 }
49499
49500 int_4 _fcmn (int_4 _p_ ndata_, real_4 _p_ xdata_, real_4 _p_ ydata_, real_4 _p_ sddata_, int_4 _p_ nord_, int_4 _p_
49501 nbkpt_, real_4 _p_ bkptin_, int_4 _p_ nconst_, real_4 _p_ xconst_, real_4 _p_ yconst_, int_4 _p_ nderiv_, int_4 _p_
49502 mode_, real_4 _p_ coeff_, real_4 _p_ bf_, real_4 _p_ xtemp_, real_4 _p_ ptemp_, real_4 _p_ bkpt_, real_4 _p_ g_, int_4
49503 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, real_4 _p_ work_, int_4 _p_ iwork_)
49504 { // ** body not listed **
49869 }
49870
49871 int_4 _fdjac3 (int_4 (*_fcn)(), int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4 _p_ fjac_, int_4
49872 _p_ ldfjac_, int_4 _p_ iflag_, real_4 _p_ epsfcn_, real_4 _p_ wa_)
49873 { // ** body not listed **
49911 }
49912
49913 int_4 _fdump (void)
49914 { // ** body not listed **
49917 }
49918
49919 int_4 _fftdoc (void)
49920 { // ** body not listed **
49923 }
49924
49925 int_4 _fulmat (int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ aij_, int_4 _p_ indcat_, real_4 _p_ prgopt_, real_4 _p_ dattrv_,
49926 int_4 _p_ iflag_)
49927 { // ** body not listed **
49999 }
50000
50001 int_4 _fzero (real_4 (*_f)(), real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ r_, real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_
50002 iflag_)
50003 { // ** body not listed **
50133 }
50134
50135 real_4 _gamrn (real_4 _p_ x_)
50136 { // ** body not listed **
50259 }
50260
50261 int_4 _gaus8 (real_4 (*_fun)(), real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_)
50262 { // ** body not listed **
50513 }
50514
50515 int_4 _h12 (int_4 _p_ mode_, int_4 _p_ lpivot_, int_4 _p_ l1_, int_4 _p_ m_, real_4 _p_ u_, int_4 _p_ iue_, real_4 _p_
50516 up_, real_4 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_)
50517 { // ** body not listed **
50647 }
50648
50649 int_4 _hfti (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
50650 real_4 _p_ tau_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ g_, int_4 _p_ ip_)
50651 { // ** body not listed **
50833 }
50834
50835 int_4 _hkseq (real_4 _p_ x_, int_4 _p_ m_, real_4 _p_ h_, int_4 _p_ ierr_)
50836 { // ** body not listed **
51063 }
51064
51065 int_4 _hpperm (char _p_ _p_ hx_, int_4 _p_ n_, int_4 _p_ iperm_, char _p_ work_, int_4 _p_ ier_)
51066 { // ** body not listed **
51115 }
51116
51117 int_4 _hpsort (char _p_ _p_ hx_, int_4 _p_ n_, int_4 _p_ strbeg_, int_4 _p_ strend_, int_4 _p_ iperm_, int_4 _p_ kflag_
51118 , char _p_ work_, int_4 _p_ ier_)
51119 { // ** body not listed **
51302 }
51303
51304 int_4 _hstart (int_4 (*_f)(), int_4 _p_ neq_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ y_, real_4 _p_ yprime_, real_4
51305 _p_ etol_, int_4 _p_ morder_, real_4 _p_ small_, real_4 _p_ big_, real_4 _p_ spy_, real_4 _p_ pv_, real_4 _p_ yp_,
51306 real_4 _p_ sf_, real_4 _p_ rpar_, int_4 _p_ ipar_, real_4 _p_ h_)
51307 { // ** body not listed **
51487 }
51488
51489 int_4 _hstcs1 (int_4 _p_ intl_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ bda_, real_4
51490 _p_ bdb_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdc_, real_4 _p_ bdd_, real_4 _p_
51491 elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, int_4 _p_ ierr1_, real_4 _p_ am_, real_4 _p_ bm_, real_4
51492 _p_ cm_, real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ snth_, real_4 _p_ rsq_, real_4 _p_ wrk_)
51493 { // ** body not listed **
51725 }
51726
51727 real_4 _hvnrm (real_4 _p_ v_, int_4 _p_ ncomp_)
51728 { // ** body not listed **
51737 }
51738
51739 int_4 _hwscs1 (int_4 _p_ intl_, real_4 _p_ ts_, real_4 _p_ tf_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ bdts_,
51740 real_4 _p_ bdtf_, real_4 _p_ rs_, real_4 _p_ rf_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdrs_, real_4 _p_ bdrf_,
51741 real_4 _p_ elmbda_, real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, real_4 _p_ w_, real_4 _p_ s_, real_4 _p_ an_,
51742 real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ r_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ sint_, real_4
51743 _p_ bmh_)
51744 { // ** body not listed **
52236 }
52237
52238 int_4 _hwsss1 (real_4 _p_ ts_, real_4 _p_ tf_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ bdts_, real_4 _p_ bdtf_,
52239 real_4 _p_ ps_, real_4 _p_ pf_, int_4 _p_ n_, int_4 _p_ nbdcnd_, real_4 _p_ bdps_, real_4 _p_ bdpf_, real_4 _p_ elmbda_
52240 , real_4 _p_ f_, int_4 _p_ idimf_, real_4 _p_ pertrb_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ sn_,
52241 real_4 _p_ ss_, real_4 _p_ sint_, real_4 _p_ d_)
52242 { // ** body not listed **
52879 }
52880
52881 int_4 _i1merg (real_4 _p_ icos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_)
52882 { // ** body not listed **
52921 }
52922
52923 int_4 _idloc (int_4 _p_ loc_, real_8 _p_ sx_, int_4 _p_ ix_)
52924 { // ** body not listed **
52957 }
52958
52959 int_4 _indxa (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_)
52960 { // ** body not listed **
52977 }
52978
52979 int_4 _indxb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_)
52980 { // ** body not listed **
53038 }
53039
53040 int_4 _indxc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_)
53041 { // ** body not listed **
53058 }
53059
53060 int_4 _inxca (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_)
53061 { // ** body not listed **
53078 }
53079
53080 int_4 _inxcb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_)
53081 { // ** body not listed **
53138 }
53139
53140 int_4 _inxcc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_)
53141 { // ** body not listed **
53158 }
53159
53160 int_4 _iploc (int_4 _p_ loc_, real_4 _p_ sx_, int_4 _p_ ix_)
53161 { // ** body not listed **
53194 }
53195
53196 int_4 _ipperm (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
53197 { // ** body not listed **
53241 }
53242
53243 int_4 _ipsort (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
53244 { // ** body not listed **
53400 }
53401
53402 int_4 _isort (int_4 _p_ ix_, int_4 _p_ iy_, int_4 _p_ n_, int_4 _p_ kflag_)
53403 { // ** body not listed **
53644 }
53645
53646 int_4 _jairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ ai_, real_4 _p_ dai_)
53647 { // ** body not listed **
55236 }
55237
55238 int_4 _llsia (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
55239 real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_,
55240 real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
55241 { // ** body not listed **
55490 }
55491
55492 int_4 _lpdp (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n1_, int_4 _p_ n2_, real_4 _p_ prgopt_, real_4 _p_
55493 x_, real_4 _p_ wnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ is_)
55494 { // ** body not listed **
55652 }
55653
55654 int_4 _lsei (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_4 _p_
55655 prgopt_, real_4 _p_ x_, real_4 _p_ rnorme_, real_4 _p_ rnorml_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_)
55656 { // ** body not listed **
56160 }
56161
56162 int_4 _lsi (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ ma_, int_4 _p_ mg_, int_4 _p_ n_, real_4 _p_ prgopt_, real_4 _p_
56163 x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_)
56164 { // ** body not listed **
56381 }
56382
56383 int_4 _lssods (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ nrda_, int_4 _p_
56384 iflag_, int_4 _p_ irank_, int_4 _p_ iscale_, real_4 _p_ q_, real_4 _p_ diag_, int_4 _p_ kpivot_, int_4 _p_ iter_,
56385 real_4 _p_ resnrm_, real_4 _p_ xnorm_, real_4 _p_ z_, real_4 _p_ r_, real_4 _p_ div_, real_4 _p_ td_, real_4 _p_
56386 scales_)
56387 { // ** body not listed **
56556 }
56557
56558 int_4 _lssuds (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, real_4 _p_ u_,
56559 int_4 _p_ nrdu_, int_4 _p_ iflag_, int_4 _p_ mlso_, int_4 _p_ irank_, int_4 _p_ iscale_, real_4 _p_ q_, real_4 _p_
56560 diag_, int_4 _p_ kpivot_, real_4 _p_ s_, real_4 _p_ div_, real_4 _p_ td_, int_4 _p_ isflg_, real_4 _p_ scales_)
56561 { // ** body not listed **
56732 }
56733
56734 int_4 _macon (void)
56735 { // ** body not listed **
56751 }
56752
56753 int_4 _mgsbv (int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ a_, int_4 _p_ ia_, int_4 _p_ niv_, int_4 _p_ iflag_, real_4 _p_ s_
56754 , real_4 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_4 _p_ v_, real_4 _p_ w_, real_4 _p_ wcnd_)
56755 { // ** body not listed **
56995 }
56996
56997 int_4 _minso4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_)
56998 { // ** body not listed **
57023 }
57024
57025 int_4 _minsol (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_)
57026 { // ** body not listed **
57051 }
57052
57053 int_4 _mpadd2 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_, int_4 _p_ y1_, int_4 _p_ trunc_)
57054 { // ** body not listed **
57146 }
57147
57148 int_4 _mpadd3 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ s_, int_4 _p_ med_, int_4 _p_ re_)
57149 { // ** body not listed **
57276 }
57277
57278 int_4 _mpadd (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_)
57279 { // ** body not listed **
57283 }
57284
57285 int_4 _mpblas (int_4 _p_ i1_)
57286 { // ** body not listed **
57305 }
57306
57307 int_4 _mpcdm (real_8 _p_ dx_, int_4 _p_ z_)
57308 { // ** body not listed **
57394 }
57395
57396 int_4 _mpchk (int_4 _p_ i_, int_4 _p_ j_)
57397 { // ** body not listed **
57666 }
57667
57668 int_4 _mpcmd (int_4 _p_ x_, real_8 _p_ dz_)
57669 { // ** body not listed **
57718 }
57719
57720 int_4 _mpdivi (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_)
57721 { // ** body not listed **
57912 }
57913
57914 int_4 _mperr (void)
57915 { // ** body not listed **
57922 }
57923
57924 int_4 _mpmaxr (int_4 _p_ x_)
57925 { // ** body not listed **
57937 }
57938
57939 int_4 _mpmlp (int_4 _p_ u_, int_4 _p_ v_, int_4 _p_ w_, int_4 _p_ j_)
57940 { // ** body not listed **
57947 }
57948
57949 int_4 _mpmul2 (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_, int_4 _p_ trunc_)
57950 { // ** body not listed **
58092 }
58093
58094 int_4 _mpmul (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_)
58095 { // ** body not listed **
58201 }
58202
58203 int_4 _mpmuli (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_)
58204 { // ** body not listed **
58208 }
58209
58210 int_4 _mpnzr (int_4 _p_ rs_, int_4 _p_ re_, int_4 _p_ z_, int_4 _p_ trunc_)
58211 { // ** body not listed **
58347 }
58348
58349 int_4 _mpovfl (int_4 _p_ x_)
58350 { // ** body not listed **
58371 }
58372
58373 int_4 _mpstr (int_4 _p_ x_, int_4 _p_ y_)
58374 { // ** body not listed **
58381 }
58382
58383 int_4 _mpunfl (int_4 _p_ x_)
58384 { // ** body not listed **
58390 }
58391
58392 int_4 _numxer (int_4 _p_ nerr_)
58393 { // ** body not listed **
58401 }
58402
58403 int_4 _ohtrol (real_4 _p_ q_, int_4 _p_ n_, int_4 _p_ nrda_, real_4 _p_ diag_, int_4 _p_ irank_, real_4 _p_ div_,
58404 real_4 _p_ td_)
58405 { // ** body not listed **
58438 }
58439
58440 int_4 _ohtror (real_4 _p_ q_, int_4 _p_ n_, int_4 _p_ nrda_, real_4 _p_ diag_, int_4 _p_ irank_, real_4 _p_ div_,
58441 real_4 _p_ td_)
58442 { // ** body not listed **
58475 }
58476
58477 int_4 _ortho4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_)
58478 { // ** body not listed **
58503 }
58504
58505 int_4 _orthog (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_)
58506 { // ** body not listed **
58531 }
58532
58533 int_4 _orthol (real_4 _p_ a_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ nrda_, int_4 _p_ iflag_, int_4 _p_ irank_, int_4
58534 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ cols_, real_4 _p_ cs_)
58535 { // ** body not listed **
58643 }
58644
58645 int_4 _orthor (real_4 _p_ a_, int_4 _p_ n_, int_4 _p_ m_, int_4 _p_ nrda_, int_4 _p_ iflag_, int_4 _p_ irank_, int_4
58646 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ rows_, real_4 _p_ rs_)
58647 { // ** body not listed **
58752 }
58753
58754 int_4 _pchngs (int_4 _p_ ii_, real_4 _p_ xval_, int_4 _p_ iplace_, real_4 _p_ sx_, int_4 _p_ ix_, int_4 _p_ ircx_)
58755 { // ** body not listed **
58965 }
58966
58967 int_4 _pcoef (int_4 _p_ l_, real_4 _p_ c_, real_4 _p_ tc_, real_4 _p_ a_)
58968 { // ** body not listed **
58997 }
58998
58999 real_4 _pgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
59000 { // ** body not listed **
59027 }
59028
59029 real_4 _pimach (real_4 _p_ dum_)
59030 { // ** body not listed **
59035 }
59036
59037 int_4 _pinitm (int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ sx_, int_4 _p_ ix_, int_4 _p_ lmx_, int_4 _p_ ipagef_)
59038 { // ** body not listed **
59111 }
59112
59113 int_4 _pnnzrs (int_4 _p_ i_, real_4 _p_ xval_, int_4 _p_ iplace_, real_4 _p_ sx_, int_4 _p_ ix_, int_4 _p_ ircx_)
59114 { // ** body not listed **
59318 }
59319
59320 int_4 _poisd2 (int_4 _p_ mr_, int_4 _p_ nr_, int_4 _p_ istag_, real_4 _p_ ba_, real_4 _p_ bb_, real_4 _p_ bc_, real_4
59321 _p_ q_, int_4 _p_ idimq_, real_4 _p_ b_, real_4 _p_ w_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
59322 { // ** body not listed **
59743 }
59744
59745 int_4 _poisn2 (int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ istag_, int_4 _p_ mixbnd_, real_4 _p_ a_, real_4 _p_ bb_, real_4
59746 _p_ c_, real_4 _p_ q_, int_4 _p_ idimq_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_,
59747 real_4 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
59748 { // ** body not listed **
60383 }
60384
60385 int_4 _poisp2 (int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ bb_, real_4 _p_ c_, real_4 _p_ q_, int_4 _p_
60386 idimq_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_, real_4 _p_ w3_, real_4 _p_ d_,
60387 real_4 _p_ tcos_, real_4 _p_ p_)
60388 { // ** body not listed **
60483 }
60484
60485 int_4 _polcof (real_4 _p_ xx_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ c_, real_4 _p_ d_, real_4 _p_ work_)
60486 { // ** body not listed **
60525 }
60526
60527 int_4 _polfit (int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ w_, int_4 _p_ maxdeg_, int_4 _p_ ndeg_, real_4
60528 _p_ eps_, real_4 _p_ r_, int_4 _p_ ierr_, real_4 _p_ a_)
60529 { // ** body not listed **
60838 }
60839
60840 int_4 _polint (int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ c_)
60841 { // ** body not listed **
60872 }
60873
60874 int_4 _polyvl (int_4 _p_ nder_, real_4 _p_ xx_, real_4 _p_ yfit_, real_4 _p_ yp_, int_4 _p_ n_, real_4 _p_ x_, real_4
60875 _p_ c_, real_4 _p_ work_, int_4 _p_ ierr_)
60876 { // ** body not listed **
60970 }
60971
60972 int_4 _pos3d1 (int_4 _p_ lp_, int_4 _p_ l_, int_4 _p_ mp_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ b_,
60973 real_4 _p_ c_, int_4 _p_ ldimf_, int_4 _p_ mdimf_, real_4 _p_ f_, real_4 _p_ xrt_, real_4 _p_ yrt_, real_4 _p_ t_,
60974 real_4 _p_ d_, real_4 _p_ wx_, real_4 _p_ wy_, real_4 _p_ c1_, real_4 _p_ c2_, real_4 _p_ bb_)
60975 { // ** body not listed **
61250 }
61251
61252 int_4 _postg2 (int_4 _p_ nperod_, int_4 _p_ n_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ bb_, real_4 _p_ c_, int_4 _p_
61253 idimq_, real_4 _p_ q_, real_4 _p_ b_, real_4 _p_ b2_, real_4 _p_ b3_, real_4 _p_ w_, real_4 _p_ w2_, real_4 _p_ w3_,
61254 real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
61255 { // ** body not listed **
61889 }
61890
61891 int_4 _ppadd (int_4 _p_ n_, int_4 _p_ ierror_, real_4 _p_ a_, real_4 _p_ c_, complex_8 _p_ cbp_, real_4 _p_ bp_, real_4
61892 _p_ bh_)
61893 { // ** body not listed **
62179 }
62180
62181 int_4 _ppgq8 (real_4 (*_fun)(), int_4 _p_ ldc_, real_4 _p_ c_, real_4 _p_ xi_, int_4 _p_ lxi_, int_4 _p_ kk_, int_4 _p_
62182 id_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ inppv_, real_4 _p_ err_, real_4 _p_ ans_, int_4 _p_ ierr_)
62183 { // ** body not listed **
62454 }
62455
62456 real_4 _ppgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62457 { // ** body not listed **
62468 }
62469
62470 real_4 _pppsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62471 { // ** body not listed **
62481 }
62482
62483 real_4 _ppsgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62484 { // ** body not listed **
62495 }
62496
62497 real_4 _ppspf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62498 { // ** body not listed **
62508 }
62509
62510 int_4 _proc (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4 _p_
62511 na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_, complex_8
62512 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ u_)
62513 { // ** body not listed **
62687 }
62688
62689 int_4 _procp (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4
62690 _p_ na_, real_4 _p_ aa_, complex_8 _p_ x_, complex_8 _p_ y_, int_4 _p_ m_, complex_8 _p_ a_, complex_8 _p_ b_,
62691 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ w_)
62692 { // ** body not listed **
62895 }
62896
62897 int_4 _prod (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4 _p_
62898 na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4
62899 _p_ d_, real_4 _p_ w_, real_4 _p_ u_)
62900 { // ** body not listed **
63073 }
63074
63075 int_4 _prodp (int_4 _p_ nd_, real_4 _p_ bd_, int_4 _p_ nm1_, real_4 _p_ bm1_, int_4 _p_ nm2_, real_4 _p_ bm2_, int_4
63076 _p_ na_, real_4 _p_ aa_, real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_,
63077 real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ w_)
63078 { // ** body not listed **
63280 }
63281
63282 real_4 _prvec (int_4 _p_ m_, real_4 _p_ u_, real_4 _p_ v_)
63283 { // ** body not listed **
63293 }
63294
63295 int_4 _prwpge (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_)
63296 { // ** body not listed **
63316 }
63317
63318 int_4 _prwvir (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_)
63319 { // ** body not listed **
63364 }
63365
63366 real_4 _psgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
63367 { // ** body not listed **
63394 }
63395
63396 int_4 _psifn (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ kode_, int_4 _p_ m_, real_4 _p_ ans_, int_4 _p_ nz_, int_4 _p_
63397 ierr_)
63398 { // ** body not listed **
63809 }
63810
63811 real_4 _psixn (int_4 _p_ n_)
63812 { // ** body not listed **
64410 }
64411
64412 int_4 _pvalue (int_4 _p_ l_, int_4 _p_ nder_, real_4 _p_ x_, real_4 _p_ yfit_, real_4 _p_ yp_, real_4 _p_ a_)
64413 { // ** body not listed **
64586 }
64587
64588 real_4 _pythag (real_4 _p_ a_, real_4 _p_ b_)
64589 { // ** body not listed **
64612 }
64613
64614 int_4 _rc3jj (real_4 _p_ l2_, real_4 _p_ l3_, real_4 _p_ m2_, real_4 _p_ m3_, real_4 _p_ l1min_, real_4 _p_ l1max_,
64615 real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
64616 { // ** body not listed **
64895 }
64896
64897 int_4 _rc3jm (real_4 _p_ l1_, real_4 _p_ l2_, real_4 _p_ l3_, real_4 _p_ m1_, real_4 _p_ m2min_, real_4 _p_ m2max_,
64898 real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
64899 { // ** body not listed **
65170 }
65171
65172 int_4 _rc6j (real_4 _p_ l2_, real_4 _p_ l3_, real_4 _p_ l4_, real_4 _p_ l5_, real_4 _p_ l6_, real_4 _p_ l1min_, real_4
65173 _p_ l1max_, real_4 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
65174 { // ** body not listed **
65468 }
65469
65470 real_4 _rc (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ ier_)
65471 { // ** body not listed **
65844 }
65845
65846 real_4 _rd (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_)
65847 { // ** body not listed **
66324 }
66325
66326 int_4 _reort (int_4 _p_ ncomp_, real_4 _p_ y_, real_4 _p_ yp_, real_4 _p_ yhp_, int_4 _p_ niv_, real_4 _p_ w_, real_4
66327 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, real_4 _p_ stowa_, int_4 _p_ iflag_)
66328 { // ** body not listed **
66458 }
66459
66460 real_4 _rf (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_)
66461 { // ** body not listed **
66965 }
66966
66967 real_4 _rj (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, real_4 _p_ p_, int_4 _p_ ier_)
66968 { // ** body not listed **
67564 }
67565
67566 int_4 _rpqr79 (int_4 _p_ ndeg_, real_4 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_)
67567 { // ** body not listed **
67614 }
67615
67616 int_4 _rpzero (int_4 _p_ n_, real_4 _p_ a_, complex_8 _p_ r_, complex_8 _p_ t_, int_4 _p_ iflg_, real_4 _p_ s_)
67617 { // ** body not listed **
67626 }
67627
67628 int_4 _s1merg (real_4 _p_ tcos_, int_4 _p_ i1_, int_4 _p_ m1_, int_4 _p_ i2_, int_4 _p_ m2_, int_4 _p_ i3_)
67629 { // ** body not listed **
67668 }
67669
67670 int_4 _sbocls (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mcon_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_4 _p_ bl_,
67671 real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnormc_, real_4 _p_ rnorm_, int_4 _p_ mode_,
67672 real_4 _p_ rw_, int_4 _p_ iw_)
67673 { // ** body not listed **
69198 }
69199
69200 int_4 _sbols (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mrows_, int_4 _p_ ncols_, real_4 _p_ bl_, real_4 _p_ bu_, int_4
69201 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ rw_, int_4 _p_ iw_)
69202 { // ** body not listed **
70535 }
70536
70537 int_4 _sbolsm (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ minput_, int_4 _p_ ncols_, real_4 _p_ bl_, real_4 _p_ bu_,
70538 int_4 _p_ ind_, int_4 _p_ iopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ rw_, real_4 _p_ ww_,
70539 real_4 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_)
70540 { // ** body not listed **
72257 }
72258 int_4 _sclosm (int_4 _p_ ipage_)
72259 { // ** body not listed **
72317 }
72318
72319 int_4 _scoef (real_4 _p_ yh_, real_4 _p_ yp_, int_4 _p_ ncomp_, int_4 _p_ nrowb_, int_4 _p_ nfc_, int_4 _p_ nic_,
72320 real_4 _p_ b_, real_4 _p_ beta_, real_4 _p_ coef_, int_4 _p_ inhomo_, real_4 _p_ re_, real_4 _p_ ae_, real_4 _p_ by_,
72321 real_4 _p_ cvec_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_)
72322 { // ** body not listed **
72453 }
72454
72455 int_4 _scov (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4 _p_
72456 r_, int_4 _p_ ldr_, int_4 _p_ info_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_)
72457 { // ** body not listed **
72597 }
72598
72599 int_4 _sgeev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ v_, int_4 _p_ ldv_, real_4 _p_
72600 work_, int_4 _p_ job_, int_4 _p_ info_)
72601 { // ** body not listed **
72704 }
72705
72706 int_4 _sgefs (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_
72707 work_, int_4 _p_ iwork_)
72708 { // ** body not listed **
72899 }
72900
72901 int_4 _sgeir (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_
72902 work_, int_4 _p_ iwork_)
72903 { // ** body not listed **
73113 }
73114
73115 int_4 _sglss (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
73116 real_4 _p_ rnorm_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
73117 { // ** body not listed **
73145 }
73146
73147 int_4 _snbco (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_4 _p_
73148 rcond_, real_4 _p_ z_)
73149 { // ** body not listed **
73298 }
73299
73300 int_4 _snbdi (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_4 _p_
73301 det_)
73302 { // ** body not listed **
73336 }
73337
73338 int_4 _snbfa (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, int_4 _p_
73339 info_)
73340 { // ** body not listed **
73395 }
73396
73397 int_4 _snbfs (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_ v_, int_4 _p_
73398 itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_)
73399 { // ** body not listed **
73676 }
73677
73678 int_4 _snbir (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_ v_, int_4 _p_
73679 itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_)
73680 { // ** body not listed **
73981 }
73982
73983 int_4 _snbsl (real_4 _p_ abe_, int_4 _p_ lda_, int_4 _p_ n_, int_4 _p_ ml_, int_4 _p_ mu_, int_4 _p_ ipvt_, real_4 _p_
73984 b_, int_4 _p_ job_)
73985 { // ** body not listed **
74055 }
74056
74057 int_4 _snls1e (real_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4
74058 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_4 _p_ wa_, int_4 _p_ lwa_)
74059 { // ** body not listed **
74109 }
74110
74111 int_4 _snls1 (int_4 (*_fcn)(), int_4 _p_ iopt_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4 _p_
74112 fjac_, int_4 _p_ ldfjac_, real_4 _p_ ftol_, real_4 _p_ xtol_, real_4 _p_ gtol_, int_4 _p_ maxfev_, real_4 _p_ epsfcn_,
74113 real_4 _p_ diag_, int_4 _p_ mode_, real_4 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_, int_4 _p_
74114 njev_, int_4 _p_ ipvt_, real_4 _p_ qtf_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_ wa4_)
74115 { // ** body not listed **
74689 }
74690
74691 int_4 _snsqe (real_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4
74692 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_4 _p_ wa_, int_4 _p_ lwa_)
74693 { // ** body not listed **
74749 }
74750
74751 int_4 _snsq (int_4 (*_fcn)(), int_4 (*_jac)(), int_4 _p_ iopt_, int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ fvec_, real_4
74752 _p_ fjac_, int_4 _p_ ldfjac_, real_4 _p_ xtol_, int_4 _p_ maxfev_, int_4 _p_ ml_, int_4 _p_ mu_, real_4 _p_ epsfcn_,
74753 real_4 _p_ diag_, int_4 _p_ mode_, real_4 _p_ factor_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ nfev_, int_4 _p_
74754 njev_, real_4 _p_ r_, int_4 _p_ lr_, real_4 _p_ qtf_, real_4 _p_ wa1_, real_4 _p_ wa2_, real_4 _p_ wa3_, real_4 _p_
74755 wa4_)
74756 { // ** body not listed **
75070 }
75071
75072 int_4 _sods (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ neq_, int_4 _p_ nuk_, int_4 _p_ nrda_, int_4 _p_
75073 iflag_, real_4 _p_ work_, int_4 _p_ iwork_)
75074 { // ** body not listed **
75089 }
75090
75091 int_4 _sopenm (int_4 _p_ ipage_, int_4 _p_ lpage_)
75092 { // ** body not listed **
75145 }
75146
75147 int_4 _soseqs (real_4 (*_fnc)(), int_4 _p_ n_, real_4 _p_ s_, real_4 _p_ rtolx_, real_4 _p_ atolx_, real_4 _p_ tolf_,
75148 int_4 _p_ iflag_, int_4 _p_ mxit_, int_4 _p_ ncjs_, int_4 _p_ nsrrc_, int_4 _p_ nsri_, int_4 _p_ iprint_, real_4 _p_
75149 fmax_, real_4 _p_ c_, int_4 _p_ nc_, real_4 _p_ b_, real_4 _p_ p_, real_4 _p_ temp_, real_4 _p_ x_, real_4 _p_ y_,
75150 real_4 _p_ fac_, int_4 _p_ is_)
75151 { // ** body not listed **
75524 }
75525
75526 int_4 _sos (real_4 (*_fnc)(), int_4 _p_ neq_, real_4 _p_ x_, real_4 _p_ rtolx_, real_4 _p_ atolx_, real_4 _p_ tolf_,
75527 int_4 _p_ iflag_, real_4 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_)
75528 { // ** body not listed **
75856 }
75857
75858 int_4 _sossol (int_4 _p_ k_, int_4 _p_ n_, int_4 _p_ l_, real_4 _p_ x_, real_4 _p_ c_, real_4 _p_ b_, int_4 _p_ m_)
75859 { // ** body not listed **
75893 }
75894
75895 int_4 _speli4 (int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_, real_4 _p_ bda_,
75896 real_4 _p_ alpha_, real_4 _p_ bdb_, real_4 _p_ beta_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_,
75897 real_4 _p_ bdc_, real_4 _p_ bdd_, int_4 (*_cofx)(), real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ dn_,
75898 real_4 _p_ un_, real_4 _p_ zn_, real_4 _p_ am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ dm_, real_4 _p_ um_, real_4
75899 _p_ zm_, real_4 _p_ grhs_, real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_)
75900 { // ** body not listed **
76204 }
76205
76206 int_4 _spelip (int_4 _p_ intl_, int_4 _p_ iorder_, real_4 _p_ a_, real_4 _p_ b_, int_4 _p_ m_, int_4 _p_ mbdcnd_,
76207 real_4 _p_ bda_, real_4 _p_ alpha_, real_4 _p_ bdb_, real_4 _p_ beta_, real_4 _p_ c_, real_4 _p_ d_, int_4 _p_ n_,
76208 int_4 _p_ nbdcnd_, real_4 _p_ bdc_, real_4 _p_ gama_, real_4 _p_ bdd_, real_4 _p_ xnu_, int_4 (*_cofx)(), int_4
76209 (*_cofy)(), real_4 _p_ an_, real_4 _p_ bn_, real_4 _p_ cn_, real_4 _p_ dn_, real_4 _p_ un_, real_4 _p_ zn_, real_4 _p_
76210 am_, real_4 _p_ bm_, real_4 _p_ cm_, real_4 _p_ dm_, real_4 _p_ um_, real_4 _p_ zm_, real_4 _p_ grhs_, real_4 _p_ usol_
76211 , int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_)
76212 { // ** body not listed **
76513 }
76514
76515 int_4 _spincw (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ npp_, int_4 _p_ jstrt_,
76516 int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_,
76517 real_4 _p_ costsc_, real_4 _p_ gg_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_ amat_, real_4 _p_ basmat_,
76518 real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ costs_, real_4 _p_ colnrm_,
76519 real_4 _p_ duals_, logical_4 _p_ stpedg_)
76520 { // ** body not listed **
76652 }
76653
76654 int_4 _spinit (int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_,
76655 real_4 _p_ primal_, int_4 _p_ info_, real_4 _p_ amat_, real_4 _p_ csc_, real_4 _p_ costsc_, real_4 _p_ colnrm_, real_4
76656 _p_ xlamda_, real_4 _p_ anorm_, real_4 _p_ rhs_, real_4 _p_ rhsnrm_, int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_
76657 , logical_4 _p_ lopt_)
76658 { // ** body not listed **
76930 }
76931
76932 int_4 _splpce (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ itlp_, int_4 _p_ itbrc_,
76933 int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_,
76934 real_4 _p_ erdnrm_, real_4 _p_ eps_, real_4 _p_ tune_, real_4 _p_ gg_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_
76935 csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ primal_, real_4 _p_ erd_, real_4 _p_ erp_, logical_4 _p_ singlr_,
76936 logical_4 _p_ redbas_)
76937 { // ** body not listed **
77129 }
77130
77131 int_4 _splpdm (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4 _p_ info_,
77132 int_4 _p_ iopt_, int_4 _p_ ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_,
77133 int_4 _p_ ibb_, real_4 _p_ anorm_, real_4 _p_ eps_, real_4 _p_ uu_, real_4 _p_ gg_, real_4 _p_ amat_, real_4 _p_
77134 basmat_, real_4 _p_ csc_, real_4 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_)
77135 { // ** body not listed **
77232 }
77233
77234 int_4 _splp (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ prgopt_, real_4
77235 _p_ dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ primal_, real_4 _p_ duals_,
77236 int_4 _p_ ibasis_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_)
77237 { // ** body not listed **
77536 }
77537
77538 int_4 _splpfe (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ ienter_, int_4 _p_
77539 ibasis_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_4 _p_
77540 erdnrm_, real_4 _p_ eps_, real_4 _p_ gg_, real_4 _p_ dulnrm_, real_4 _p_ dirnrm_, real_4 _p_ amat_, real_4 _p_ basmat_,
77541 real_4 _p_ csc_, real_4 _p_ wr_, real_4 _p_ ww_, real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ rz_, real_4 _p_ rg_, real_4
77542 _p_ colnrm_, real_4 _p_ duals_, logical_4 _p_ found_)
77543 { // ** body not listed **
77689 }
77690
77691 int_4 _splpfl (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ ibasis_, int_4 _p_
77692 ind_, int_4 _p_ ibb_, real_4 _p_ theta_, real_4 _p_ dirnrm_, real_4 _p_ rprnrm_, real_4 _p_ csc_, real_4 _p_ ww_,
77693 real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ erp_, real_4 _p_ rprim_, real_4 _p_ primal_, logical_4 _p_ finite_,
77694 logical_4 _p_ zerolv_)
77695 { // ** body not listed **
77845 }
77846
77847 int_4 _splpmn (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ prgopt_, real_4
77848 _p_ dattrv_, real_4 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ primal_, real_4 _p_ duals_,
77849 real_4 _p_ amat_, real_4 _p_ csc_, real_4 _p_ colnrm_, real_4 _p_ erd_, real_4 _p_ erp_, real_4 _p_ basmat_, real_4 _p_
77850 wr_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ rprim_, real_4 _p_ rhs_, real_4 _p_ ww_, int_4 _p_ lmx_, int_4 _p_ lbm_
77851 , int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_)
77852 { // ** body not listed **
79117 }
79118
79119 int_4 _splpmu (int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ lmx_, int_4 _p_ lbm_, int_4 _p_ nredc_, int_4 _p_ info_,
79120 int_4 _p_ ienter_, int_4 _p_ ileave_, int_4 _p_ iopt_, int_4 _p_ npp_, int_4 _p_ jstrt_, int_4 _p_ ibasis_, int_4 _p_
79121 imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_, int_4 _p_ ind_, int_4 _p_ ibb_, real_4 _p_ anorm_, real_4 _p_
79122 eps_, real_4 _p_ uu_, real_4 _p_ gg_, real_4 _p_ rprnrm_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_ theta_,
79123 real_4 _p_ costsc_, real_4 _p_ xlamda_, real_4 _p_ rhsnrm_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_ csc_,
79124 real_4 _p_ wr_, real_4 _p_ rprim_, real_4 _p_ ww_, real_4 _p_ bu_, real_4 _p_ bl_, real_4 _p_ rhs_, real_4 _p_ erd_,
79125 real_4 _p_ erp_, real_4 _p_ rz_, real_4 _p_ rg_, real_4 _p_ colnrm_, real_4 _p_ costs_, real_4 _p_ primal_, real_4 _p_
79126 duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_)
79127 { // ** body not listed **
79585 }
79586
79587 int_4 _splpup (int_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ prgopt_, real_4 _p_ dattrv_, real_4
79588 _p_ bl_, real_4 _p_ bu_, int_4 _p_ ind_, int_4 _p_ info_, real_4 _p_ amat_, int_4 _p_ imat_, logical_4 _p_ sizeup_,
79589 real_4 _p_ asmall_, real_4 _p_ abig_)
79590 { // ** body not listed **
80131 }
80132
80133 int_4 _spofs (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_
80134 work_)
80135 { // ** body not listed **
80327 }
80328
80329 int_4 _spoir (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ v_, int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_
80330 work_)
80331 { // ** body not listed **
80541 }
80542
80543 int_4 _spopt (real_4 _p_ prgopt_, int_4 _p_ mrelas_, int_4 _p_ nvars_, int_4 _p_ info_, real_4 _p_ csc_, int_4 _p_
80544 ibasis_, real_4 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_)
80545 { // ** body not listed **
80901 }
80902
80903 int_4 _spperm (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
80904 { // ** body not listed **
80949 }
80950
80951 int_4 _spsort (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
80952 { // ** body not listed **
81108 }
81109
81110 int_4 _sreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
81111 { // ** body not listed **
81216 }
81217
81218 int_4 _ssiev (real_4 _p_ a_, int_4 _p_ lda_, int_4 _p_ n_, real_4 _p_ e_, real_4 _p_ work_, int_4 _p_ job_, int_4 _p_
81219 info_)
81220 { // ** body not listed **
81257 }
81258
81259 int_4 _ssort (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ n_, int_4 _p_ kflag_)
81260 { // ** body not listed **
81501 }
81502
81503 int_4 _stor1 (real_4 _p_ u_, real_4 _p_ yh_, real_4 _p_ v_, real_4 _p_ yp_, int_4 _p_ ntemp_, int_4 _p_ ndisk_, int_4
81504 _p_ ntape_)
81505 { // ** body not listed **
81550 }
81551
81552 int_4 _stway (real_4 _p_ u_, real_4 _p_ v_, real_4 _p_ yhp_, int_4 _p_ inout_, real_4 _p_ stowa_)
81553 { // ** body not listed **
81610 }
81611
81612 int_4 _suds (real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ b_, int_4 _p_ neq_, int_4 _p_ nuk_, int_4 _p_ nrda_, int_4 _p_
81613 iflag_, int_4 _p_ mlso_, real_4 _p_ work_, int_4 _p_ iwork_)
81614 { // ** body not listed **
81627 }
81628
81629 int_4 _svecs (int_4 _p_ ncomp_, int_4 _p_ lnfc_, real_4 _p_ yhp_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ inhomo_
81630 , int_4 _p_ iflag_)
81631 { // ** body not listed **
81661 }
81662
81663 int_4 _swritp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
81664 { // ** body not listed **
81769 }
81770
81771 int_4 _tevlc (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_)
81772 { // ** body not listed **
81884 }
81885
81886 int_4 _tevls (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_)
81887 { // ** body not listed **
81999 }
82000
82001 int_4 _tri3 (int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, int_4 _p_ k_, real_4 _p_ y1_, real_4 _p_ y2_,
82002 real_4 _p_ y3_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w1_, real_4 _p_ w2_, real_4 _p_ w3_)
82003 { // ** body not listed **
82113 }
82114
82115 int_4 _tridq (int_4 _p_ mr_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ y_, real_4 _p_ d_)
82116 { // ** body not listed **
82144 }
82145
82146 int_4 _tris4 (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ z_)
82147 { // ** body not listed **
82176 }
82177
82178 int_4 _trisp (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ z_)
82179 { // ** body not listed **
82208 }
82209
82210 int_4 _trix (int_4 _p_ idegbr_, int_4 _p_ idegcr_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ b_, real_4 _p_ c_, real_4
82211 _p_ y_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w_)
82212 { // ** body not listed **
82265 }
82266
82267 int_4 _u11ls (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ ub_, real_4 _p_ db_, int_4 _p_
82268 mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_4 _p_ h_, real_4 _p_ w_, real_4 _p_ eb_, int_4 _p_ ic_,
82269 int_4 _p_ ir_)
82270 { // ** body not listed **
82552 }
82553
82554 int_4 _u11us (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ ub_, real_4 _p_ db_, int_4 _p_
82555 mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_, real_4 _p_ h_, real_4 _p_ w_, real_4 _p_ eb_, int_4 _p_ ir_,
82556 int_4 _p_ ic_)
82557 { // ** body not listed **
82839 }
82840
82841 int_4 _u12ls (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
82842 int_4 _p_ mode_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ w_, int_4 _p_ ic_, int_4 _p_ ir_)
82843 { // ** body not listed **
82984 }
82985
82986 int_4 _u12us (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
82987 int_4 _p_ mode_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ w_, int_4 _p_ ir_, int_4 _p_ ic_)
82988 { // ** body not listed **
83128 }
83129
83130 int_4 _ulsia (real_4 _p_ a_, int_4 _p_ mda_, int_4 _p_ m_, int_4 _p_ n_, real_4 _p_ b_, int_4 _p_ mdb_, int_4 _p_ nb_,
83131 real_4 _p_ re_, real_4 _p_ ae_, int_4 _p_ key_, int_4 _p_ mode_, int_4 _p_ np_, int_4 _p_ krank_, int_4 _p_ ksure_,
83132 real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
83133 { // ** body not listed **
83382 }
83383
83384 int_4 _usrmat (int_4 _p_ i_, int_4 _p_ j_, real_4 _p_ aij_, int_4 _p_ indcat_, real_4 _p_ prgopt_, real_4 _p_ dattrv_,
83385 int_4 _p_ iflag_)
83386 { // ** body not listed **
83424 }
83425
83426 real_4 _vnwrms (int_4 _p_ n_, real_4 _p_ v_, real_4 _p_ w_)
83427 { // ** body not listed **
83439 }
83440
83441 int_4 _wnlit (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ m_, int_4 _p_ n_, int_4 _p_ l_, int_4 _p_ ipivot_, int_4 _p_
83442 itype_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ rnorm_, int_4 _p_ idope_, real_4 _p_ dope_, logical_4 _p_ done_)
83443 { // ** body not listed **
83608 }
83609
83610 int_4 _wnlsm (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ mme_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_, real_4 _p_
83611 prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ ipivot_, int_4 _p_ itype_, real_4 _p_ wd_, real_4
83612 _p_ h_, real_4 _p_ scale_, real_4 _p_ z_, real_4 _p_ temp_, real_4 _p_ d_)
83613 { // ** body not listed **
84040 }
84041
84042 int_4 _wnlt1 (int_4 _p_ i_, int_4 _p_ lend_, int_4 _p_ mend_, int_4 _p_ ir_, int_4 _p_ mdw_, logical_4 _p_ recalc_,
84043 int_4 _p_ imax_, real_4 _p_ hbar_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ w_)
84044 { // ** body not listed **
84069 }
84070
84071 logical_4 _wnlt2 (int_4 _p_ me_, int_4 _p_ mend_, int_4 _p_ ir_, real_4 _p_ factor_, real_4 _p_ tau_, real_4 _p_ scale_
84072 , real_4 _p_ wic_)
84073 { // ** body not listed **
84095 }
84096
84097 int_4 _wnlt3 (int_4 _p_ i_, int_4 _p_ imax_, int_4 _p_ m_, int_4 _p_ mdw_, int_4 _p_ ipivot_, real_4 _p_ h_, real_4 _p_
84098 w_)
84099 { // ** body not listed **
84114 }
84115
84116 int_4 _wnnls (real_4 _p_ w_, int_4 _p_ mdw_, int_4 _p_ me_, int_4 _p_ ma_, int_4 _p_ n_, int_4 _p_ l_, real_4 _p_
84117 prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_4 _p_ work_)
84118 { // ** body not listed **
84240 }
84241
84242 int_4 _xadj (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
84243 { // ** body not listed **
84297 }
84298
84299 int_4 _xc210 (int_4 _p_ k_, real_4 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_)
84300 { // ** body not listed **
84364 }
84365
84366 real_4 _xpsi (real_4 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_)
84367 { // ** body not listed **
84524 }
84525
84526 int_4 _xred (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
84527 { // ** body not listed **
84598 }
84599
84600 int_4 _yairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ bi_, real_4 _p_ dbi_)
84601 { // ** body not listed **
86438 }
86439
© 2002-2025 J.M. van der Veer (jmvdveer@xs4all.nl)
|