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.17
111 */
112 #if defined (__GNUC__)
113 #pragma GCC diagnostic ignored "-Wimplicit-function-declaration"
114 #pragma GCC diagnostic ignored "-Wincompatible-pointer-types"
115 #if (__GNUC__ >= 14)
116 #pragma GCC diagnostic ignored "-Wdeclaration-missing-parameter-type"
117 #pragma GCC diagnostic ignored "-Wimplicit-int"
118 #pragma GCC diagnostic ignored "-Wint-conversion"
119 #pragma GCC diagnostic ignored "-Wreturn-mismatch"
120 #endif
121 #else
122 #error VIF requires GCC
123 #endif
903 static CALLS __calls[__ncalls] = {
904 {"aaaaaa", 0}, // subroutine
905 {"asyik", 0}, // subroutine
906 {"asyjy", 0}, // subroutine
907 {"avint", 0}, // subroutine
908 {"bcrh", 0}, // function
909 {"bdiff", 0}, // subroutine
910 {"bksol", 0}, // subroutine
911 {"blktr1", 0}, // subroutine
912 {"bndacc", 0}, // subroutine
913 {"bndsol", 0}, // subroutine
914 {"bsgq8", 0}, // subroutine
915 {"bsplvd", 0}, // subroutine
916 {"bsplvn", 0}, // subroutine
917 {"bsrh", 0}, // function
918 {"c1merg", 0}, // subroutine
919 {"casyi", 0}, // subroutine
920 {"cblkt1", 0}, // subroutine
921 {"ccmpb", 0}, // subroutine
922 {"cfod", 0}, // subroutine
923 {"cgeev", 0}, // subroutine
924 {"cgefs", 0}, // subroutine
925 {"cgeir", 0}, // subroutine
926 {"chiev", 0}, // subroutine
927 {"chkpr4", 0}, // subroutine
928 {"chkprm", 0}, // subroutine
929 {"chksn4", 0}, // subroutine
930 {"chksng", 0}, // subroutine
931 {"cmpcsg", 0}, // subroutine
932 {"cmposd", 0}, // subroutine
933 {"cmposn", 0}, // subroutine
934 {"cmposp", 0}, // subroutine
935 {"cmptr3", 0}, // subroutine
936 {"cmptrx", 0}, // subroutine
937 {"cnbco", 0}, // subroutine
938 {"cnbdi", 0}, // subroutine
939 {"cnbfa", 0}, // subroutine
940 {"cnbfs", 0}, // subroutine
941 {"cnbir", 0}, // subroutine
942 {"cnbsl", 0}, // subroutine
943 {"compb", 0}, // subroutine
944 {"cosgen", 0}, // subroutine
945 {"cpadd", 0}, // subroutine
946 {"cpevl", 0}, // subroutine
947 {"cpevlr", 0}, // subroutine
948 {"cpofs", 0}, // subroutine
949 {"cpoir", 0}, // subroutine
950 {"cpqr79", 0}, // subroutine
951 {"cproc", 0}, // subroutine
952 {"cprocp", 0}, // subroutine
953 {"cprod", 0}, // subroutine
954 {"cprodp", 0}, // subroutine
955 {"cpzero", 0}, // subroutine
956 {"crati", 0}, // subroutine
957 {"cs1s2", 0}, // subroutine
958 {"cscale", 0}, // subroutine
959 {"cshch", 0}, // subroutine
960 {"cuchk", 0}, // subroutine
961 {"cunhj", 0}, // subroutine
962 {"cunik", 0}, // subroutine
963 {"cv", 0}, // real*4 function
964 {"d1merg", 0}, // subroutine
965 {"d1mpyq", 0}, // subroutine
966 {"d1updt", 0}, // subroutine
967 {"dasyik", 0}, // subroutine
968 {"davint", 0}, // subroutine
969 {"dbdiff", 0}, // subroutine
970 {"dbksol", 0}, // subroutine
971 {"dbndac", 0}, // subroutine
972 {"dbndsl", 0}, // subroutine
973 {"dbocls", 0}, // subroutine
974 {"dbols", 0}, // subroutine
975 {"dbolsm", 0}, // subroutine
976 {"dbsgq8", 0}, // subroutine
977 {"dcfod", 0}, // subroutine
978 {"dckder", 0}, // subroutine
979 {"dcoef", 0}, // subroutine
980 {"dcov", 0}, // subroutine
981 {"dcscal", 0}, // subroutine
982 {"dcv", 0}, // real*8 function
983 {"ddes", 0}, // subroutine
984 {"ddoglg", 0}, // subroutine
985 {"defcmn", 0}, // subroutine
986 {"defe4", 0}, // subroutine
987 {"defehl", 0}, // subroutine
988 {"defer", 0}, // subroutine
989 {"denorm", 0}, // real*8 function
990 {"derkfs", 0}, // subroutine
991 {"des", 0}, // subroutine
992 {"dfcmn", 0}, // subroutine
993 {"dfdjc1", 0}, // subroutine
994 {"dfdjc3", 0}, // subroutine
995 {"dfehl", 0}, // subroutine
996 {"dfspvd", 0}, // subroutine
997 {"dfspvn", 0}, // subroutine
998 {"dfulmt", 0}, // subroutine
999 {"dfzero", 0}, // subroutine
1000 {"dgaus8", 0}, // subroutine
1001 {"dgefs", 0}, // subroutine
1002 {"dglss", 0}, // subroutine
1003 {"dh12", 0}, // subroutine
1004 {"dhfti", 0}, // subroutine
1005 {"dhstrt", 0}, // subroutine
1006 {"dhvnrm", 0}, // real*8 function
1007 {"djairy", 0}, // subroutine
1008 {"dllsia", 0}, // subroutine
1009 {"dlpdp", 0}, // subroutine
1010 {"dlsei", 0}, // subroutine
1011 {"dlsi", 0}, // subroutine
1012 {"dlssud", 0}, // subroutine
1013 {"dmacon", 0}, // subroutine
1014 {"dmgsbv", 0}, // subroutine
1015 {"dmpar", 0}, // subroutine
1016 {"dnbco", 0}, // subroutine
1017 {"dnbdi", 0}, // subroutine
1018 {"dnbfa", 0}, // subroutine
1019 {"dnbfs", 0}, // subroutine
1020 {"dnbsl", 0}, // subroutine
1021 {"dnls1e", 0}, // subroutine
1022 {"dnls1", 0}, // subroutine
1023 {"dnsqe", 0}, // subroutine
1024 {"dnsq", 0}, // subroutine
1025 {"dohtrl", 0}, // subroutine
1026 {"dorthr", 0}, // subroutine
1027 {"dp1vlu", 0}, // subroutine
1028 {"dpchng", 0}, // subroutine
1029 {"dpcoef", 0}, // subroutine
1030 {"dpincw", 0}, // subroutine
1031 {"dpinit", 0}, // subroutine
1032 {"dpintm", 0}, // subroutine
1033 {"dplint", 0}, // subroutine
1034 {"dplpce", 0}, // subroutine
1035 {"dplpdm", 0}, // subroutine
1036 {"dplpfe", 0}, // subroutine
1037 {"dplpfl", 0}, // subroutine
1038 {"dplpmn", 0}, // subroutine
1039 {"dplpmu", 0}, // subroutine
1040 {"dplpup", 0}, // subroutine
1041 {"dpnnzr", 0}, // subroutine
1042 {"dpofs", 0}, // subroutine
1043 {"dpolcf", 0}, // subroutine
1044 {"dpolft", 0}, // subroutine
1045 {"dpolvl", 0}, // subroutine
1046 {"dpopt", 0}, // subroutine
1047 {"dpperm", 0}, // subroutine
1048 {"dppgq8", 0}, // subroutine
1049 {"dprvec", 0}, // real*8 function
1050 {"dprwpg", 0}, // subroutine
1051 {"dprwvr", 0}, // subroutine
1052 {"dpsixn", 0}, // real*8 function
1053 {"dpsort", 0}, // subroutine
1054 {"dqdota", 0}, // real*8 function
1055 {"dqdoti", 0}, // real*8 function
1056 {"dqform", 0}, // subroutine
1057 {"dqrfac", 0}, // subroutine
1058 {"dqrslv", 0}, // subroutine
1059 {"drc3jj", 0}, // subroutine
1060 {"drc3jm", 0}, // subroutine
1061 {"drc6j", 0}, // subroutine
1062 {"drc", 0}, // real*8 function
1063 {"drd", 0}, // real*8 function
1064 {"dreadp", 0}, // subroutine
1065 {"dreort", 0}, // subroutine
1066 {"drf", 0}, // real*8 function
1067 {"drj", 0}, // real*8 function
1068 {"drkfs", 0}, // subroutine
1069 {"dsort", 0}, // subroutine
1070 {"dsoseq", 0}, // subroutine
1071 {"dsos", 0}, // subroutine
1072 {"dsossl", 0}, // subroutine
1073 {"dsplp", 0}, // subroutine
1074 {"dstor1", 0}, // subroutine
1075 {"dstway", 0}, // subroutine
1076 {"dsuds", 0}, // subroutine
1077 {"du11ls", 0}, // subroutine
1078 {"du11us", 0}, // subroutine
1079 {"du12ls", 0}, // subroutine
1080 {"du12us", 0}, // subroutine
1081 {"dulsia", 0}, // subroutine
1082 {"dusrmt", 0}, // subroutine
1083 {"dvecs", 0}, // subroutine
1084 {"dvnrms", 0}, // real*8 function
1085 {"dwnlit", 0}, // subroutine
1086 {"dwnlsm", 0}, // subroutine
1087 {"dwnlt1", 0}, // subroutine
1088 {"dwnlt2", 0}, // logical*4 function
1089 {"dwnlt3", 0}, // subroutine
1090 {"dwnnls", 0}, // subroutine
1091 {"dwritp", 0}, // subroutine
1092 {"dwupdt", 0}, // subroutine
1093 {"dx4", 0}, // subroutine
1094 {"dxadj", 0}, // subroutine
1095 {"dxc210", 0}, // subroutine
1096 {"dx", 0}, // subroutine
1097 {"dxpsi", 0}, // real*8 function
1098 {"dxred", 0}, // subroutine
1099 {"dy4", 0}, // subroutine
1100 {"dyairy", 0}, // subroutine
1101 {"dy", 0}, // subroutine
1102 {"efcmn", 0}, // subroutine
1103 {"fcmn", 0}, // subroutine
1104 {"fdjac3", 0}, // subroutine
1105 {"fdump", 0}, // subroutine
1106 {"fftdoc", 0}, // subroutine
1107 {"fulmat", 0}, // subroutine
1108 {"fzero", 0}, // subroutine
1109 {"gamrn", 0}, // real*4 function
1110 {"gaus8", 0}, // subroutine
1111 {"h12", 0}, // subroutine
1112 {"hfti", 0}, // subroutine
1113 {"hkseq", 0}, // subroutine
1114 {"hpperm", 0}, // subroutine
1115 {"hpsort", 0}, // subroutine
1116 {"hstart", 0}, // subroutine
1117 {"hstcs1", 0}, // subroutine
1118 {"hvnrm", 0}, // function
1119 {"hwscs1", 0}, // subroutine
1120 {"hwsss1", 0}, // subroutine
1121 {"i1merg", 0}, // subroutine
1122 {"idloc", 0}, // integer*4 function
1123 {"indxa", 0}, // subroutine
1124 {"indxb", 0}, // subroutine
1125 {"indxc", 0}, // subroutine
1126 {"inxca", 0}, // subroutine
1127 {"inxcb", 0}, // subroutine
1128 {"inxcc", 0}, // subroutine
1129 {"iploc", 0}, // integer*4 function
1130 {"ipperm", 0}, // subroutine
1131 {"ipsort", 0}, // subroutine
1132 {"isort", 0}, // subroutine
1133 {"jairy", 0}, // subroutine
1134 {"llsia", 0}, // subroutine
1135 {"lpdp", 0}, // subroutine
1136 {"lsei", 0}, // subroutine
1137 {"lsi", 0}, // subroutine
1138 {"lssods", 0}, // subroutine
1139 {"lssuds", 0}, // subroutine
1140 {"macon", 0}, // subroutine
1141 {"mgsbv", 0}, // subroutine
1142 {"minso4", 0}, // subroutine
1143 {"minsol", 0}, // subroutine
1144 {"mpadd2", 0}, // subroutine
1145 {"mpadd3", 0}, // subroutine
1146 {"mpadd", 0}, // subroutine
1147 {"mpblas", 0}, // subroutine
1148 {"mpcdm", 0}, // subroutine
1149 {"mpchk", 0}, // subroutine
1150 {"mpcmd", 0}, // subroutine
1151 {"mpdivi", 0}, // subroutine
1152 {"mperr", 0}, // subroutine
1153 {"mpmaxr", 0}, // subroutine
1154 {"mpmlp", 0}, // subroutine
1155 {"mpmul2", 0}, // subroutine
1156 {"mpmul", 0}, // subroutine
1157 {"mpmuli", 0}, // subroutine
1158 {"mpnzr", 0}, // subroutine
1159 {"mpovfl", 0}, // subroutine
1160 {"mpstr", 0}, // subroutine
1161 {"mpunfl", 0}, // subroutine
1162 {"numxer", 0}, // function
1163 {"ohtrol", 0}, // subroutine
1164 {"ohtror", 0}, // subroutine
1165 {"ortho4", 0}, // subroutine
1166 {"orthog", 0}, // subroutine
1167 {"orthol", 0}, // subroutine
1168 {"orthor", 0}, // subroutine
1169 {"pchngs", 0}, // subroutine
1170 {"pcoef", 0}, // subroutine
1171 {"pgsf", 0}, // function
1172 {"pimach", 0}, // function
1173 {"pinitm", 0}, // subroutine
1174 {"pnnzrs", 0}, // subroutine
1175 {"poisd2", 0}, // subroutine
1176 {"poisn2", 0}, // subroutine
1177 {"poisp2", 0}, // subroutine
1178 {"polcof", 0}, // subroutine
1179 {"polfit", 0}, // subroutine
1180 {"polint", 0}, // subroutine
1181 {"polyvl", 0}, // subroutine
1182 {"pos3d1", 0}, // subroutine
1183 {"postg2", 0}, // subroutine
1184 {"ppadd", 0}, // subroutine
1185 {"ppgq8", 0}, // subroutine
1186 {"ppgsf", 0}, // function
1187 {"pppsf", 0}, // function
1188 {"ppsgf", 0}, // function
1189 {"ppspf", 0}, // function
1190 {"proc", 0}, // subroutine
1191 {"procp", 0}, // subroutine
1192 {"prod", 0}, // subroutine
1193 {"prodp", 0}, // subroutine
1194 {"prvec", 0}, // function
1195 {"prwpge", 0}, // subroutine
1196 {"prwvir", 0}, // subroutine
1197 {"psgf", 0}, // function
1198 {"psifn", 0}, // subroutine
1199 {"psixn", 0}, // function
1200 {"pvalue", 0}, // subroutine
1201 {"pythag", 0}, // real*4 function
1202 {"rc3jj", 0}, // subroutine
1203 {"rc3jm", 0}, // subroutine
1204 {"rc6j", 0}, // subroutine
1205 {"rc", 0}, // real*4 function
1206 {"rd", 0}, // real*4 function
1207 {"reort", 0}, // subroutine
1208 {"rf", 0}, // real*4 function
1209 {"rj", 0}, // real*4 function
1210 {"rpqr79", 0}, // subroutine
1211 {"rpzero", 0}, // subroutine
1212 {"s1merg", 0}, // subroutine
1213 {"sbocls", 0}, // subroutine
1214 {"sbols", 0}, // subroutine
1215 {"sbolsm", 0}, // subroutine
1216 {"sclosm", 0}, // subroutine
1217 {"scoef", 0}, // subroutine
1218 {"scov", 0}, // subroutine
1219 {"sgeev", 0}, // subroutine
1220 {"sgefs", 0}, // subroutine
1221 {"sgeir", 0}, // subroutine
1222 {"sglss", 0}, // subroutine
1223 {"snbco", 0}, // subroutine
1224 {"snbdi", 0}, // subroutine
1225 {"snbfa", 0}, // subroutine
1226 {"snbfs", 0}, // subroutine
1227 {"snbir", 0}, // subroutine
1228 {"snbsl", 0}, // subroutine
1229 {"snls1e", 0}, // subroutine
1230 {"snls1", 0}, // subroutine
1231 {"snsqe", 0}, // subroutine
1232 {"snsq", 0}, // subroutine
1233 {"sods", 0}, // subroutine
1234 {"sopenm", 0}, // subroutine
1235 {"soseqs", 0}, // subroutine
1236 {"sos", 0}, // subroutine
1237 {"sossol", 0}, // subroutine
1238 {"speli4", 0}, // subroutine
1239 {"spelip", 0}, // subroutine
1240 {"spincw", 0}, // subroutine
1241 {"spinit", 0}, // subroutine
1242 {"splpce", 0}, // subroutine
1243 {"splpdm", 0}, // subroutine
1244 {"splp", 0}, // subroutine
1245 {"splpfe", 0}, // subroutine
1246 {"splpfl", 0}, // subroutine
1247 {"splpmn", 0}, // subroutine
1248 {"splpmu", 0}, // subroutine
1249 {"splpup", 0}, // subroutine
1250 {"spofs", 0}, // subroutine
1251 {"spoir", 0}, // subroutine
1252 {"spopt", 0}, // subroutine
1253 {"spperm", 0}, // subroutine
1254 {"spsort", 0}, // subroutine
1255 {"sreadp", 0}, // subroutine
1256 {"ssiev", 0}, // subroutine
1257 {"ssort", 0}, // subroutine
1258 {"stor1", 0}, // subroutine
1259 {"stway", 0}, // subroutine
1260 {"suds", 0}, // subroutine
1261 {"svecs", 0}, // subroutine
1262 {"swritp", 0}, // subroutine
1263 {"tevlc", 0}, // subroutine
1264 {"tevls", 0}, // subroutine
1265 {"tri3", 0}, // subroutine
1266 {"tridq", 0}, // subroutine
1267 {"tris4", 0}, // subroutine
1268 {"trisp", 0}, // subroutine
1269 {"trix", 0}, // subroutine
1270 {"u11ls", 0}, // subroutine
1271 {"u11us", 0}, // subroutine
1272 {"u12ls", 0}, // subroutine
1273 {"u12us", 0}, // subroutine
1274 {"ulsia", 0}, // subroutine
1275 {"usrmat", 0}, // subroutine
1276 {"vnwrms", 0}, // real*4 function
1277 {"wnlit", 0}, // subroutine
1278 {"wnlsm", 0}, // subroutine
1279 {"wnlt1", 0}, // subroutine
1280 {"wnlt2", 0}, // logical*4 function
1281 {"wnlt3", 0}, // subroutine
1282 {"wnnls", 0}, // subroutine
1283 {"xadj", 0}, // subroutine
1284 {"xc210", 0}, // subroutine
1285 {"xpsi", 0}, // real*4 function
1286 {"xred", 0}, // subroutine
1287 {"yairy", 0}, // subroutine
1288 {NULL, 0}
1289 };
1290
1291 static struct {
1292 int_4 npp_, k_, nm_, ncmplx_, ik_;
1293 real_4 eps_, cnv_, machep_;
1294 } ccblk_;
1295 static struct {
1296 int_4 npp_, k_, nm_, ncmplx_, ik_;
1297 real_4 eps_, cnv_, machep_;
1298 } cblkt_;
1299 static struct {
1300 int_4 kswx_, kswy_, k_, l_, mit_, nit_, is_, ms_, js_, ns_;
1301 real_4 ait_, bit_, cit_, dit_, dlx_, dly_, tdlx3_, tdly3_, dlx4_, dly4_;
1302 } spl4_;
1303 static struct {
1304 int_4 kswx_, kswy_, k_, l_, mit_, nit_, is_, ms_, js_, ns_;
1305 real_4 ait_, bit_, cit_, dit_, dlx_, dly_, tdlx3_, tdly3_, dlx4_, dly4_;
1306 } splpcm_;
1307 static struct {
1308 int_4 lpar_;
1309 real_8 eps_, fouru_, sqovfl_, sru_, twou_, uro_;
1310 } dml5mc_;
1311 static struct {
1312 int_4 icoco_, indpvt_, integ_, mxnon_, ndisk_, neq_, neqivp_, nfcc_, nic_, nopg_, nps_, ntape_, ntp_, numort_, nxpts_,
1313 lnfcc_;
1314 real_8 ae_, re_, tol_;
1315 } dml18j_;
1316 static struct {
1317 int_4 lp_, lenl_, lenu_, ncp_, lrow_, lcol_;
1318 real_8 small_;
1319 } la05dd_;
1320 static struct {
1321 int_4 mpb_, mpt_, mpm_, mplun_, mpmxr_, mpr_[30], b_, t_, m_, lun_, mxr_, r_[30];
1322 } mpcom_;
1323 static struct {
1324 int_4 igofx_, inhomo_, ivp_, ncompd_, nfc_, ncomp_;
1325 real_8 c_, xsav_;
1326 } dml8sz_;
1327 static struct {
1328 int_4 info_[15], istkop_, knswot_, kop_, lotjp_, mnswot_, nswot_;
1329 real_8 pwcnd_, px_, tnd_, x_, xbeg_, xend_, xop_, xot_;
1330 } dml15t_;
1331 static struct {
1332 int_4 l_, l2_, kmax_;
1333 real_8 radix_, radixl_, rad2l_, dlg10r_;
1334 } dxblk2_;
1335 static struct {
1336 int_4 nlg102_, mlg102_, lg102_[21];
1337 } dxblk3_;
1338 static struct {
1339 int_4 lpar_;
1340 real_4 uro_, sru_, eps_, sqovfl_, twou_, fouru_;
1341 } ml5mco_;
1342 static struct {
1343 int_4 nxpts_, nic_, nopg_, mxnon_, ndisk_, ntape_, neq_, indpvt_, integ_, nps_, ntp_, neqivp_, numort_, nfcc_, icoco_,
1344 lnfcc_;
1345 real_4 ae_, re_, tol_;
1346 } ml18jr_;
1347 static struct {
1348 int_4 igofx_, inhomo_, ivp_, ncompd_, nfc_, ncomp_;
1349 real_4 c_, xsav_;
1350 } ml8sz_;
1351 static struct {
1352 int_4 info_[15], istkop_, knswot_, kop_, lotjp_, mnswot_, nswot_;
1353 real_4 px_, pwcnd_, tnd_, x_, xbeg_, xend_, xot_, xop_;
1354 } ml15to_;
1355 static struct {
1356 int_4 lp_, lenl_, lenu_, ncp_, lrow_, lcol_;
1357 real_4 small_;
1358 } la05ds_;
1359 static struct {
1360 int_4 l_, l2_, kmax_;
1361 real_4 radix_, radixl_, rad2l_, dlg10r_;
1362 } xblk2_;
1363 static struct {
1364 int_4 nlg102_, mlg102_, lg102_[21];
1365 } xblk3_;
1368 arg_, int_4 _p_ in_, real_4 _p_ y_);
1370 y_, real_4 _p_ wk_, int_4 _p_ iflw_);
1372 int_4 _p_ ierr_);
1374 real_4 (*_f)(), real_4 _p_ sgn_);
1378 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
1379 _p_ w3_, real_4 _p_ wd_, real_4 _p_ ww_, real_4 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)());
1381 int_4 _p_ jt_);
1383 real_4 _p_ x_, int_4 _p_ n_, real_4 _p_ rnorm_);
1385 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_);
1387 nderiv_);
1389 vnikx_);
1391 real_4 (*_f)(), real_4 _p_ sgn_);
1393 );
1395 nz_, real_4 _p_ rl_, real_4 _p_ tol_, real_4 _p_ elim_, real_4 _p_ alim_);
1397 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
1398 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ wd_, complex_8 _p_ ww_, complex_8 _p_ wu_, int_4 (*_prdct)(), int_4
1399 (*_cprdct)());
1401 real_4 _p_ ah_, real_4 _p_ bh_);
1404 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1406 ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1408 ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1410 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1412 c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 _p_ idmn_, int_4 _p_ ierror_);
1414 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_
1415 idmn_, int_4 _p_ ierror_);
1417 logical_4 _p_ singlr_);
1419 real_4 _p_ xnu_, int_4 (*_cofx)(), int_4 (*_cofy)(), logical_4 _p_ singlr_);
1422 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
1423 _p_ tcos_, complex_8 _p_ p_);
1425 _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_,
1426 complex_8 _p_ w_, complex_8 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_);
1428 _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_,
1429 complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_);
1431 _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_
1432 w2_, complex_8 _p_ w3_);
1434 complex_8 _p_ c_, complex_8 _p_ y_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w_);
1436 , real_4 _p_ rcond_, complex_8 _p_ z_);
1438 , complex_8 _p_ det_);
1440 , int_4 _p_ info_);
1442 v_, int_4 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1444 v_, int_4 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1446 , complex_8 _p_ b_, int_4 _p_ job_);
1448 real_4 _p_ ah_, real_4 _p_ bh_);
1451 bp_, real_4 _p_ bh_);
1453 b_, logical_4 _p_ kbd_);
1456 ind_, complex_8 _p_ work_);
1458 ind_, complex_8 _p_ work_);
1460 ;
1462 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_
1463 b_, complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, real_4 _p_ yy_);
1465 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_
1466 b_, complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, real_4 _p_ yy_);
1468 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
1469 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ y_);
1471 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
1472 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ y_);
1474 _p_ s_);
1477 real_4 _p_ alim_, int_4 _p_ iuf_);
1479 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_)
1480 ;
1484 complex_8 _p_ arg_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ asum_, complex_8 _p_ bsum_);
1486 _p_ init_, complex_8 _p_ phi_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ sum_, complex_8 _p_ cwrk_);
1488 _p_ bkpt_, real_4 _p_ w_);
1492 _p_ w_, logical_4 _p_ sing_);
1494 arg_, int_4 _p_ in_, real_8 _p_ y_);
1496 int_4 _p_ ierr_);
1500 int_4 _p_ jt_);
1502 real_8 _p_ x_, int_4 _p_ n_, real_8 _p_ rnorm_);
1504 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_
1505 mode_, real_8 _p_ rw_, int_4 _p_ iw_);
1507 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_)
1508 ;
1510 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_
1511 , real_8 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_);
1513 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_);
1516 ldfjac_, real_8 _p_ xp_, real_8 _p_ fvecp_, int_4 _p_ mode_, real_8 _p_ err_);
1518 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_
1519 by_, real_8 _p_ cvec_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_);
1521 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_);
1523 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_)
1524 ;
1526 _p_ bkpt_, real_8 _p_ w_);
1528 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_,
1529 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_,
1530 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
1531 _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_
1532 start_, logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4
1533 _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_,
1534 int_4 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_8 _p_ rpar_, int_4 _p_ ipar_);
1536 delta_, real_8 _p_ x_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1538 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
1539 _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
1540 _p_ lw_);
1543 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
1544 _p_ ipar_);
1548 , 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_
1549 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_
1550 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_,
1551 logical_4 _p_ stiff_, logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_4 _p_ rpar_, int_4 _p_ ipar_);
1553 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_,
1554 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_,
1555 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
1556 _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_
1557 start_, logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4
1558 _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_,
1559 int_4 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_4 _p_ rpar_, int_4 _p_ ipar_);
1561 int_4 _p_ nbkpt_, real_8 _p_ bkptin_, int_4 _p_ nconst_, real_8 _p_ xconst_, real_8 _p_ yconst_, int_4 _p_ nderiv_,
1562 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_
1563 g_, int_4 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, real_8 _p_ work_, int_4 _p_ iwork_);
1565 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_);
1567 , int_4 _p_ ldfjac_, int_4 _p_ iflag_, real_8 _p_ epsfcn_, real_8 _p_ wa_);
1569 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
1570 _p_ ipar_);
1572 nderiv_);
1574 vnikx_);
1576 dattrv_, int_4 _p_ iflag_);
1578 int_4 _p_ iflag_);
1580 ierr_);
1582 real_8 _p_ work_, int_4 _p_ iwork_);
1584 _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_);
1586 real_8 _p_ up_, real_8 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_);
1588 _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_);
1590 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_,
1591 real_8 _p_ yp_, real_8 _p_ sf_, real_8 _p_ rpar_, int_4 _p_ ipar_, real_8 _p_ h_);
1595 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
1596 _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_);
1598 real_8 _p_ x_, real_8 _p_ wnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ is_);
1600 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_
1601 ip_);
1603 real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_);
1605 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_,
1606 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_
1607 scales_);
1610 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_);
1612 , real_8 _p_ delta_, real_8 _p_ par_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1614 real_8 _p_ rcond_, real_8 _p_ z_);
1616 real_8 _p_ det_);
1618 int_4 _p_ info_);
1620 int_4 _p_ itask_, int_4 _p_ ind_, real_8 _p_ work_, int_4 _p_ iwork_);
1622 real_8 _p_ b_, int_4 _p_ job_);
1624 , real_8 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_8 _p_ wa_, int_4 _p_ lwa_);
1626 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
1627 _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_
1628 , 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_
1629 );
1631 fvec_, real_8 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_8 _p_ wa_, int_4 _p_ lwa_);
1633 , 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_
1634 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_,
1635 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_,
1636 real_8 _p_ wa4_);
1638 div_, real_8 _p_ td_);
1640 , int_4 _p_ iscale_, real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ scales_, real_8 _p_ rows_, real_8 _p_ rs_);
1642 ;
1644 ircx_);
1647 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_
1648 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_,
1649 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_,
1650 real_8 _p_ duals_, logical_4 _p_ stpedg_);
1652 _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_
1653 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_,
1654 int_4 _p_ imat_, logical_4 _p_ lopt_);
1658 _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
1659 _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_,
1660 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_
1661 singlr_, logical_4 _p_ redbas_);
1663 _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
1664 _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
1665 _p_ basmat_, real_8 _p_ csc_, real_8 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_);
1667 _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
1668 _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_
1669 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_
1670 rg_, real_8 _p_ colnrm_, real_8 _p_ duals_, logical_4 _p_ found_);
1672 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_
1673 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_,
1674 logical_4 _p_ zerolv_);
1676 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_,
1677 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_
1678 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_
1679 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_
1680 iwr_);
1682 _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_,
1683 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_,
1684 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_
1685 theta_, real_8 _p_ costsc_, real_8 _p_ xlamda_, real_8 _p_ rhsnrm_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_
1686 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_
1687 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_,
1688 real_8 _p_ duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_);
1690 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
1691 _p_ sizeup_, real_8 _p_ asmall_, real_8 _p_ abig_);
1693 ircx_);
1695 real_8 _p_ work_);
1698 real_8 _p_ eps_, real_8 _p_ r_, int_4 _p_ ierr_, real_8 _p_ a_);
1700 , real_8 _p_ c_, real_8 _p_ work_, int_4 _p_ ierr_);
1702 int_4 _p_ ibasis_, real_8 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_);
1705 , 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_);
1712 int_4 _p_ incy_);
1714 int_4 _p_ incy_);
1717 ipvt_, int_4 _p_ lipvt_, real_8 _p_ sigma_, real_8 _p_ acnorm_, real_8 _p_ wa_);
1719 qtb_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa_);
1721 l1max_, real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1723 m2max_, real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1725 l1min_, real_8 _p_ l1max_, real_8 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1730 w_, real_8 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, real_8 _p_ stowa_, int_4 _p_ iflag_);
1734 , 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_
1735 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_
1736 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_,
1737 logical_4 _p_ stiff_, logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_8 _p_ rpar_, int_4 _p_ ipar_);
1740 _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_,
1741 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
1742 _p_ y_, real_8 _p_ fac_, int_4 _p_ is_);
1744 _p_ tolf_, int_4 _p_ iflag_, real_8 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_);
1746 _p_ m_);
1748 , 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_
1749 duals_, int_4 _p_ ibasis_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_);
1751 ndisk_, int_4 _p_ ntape_);
1754 int_4 _p_ iflag_, int_4 _p_ mlso_, real_8 _p_ work_, int_4 _p_ iwork_);
1756 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
1757 _p_ ic_, int_4 _p_ ir_);
1759 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
1760 _p_ ir_, int_4 _p_ ic_);
1762 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
1763 _p_ ir_);
1765 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
1766 _p_ ic_);
1768 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
1769 _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_);
1771 dattrv_, int_4 _p_ iflag_);
1773 _p_ inhomo_, int_4 _p_ iflag_);
1776 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
1777 _p_ done_);
1779 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_
1780 wd_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ z_, real_8 _p_ temp_, real_8 _p_ d_);
1782 recalc_, int_4 _p_ imax_, real_8 _p_ hbar_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ w_);
1784 _p_ scale_, real_8 _p_ wic_);
1786 real_8 _p_ w_);
1788 real_8 _p_ prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_8 _p_ work_);
1791 real_8 _p_ cos_, real_8 _p_ sin_);
1802 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
1803 _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
1804 _p_ lw_);
1806 int_4 _p_ nbkpt_, real_4 _p_ bkptin_, int_4 _p_ nconst_, real_4 _p_ xconst_, real_4 _p_ yconst_, int_4 _p_ nderiv_,
1807 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_
1808 g_, int_4 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, real_4 _p_ work_, int_4 _p_ iwork_);
1810 , int_4 _p_ ldfjac_, int_4 _p_ iflag_, real_4 _p_ epsfcn_, real_4 _p_ wa_);
1814 dattrv_, int_4 _p_ iflag_);
1816 int_4 _p_ iflag_);
1819 ierr_);
1821 real_4 _p_ up_, real_4 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_);
1823 _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_);
1827 _p_ kflag_, char _p_ work_, int_4 _p_ ier_);
1829 , 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_
1830 yp_, real_4 _p_ sf_, real_4 _p_ rpar_, int_4 _p_ ipar_, real_4 _p_ h_);
1832 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_,
1833 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_
1834 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_
1835 );
1838 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_
1839 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
1840 _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_
1841 sint_, real_4 _p_ bmh_);
1843 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_
1844 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
1845 _p_ sn_, real_4 _p_ ss_, real_4 _p_ sint_, real_4 _p_ d_);
1860 _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_
1861 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_);
1863 real_4 _p_ x_, real_4 _p_ wnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ is_);
1865 _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_);
1867 real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_);
1869 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_
1870 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_
1871 scales_);
1873 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_,
1874 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_
1875 scales_);
1878 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_);
1901 div_, real_4 _p_ td_);
1903 div_, real_4 _p_ td_);
1907 , int_4 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ cols_, real_4 _p_ cs_);
1909 , int_4 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ rows_, real_4 _p_ rs_);
1911 ircx_);
1917 ircx_);
1919 , 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_);
1921 , 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
1922 _p_ w2_, real_4 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
1924 _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_
1925 , real_4 _p_ tcos_, real_4 _p_ p_);
1928 real_4 _p_ eps_, real_4 _p_ r_, int_4 _p_ ierr_, real_4 _p_ a_);
1931 , real_4 _p_ c_, real_4 _p_ work_, int_4 _p_ ierr_);
1933 _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_
1934 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_);
1936 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
1937 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
1939 bp_, real_4 _p_ bh_);
1941 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_);
1947 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_,
1948 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ u_);
1950 , 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_,
1951 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ w_);
1953 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_,
1954 real_4 _p_ d_, real_4 _p_ w_, real_4 _p_ u_);
1956 , 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_
1957 c_, real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ w_);
1963 int_4 _p_ ierr_);
1966 ;
1969 l1max_, real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1971 m2max_, real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1973 l1min_, real_4 _p_ l1max_, real_4 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1977 , real_4 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, real_4 _p_ stowa_, int_4 _p_ iflag_);
1982 s_);
1985 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_
1986 mode_, real_4 _p_ rw_, int_4 _p_ iw_);
1988 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_)
1989 ;
1991 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_
1992 , real_4 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_);
1995 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_
1996 by_, real_4 _p_ cvec_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_);
1998 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_);
2000 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
2002 real_4 _p_ work_, int_4 _p_ iwork_);
2004 real_4 _p_ work_, int_4 _p_ iwork_);
2006 _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_);
2008 real_4 _p_ rcond_, real_4 _p_ z_);
2010 real_4 _p_ det_);
2012 int_4 _p_ info_);
2014 int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_);
2016 int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_);
2018 real_4 _p_ b_, int_4 _p_ job_);
2020 , real_4 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_4 _p_ wa_, int_4 _p_ lwa_);
2022 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
2023 _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_
2024 , 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_
2025 );
2027 fvec_, real_4 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_4 _p_ wa_, int_4 _p_ lwa_);
2029 , 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_
2030 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_,
2031 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_,
2032 real_4 _p_ wa4_);
2034 int_4 _p_ iflag_, real_4 _p_ work_, int_4 _p_ iwork_);
2037 _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_,
2038 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
2039 _p_ y_, real_4 _p_ fac_, int_4 _p_ is_);
2041 tolf_, int_4 _p_ iflag_, real_4 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_);
2043 _p_ m_);
2045 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_
2046 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_
2047 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_,
2048 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_
2049 ierror_);
2051 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_
2052 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
2053 (*_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_
2054 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_
2055 , int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_);
2057 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_
2058 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_,
2059 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_,
2060 real_4 _p_ duals_, logical_4 _p_ stpedg_);
2062 _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_
2063 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_,
2064 int_4 _p_ imat_, logical_4 _p_ lopt_);
2066 _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
2067 _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_,
2068 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_
2069 singlr_, logical_4 _p_ redbas_);
2071 _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
2072 _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
2073 _p_ basmat_, real_4 _p_ csc_, real_4 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_);
2075 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_
2076 duals_, int_4 _p_ ibasis_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_);
2078 _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
2079 _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_
2080 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_
2081 rg_, real_4 _p_ colnrm_, real_4 _p_ duals_, logical_4 _p_ found_);
2083 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_
2084 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_,
2085 logical_4 _p_ zerolv_);
2087 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_,
2088 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_
2089 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_
2090 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_
2091 iwr_);
2093 _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_,
2094 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_,
2095 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_
2096 theta_, real_4 _p_ costsc_, real_4 _p_ xlamda_, real_4 _p_ rhsnrm_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_
2097 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_
2098 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_,
2099 real_4 _p_ duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_);
2101 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
2102 _p_ sizeup_, real_4 _p_ asmall_, real_4 _p_ abig_);
2104 real_4 _p_ work_);
2106 real_4 _p_ work_);
2108 int_4 _p_ ibasis_, real_4 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_);
2113 int_4 _p_ info_);
2116 ndisk_, int_4 _p_ ntape_);
2119 int_4 _p_ iflag_, int_4 _p_ mlso_, real_4 _p_ work_, int_4 _p_ iwork_);
2121 _p_ inhomo_, int_4 _p_ iflag_);
2126 _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_);
2129 _p_ z_);
2131 _p_ z_);
2133 real_4 _p_ y_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w_);
2135 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
2136 _p_ ic_, int_4 _p_ ir_);
2138 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
2139 _p_ ir_, int_4 _p_ ic_);
2141 _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_
2142 ir_);
2144 _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_
2145 ic_);
2147 _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_
2148 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_);
2150 dattrv_, int_4 _p_ iflag_);
2153 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
2154 _p_ done_);
2156 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_
2157 wd_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ z_, real_4 _p_ temp_, real_4 _p_ d_);
2159 recalc_, int_4 _p_ imax_, real_4 _p_ hbar_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ w_);
2161 _p_ scale_, real_4 _p_ wic_);
2163 real_4 _p_ w_);
2165 _p_ prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_4 _p_ work_);
2171 int_4 _aaaaaa (char _p_ ver_)
2172 { // ** body not listed **
2176 }
2177
2178 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_,
2179 int_4 _p_ in_, real_4 _p_ y_)
2180 { // ** body not listed **
2589 }
2590
2591 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_,
2592 real_4 _p_ wk_, int_4 _p_ iflw_)
2593 { // ** body not listed **
4673 }
4674
4675 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_
4676 ierr_)
4677 { // ** body not listed **
4823 }
4824
4825 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
4826 (*_f)(), real_4 _p_ sgn_)
4827 { // ** body not listed **
4862 }
4863
4864 int_4 _bdiff (int_4 _p_ l_, real_4 _p_ v_)
4865 { // ** body not listed **
4880 }
4881
4882 int_4 _bksol (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ x_)
4883 { // ** body not listed **
4900 }
4901
4902 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_
4903 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_,
4904 real_4 _p_ wd_, real_4 _p_ ww_, real_4 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)())
4905 { // ** body not listed **
5238 }
5239
5240 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_
5241 )
5242 { // ** body not listed **
5318 }
5319
5320 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_
5321 x_, int_4 _p_ n_, real_4 _p_ rnorm_)
5322 { // ** body not listed **
5410 }
5411
5412 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_
5413 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_)
5414 { // ** body not listed **
5683 }
5684
5685 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_)
5686 { // ** body not listed **
5752 }
5753
5754 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_)
5755 { // ** body not listed **
5858 }
5859
5860 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
5861 (*_f)(), real_4 _p_ sgn_)
5862 { // ** body not listed **
5897 }
5898
5899 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_)
5900 { // ** body not listed **
5939 }
5940
5941 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
5942 _p_ rl_, real_4 _p_ tol_, real_4 _p_ elim_, real_4 _p_ alim_)
5943 { // ** body not listed **
6098 }
6099
6100 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
6101 _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_,
6102 complex_8 _p_ w3_, complex_8 _p_ wd_, complex_8 _p_ ww_, complex_8 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)())
6103 { // ** body not listed **
6436 }
6437
6438 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
6439 _p_ ah_, real_4 _p_ bh_)
6440 { // ** body not listed **
6598 }
6599
6600 int_4 _cfod (int_4 _p_ meth_, real_4 _p_ elco_, real_4 _p_ tesco_)
6601 { // ** body not listed **
6676 }
6677
6678 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_
6679 work_, int_4 _p_ job_, int_4 _p_ info_)
6680 { // ** body not listed **
6775 }
6776
6777 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_,
6778 complex_8 _p_ work_, int_4 _p_ iwork_)
6779 { // ** body not listed **
6970 }
6971
6972 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_,
6973 complex_8 _p_ work_, int_4 _p_ iwork_)
6974 { // ** body not listed **
7184 }
7185
7186 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_
7187 work_, int_4 _p_ job_, int_4 _p_ info_)
7188 { // ** body not listed **
7301 }
7302
7303 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
7304 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 _p_ idmn_, int_4 _p_ ierror_)
7305 { // ** body not listed **
7351 }
7352
7353 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_,
7354 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_,
7355 int_4 _p_ ierror_)
7356 { // ** body not listed **
7411 }
7412
7413 int_4 _chksn4 (int_4 _p_ mbdcnd_, int_4 _p_ nbdcnd_, real_4 _p_ alpha_, real_4 _p_ beta_, int_4 (*_cofx)(), logical_4
7414 _p_ singlr_)
7415 { // ** body not listed **
7440 }
7441
7442 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_
7443 xnu_, int_4 (*_cofx)(), int_4 (*_cofy)(), logical_4 _p_ singlr_)
7444 { // ** body not listed **
7483 }
7484
7485 int_4 _cmpcsg (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, complex_8 _p_ a_)
7486 { // ** body not listed **
7519 }
7520
7521 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_,
7522 complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ w_, complex_8 _p_ d_, complex_8 _p_ tcos_,
7523 complex_8 _p_ p_)
7524 { // ** body not listed **
7946 }
7947
7948 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_,
7949 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
7950 _p_ w_, complex_8 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_)
7951 { // ** body not listed **
8587 }
8588
8589 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_,
8590 int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_, complex_8 _p_ w_, complex_8 _p_ w2_,
8591 complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_)
8592 { // ** body not listed **
8687 }
8688
8689 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_,
8690 complex_8 _p_ y2_, complex_8 _p_ y3_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w1_, complex_8 _p_ w2_,
8691 complex_8 _p_ w3_)
8692 { // ** body not listed **
8802 }
8803
8804 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_
8805 , complex_8 _p_ y_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w_)
8806 { // ** body not listed **
8859 }
8860
8861 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
8862 _p_ rcond_, complex_8 _p_ z_)
8863 { // ** body not listed **
8896 }
8897
8898 s_ = ({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
8899 (zdum__1_));}) / ({complex_8 zdum__1_ = ek_ - z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
8900 (zdum__1_));});
8901 (void) _csscal (n_, &s_, z_, &_k1);
8902 ek_ = CMPLXF (s_, 0.0) * ek_;
8903 _l30:;
8904 wk_ = ek_ - z_[k_ - 1];
8905 wkm_ = -ek_ - z_[k_ - 1];
8906 s_ = ({complex_8 zdum__1_ = wk_; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8907 sm_ = ({complex_8 zdum__1_ = wkm_; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8908 if (({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
8909 (zdum__1_));}) == 0.0e0) {
8910 goto _l40;
8911 }
8912 wk_ = wk_ / conjf (abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]);
8913 wkm_ = wkm_ / conjf (abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]);
8914 goto _l50;
8915 _l40:;
8916 wk_ = CMPLXF (1.0, 0.0);
8917 wkm_ = CMPLXF (1.0, 0.0);
8918 _l50:;
8919 kp1_ = k_ + 1;
8920 ju_ = _min (_max (ju_, (*mu_) + ipvt_[k_ - 1]), (*n_));
8921 mm_ = ml1_;
8922 if (kp1_ > ju_) {
8923 goto _l90;
8924 }
8925
8926 for (i_ = kp1_; i_ <= ju_; (i_)++) {
8927 mm_ = mm_ + 1;
8928 sm_ = sm_ + ({complex_8 zdum__1_ = z_[i_ - 1] + wkm_ * conjf (abe_[k_ - 1 + ((*lda_)) * ((mm_ - 1))]); _abs ((real_4)
8929 (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8930 z_[i_ - 1] = z_[i_ - 1] + wk_ * conjf (abe_[k_ - 1 + ((*lda_)) * ((mm_ - 1))]);
8931 s_ = s_ + ({complex_8 zdum__1_ = z_[i_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8932 }
8933
8934 if (s_ >= sm_) {
8935 goto _l80;
8936 }
8937
8938 t_ = wkm_ - wk_;
8939 wk_ = wkm_;
8940 mm_ = ml1_;
8941 for (i_ = kp1_; i_ <= ju_; (i_)++) {
8942 mm_ = mm_ + 1;
8943 z_[i_ - 1] = z_[i_ - 1] + t_ * conjf (abe_[k_ - 1 + ((*lda_)) * ((mm_ - 1))]);
8944 }
8945
8946 _l80:;
8947 _l90:;
8948 z_[k_ - 1] = wk_;
8949 }
8950
8951 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8952 (void) _csscal (n_, &s_, z_, &_k1);
8953 for (kb_ = 1; kb_ <= (*n_); (kb_)++) {
8954 k_ = (*n_) + 1 - kb_;
8955 nl_ = _min ((*ml_), (*n_) - k_);
8956 if (k_ < (*n_)) {
8957 z_[k_ - 1] = z_[k_ - 1] + _cdotc (&nl_, &abe_[k_ + nl_ - 1 + ((*lda_)) * ((ml1_ - nl_ - 1))], ($0_ = -ldb_, &$0_),
8958 &z_[k_ + 1 - 1], &_k1);
8959 }
8960 if (({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}) <= 1.0e0) {
8961 goto _l110;
8962 }
8963
8964 s_ = 1.0e0 / ({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8965 (void) _csscal (n_, &s_, z_, &_k1);
8966 _l110:;
8967 l_ = ipvt_[k_ - 1];
8968 t_ = z_[l_ - 1];
8969 z_[l_ - 1] = z_[k_ - 1];
8970 z_[k_ - 1] = t_;
8971 }
8972
8973 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8974 (void) _csscal (n_, &s_, z_, &_k1);
8975 ynorm_ = 1.0;
8976 for (k_ = 1; k_ <= (*n_); (k_)++) {
8977 l_ = ipvt_[k_ - 1];
8978 t_ = z_[l_ - 1];
8979 z_[l_ - 1] = z_[k_ - 1];
8980 z_[k_ - 1] = t_;
8981 nl_ = _min ((*ml_), (*n_) - k_);
8982 if (k_ < (*n_)) {
8983 (void) _caxpy (&nl_, &t_, &abe_[k_ + nl_ - 1 + ((*lda_)) * ((ml1_ - nl_ - 1))], ($1_ = -ldb_, &$1_), &z_[k_ + 1 - 1],
8984 &_k1);
8985 }
8986 if (({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}) <= 1.0e0) {
8987 goto _l130;
8988 }
8989
8990 s_ = 1.0e0 / ({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
8991 (void) _csscal (n_, &s_, z_, &_k1);
8992 ynorm_ = s_ * ynorm_;
8993 _l130:;
8994 }
8995
8996 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8997 (void) _csscal (n_, &s_, z_, &_k1);
8998 ynorm_ = s_ * ynorm_;
8999 for (kb_ = 1; kb_ <= (*n_); (kb_)++) {
9000 k_ = (*n_) + 1 - kb_;
9001 if (({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}) <= ({complex_8
9002 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}))
9003 {
9004 goto _l150;
9005 }
9006
9007 s_ = ({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
9008 (zdum__1_));}) / ({complex_8 zdum__1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));});
9009 (void) _csscal (n_, &s_, z_, &_k1);
9010 ynorm_ = s_ * ynorm_;
9011 _l150:;
9012 if (({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
9013 (zdum__1_));}) != 0.0e0) {
9014 z_[k_ - 1] = z_[k_ - 1] / abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))];
9015 }
9016
9017 if (({complex_8 zdum__1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf
9018 (zdum__1_));}) == 0.0e0) {
9019 z_[k_ - 1] = 1.0;
9020 }
9021
9022 lm_ = _min (k_, m_) - 1;
9023 lz_ = k_ - lm_;
9024 t_ = -z_[k_ - 1];
9025 (void) _caxpy (&lm_, &t_, &abe_[k_ - 1 - 1 + ((*lda_)) * (((*ml_) + 2 - 1))], ($2_ = -ldb_, &$2_), &z_[lz_ - 1], &_k1)
9026 ;
9027 }
9028
9029 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
9030 (void) _csscal (n_, &s_, z_, &_k1);
9031 ynorm_ = s_ * ynorm_;
9032 if (anorm_ != 0.0e0) {
9033 (*rcond_) = ynorm_ / anorm_;
9034 }
9035
9036 if (anorm_ == 0.0e0) {
9037 (*rcond_) = 0.0;
9038 }
9039
9040 __calls[33].calls++;
9041 return 0;
9042 }
9043
9044 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_,
9045 complex_8 _p_ det_)
9046 { // ** body not listed **
9064 }
9065
9066 det_[0] = CMPLXF (ten_, 0.0) * det_[0];
9067 det_[1] = det_[1] - CMPLXF (1.0, 0.0);
9068 goto _l10;
9069 _l20:;
9070 _l30:;
9071 if (({complex_8 zdum__1_ = det_[0]; _abs ((real_4) (crealf (zdum__1_))) + _abs (cimagf (zdum__1_));}) < ten_) {
9072 goto _l40;
9073 }
9074
9075 det_[0] = det_[0] / CMPLXF (ten_, 0.0);
9076 det_[1] = det_[1] + CMPLXF (1.0, 0.0);
9077 goto _l30;
9078 _l40:;
9079 }
9080
9081 _l60:;
9082 __calls[34].calls++;
9083 return 0;
9084 }
9085
9086 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
9087 _p_ info_)
9088 { // ** body not listed **
9136 }
9137
9138 _l50:;
9139 ipvt_[(*n_) - 1] = (*n_);
9140 if (({complex_8 zdum__1_ = abe_[(*n_) - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum__1_))) + _abs
9141 (cimagf (zdum__1_));}) == 0.0e0) {
9142 (*info_) = (*n_);
9143 }
9144
9145 __calls[35].calls++;
9146 return 0;
9147 }
9148
9149 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
9150 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_)
9151 { // ** body not listed **
9428 }
9429
9430 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
9431 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_)
9432 { // ** body not listed **
9733 }
9734
9735 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_,
9736 complex_8 _p_ b_, int_4 _p_ job_)
9737 { // ** body not listed **
9807 }
9808
9809 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
9810 _p_ ah_, real_4 _p_ bh_)
9811 { // ** body not listed **
9969 }
9970
9971 int_4 _cosgen (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, real_4 _p_ a_)
9972 { // ** body not listed **
10005 }
10006
10007 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
10008 _p_ bh_)
10009 { // ** body not listed **
10295 }
10296
10297 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_,
10298 logical_4 _p_ kbd_)
10299 { // ** body not listed **
10358 }
10359
10360 int_4 _cpevlr (int_4 _p_ n_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ c_)
10361 { // ** body not listed **
10381 }
10382
10383 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_,
10384 complex_8 _p_ work_)
10385 { // ** body not listed **
10577 }
10578
10579 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_,
10580 complex_8 _p_ work_)
10581 { // ** body not listed **
10796 }
10797
10798 int_4 _cpqr79 (int_4 _p_ ndeg_, complex_8 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_)
10799 { // ** body not listed **
10850 }
10851
10852 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
10853 _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_,
10854 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, real_4 _p_ yy_)
10855 { // ** body not listed **
11008 }
11009
11010 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_,
11011 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_,
11012 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, real_4 _p_ yy_)
11013 { // ** body not listed **
11195 }
11196
11197 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
11198 _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_,
11199 complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ y_)
11200 { // ** body not listed **
11356 }
11357
11358 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_,
11359 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_
11360 , complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ y_)
11361 { // ** body not listed **
11546 }
11547
11548 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_)
11549 { // ** body not listed **
11670 }
11671
11672 int_4 _crati (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ n_, complex_8 _p_ cy_, real_4 _p_ tol_)
11673 { // ** body not listed **
11782 }
11783
11784 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_
11785 alim_, int_4 _p_ iuf_)
11786 { // ** body not listed **
11836 }
11837
11838 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_,
11839 real_4 _p_ rows_, real_4 _p_ rowsav_, real_4 _p_ anorm_, real_4 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
11840 { // ** body not listed **
11924 }
11925
11926 int_4 _cshch (complex_8 _p_ z_, complex_8 _p_ csh_, complex_8 _p_ cch_)
11927 { // ** body not listed **
11943 }
11944
11945 int_4 _cuchk (complex_8 _p_ y_, int_4 _p_ nz_, real_4 _p_ ascle_, real_4 _p_ tol_)
11946 { // ** body not listed **
11965 }
11966
11967 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_
11968 arg_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ asum_, complex_8 _p_ bsum_)
11969 { // ** body not listed **
15224 }
15225
15226 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_,
15227 complex_8 _p_ phi_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ sum_, complex_8 _p_ cwrk_)
15228 { // ** body not listed **
15981 }
15982
15983 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_,
15984 real_4 _p_ w_)
15985 { // ** body not listed **
16015 }
16016
16017 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_)
16018 { // ** body not listed **
16057 }
16058
16059 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_)
16060 { // ** body not listed **
16123 }
16124
16125 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_,
16126 logical_4 _p_ sing_)
16127 { // ** body not listed **
16258 }
16259
16260 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_,
16261 int_4 _p_ in_, real_8 _p_ y_)
16262 { // ** body not listed **
16671 }
16672
16673 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_
16674 ierr_)
16675 { // ** body not listed **
16819 }
16820
16821 int_4 _dbdiff (int_4 _p_ l_, real_8 _p_ v_)
16822 { // ** body not listed **
16837 }
16838
16839 int_4 _dbksol (int_4 _p_ n_, real_8 _p_ a_, real_8 _p_ x_)
16840 { // ** body not listed **
16857 }
16858
16859 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_
16860 )
16861 { // ** body not listed **
16937 }
16938
16939 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_
16940 x_, int_4 _p_ n_, real_8 _p_ rnorm_)
16941 { // ** body not listed **
17029 }
17030
17031 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_,
17032 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_,
17033 real_8 _p_ rw_, int_4 _p_ iw_)
17034 { // ** body not listed **
18559 }
18560
18561 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
18562 _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_)
18563 { // ** body not listed **
19895 }
19896
19897 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_,
19898 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_,
19899 real_8 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_)
19900 { // ** body not listed **
21617 }
21618 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_
21619 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_)
21620 { // ** body not listed **
21891 }
21892
21893 int_4 _dcfod (int_4 _p_ meth_, real_8 _p_ elco_, real_8 _p_ tesco_)
21894 { // ** body not listed **
21969 }
21970
21971 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
21972 _p_ xp_, real_8 _p_ fvecp_, int_4 _p_ mode_, real_8 _p_ err_)
21973 { // ** body not listed **
22045 }
22046
22047 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_,
22048 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_,
22049 real_8 _p_ cvec_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_)
22050 { // ** body not listed **
22184 }
22185
22186 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_
22187 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_)
22188 { // ** body not listed **
22327 }
22328
22329 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_,
22330 real_8 _p_ rows_, real_8 _p_ rowsav_, real_8 _p_ anorm_, real_8 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
22331 { // ** body not listed **
22415 }
22416
22417 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_
22418 , real_8 _p_ w_)
22419 { // ** body not listed **
22449 }
22450
22451 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
22452 _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
22453 _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_
22454 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_,
22455 real_8 _p_ told_, real_8 _p_ delsgn_, real_8 _p_ tstop_, real_8 _p_ twou_, real_8 _p_ fouru_, logical_4 _p_ start_,
22456 logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4 _p_
22457 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
22458 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_8 _p_ rpar_, int_4 _p_ ipar_)
22459 { // ** body not listed **
23338 }
23339
23340 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
23341 _p_ x_, real_8 _p_ wa1_, real_8 _p_ wa2_)
23342 { // ** body not listed **
23451 }
23452
23453 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_
23454 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_,
23455 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_)
23456 { // ** body not listed **
23651 }
23652
23653 int_4 _defe4 (int_4 (*_cofx)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_)
23654 { // ** body not listed **
23686 }
23687
23688 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_
23689 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_)
23690 { // ** body not listed **
23728 }
23729
23730 int_4 _defer (int_4 (*_cofx)(), int_4 (*_cofy)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_)
23731 { // ** body not listed **
23765 }
23766
23767 real_8 _denorm (int_4 _p_ n_, real_8 _p_ x_)
23768 { // ** body not listed **
23865 }
23866
23867 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
23868 _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
23869 _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
23870 _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_,
23871 logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_4 _p_ rpar_, int_4 _p_ ipar_)
23872 { // ** body not listed **
24712 }
24713
24714 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_
24715 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_
24716 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_
24717 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_,
24718 real_4 _p_ told_, real_4 _p_ delsgn_, real_4 _p_ tstop_, real_4 _p_ twou_, real_4 _p_ fouru_, logical_4 _p_ start_,
24719 logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4 _p_
24720 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
24721 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_4 _p_ rpar_, int_4 _p_ ipar_)
24722 { // ** body not listed **
25602 }
25603
25604 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_
25605 nbkpt_, real_8 _p_ bkptin_, int_4 _p_ nconst_, real_8 _p_ xconst_, real_8 _p_ yconst_, int_4 _p_ nderiv_, int_4 _p_
25606 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
25607 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, real_8 _p_ work_, int_4 _p_ iwork_)
25608 { // ** body not listed **
25973 }
25974
25975 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_,
25976 int_4 _p_ iflag_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ epsfcn_, real_8 _p_ wa1_, real_8 _p_ wa2_)
25977 { // ** body not listed **
26049 }
26050
26051 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
26052 _p_ ldfjac_, int_4 _p_ iflag_, real_8 _p_ epsfcn_, real_8 _p_ wa_)
26053 { // ** body not listed **
26091 }
26092
26093 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_
26094 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_)
26095 { // ** body not listed **
26133 }
26134
26135 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_)
26136 { // ** body not listed **
26202 }
26203
26204 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_)
26205 { // ** body not listed **
26308 }
26309
26310 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_,
26311 int_4 _p_ iflag_)
26312 { // ** body not listed **
26383 }
26384
26385 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_
26386 iflag_)
26387 { // ** body not listed **
26517 }
26518
26519 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_)
26520 { // ** body not listed **
26771 }
26772
26773 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_
26774 work_, int_4 _p_ iwork_)
26775 { // ** body not listed **
26966 }
26967
26968 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_,
26969 real_8 _p_ rnorm_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
26970 { // ** body not listed **
26998 }
26999
27000 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_
27001 up_, real_8 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_)
27002 { // ** body not listed **
27104 }
27105
27106 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_,
27107 real_8 _p_ tau_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ g_, int_4 _p_ ip_)
27108 { // ** body not listed **
27292 }
27293
27294 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
27295 _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_,
27296 real_8 _p_ sf_, real_8 _p_ rpar_, int_4 _p_ ipar_, real_8 _p_ h_)
27297 { // ** body not listed **
27442 }
27443
27444 real_8 _dhvnrm (real_8 _p_ v_, int_4 _p_ ncomp_)
27445 { // ** body not listed **
27454 }
27455
27456 int_4 _djairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ ai_, real_8 _p_ dai_)
27457 { // ** body not listed **
29046 }
29047
29048 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_,
29049 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_,
29050 real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
29051 { // ** body not listed **
29300 }
29301
29302 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_
29303 x_, real_8 _p_ wnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ is_)
29304 { // ** body not listed **
29463 }
29464
29465 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_
29466 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_)
29467 { // ** body not listed **
29971 }
29972
29973 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_
29974 x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_)
29975 { // ** body not listed **
30192 }
30193
30194 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_,
30195 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_
30196 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_)
30197 { // ** body not listed **
30369 }
30370
30371 int_4 _dmacon (void)
30372 { // ** body not listed **
30388 }
30389
30390 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_
30391 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_)
30392 { // ** body not listed **
30631 }
30632
30633 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
30634 _p_ delta_, real_8 _p_ par_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa1_, real_8 _p_ wa2_)
30635 { // ** body not listed **
30794 }
30795
30796 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_
30797 rcond_, real_8 _p_ z_)
30798 { // ** body not listed **
30947 }
30948
30949 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_
30950 det_)
30951 { // ** body not listed **
30985 }
30986
30987 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_
30988 info_)
30989 { // ** body not listed **
31044 }
31045
31046 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_
31047 itask_, int_4 _p_ ind_, real_8 _p_ work_, int_4 _p_ iwork_)
31048 { // ** body not listed **
31325 }
31326
31327 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_
31328 b_, int_4 _p_ job_)
31329 { // ** body not listed **
31399 }
31400
31401 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
31402 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_8 _p_ wa_, int_4 _p_ lwa_)
31403 { // ** body not listed **
31453 }
31454
31455 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_
31456 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_,
31457 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_
31458 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_)
31459 { // ** body not listed **
32032 }
32033
32034 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
32035 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_8 _p_ wa_, int_4 _p_ lwa_)
32036 { // ** body not listed **
32092 }
32093
32094 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
32095 _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_,
32096 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_
32097 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_
32098 wa4_)
32099 { // ** body not listed **
32412 }
32413
32414 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_,
32415 real_8 _p_ td_)
32416 { // ** body not listed **
32449 }
32450
32451 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
32452 _p_ iscale_, real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ scales_, real_8 _p_ rows_, real_8 _p_ rs_)
32453 { // ** body not listed **
32559 }
32560
32561 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_)
32562 { // ** body not listed **
32735 }
32736
32737 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_)
32738 { // ** body not listed **
32948 }
32949
32950 int_4 _dpcoef (int_4 _p_ l_, real_8 _p_ c_, real_8 _p_ tc_, real_8 _p_ a_)
32951 { // ** body not listed **
32980 }
32981
32982 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_,
32983 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_,
32984 real_8 _p_ costsc_, real_8 _p_ gg_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_ amat_, real_8 _p_ basmat_,
32985 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_,
32986 real_8 _p_ duals_, logical_4 _p_ stpedg_)
32987 { // ** body not listed **
33119 }
33120
33121 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_,
33122 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
33123 _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_
33124 , logical_4 _p_ lopt_)
33125 { // ** body not listed **
33397 }
33398
33399 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_)
33400 { // ** body not listed **
33473 }
33474
33475 int_4 _dplint (int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ c_)
33476 { // ** body not listed **
33507 }
33508
33509 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_,
33510 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_,
33511 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_
33512 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_,
33513 logical_4 _p_ redbas_)
33514 { // ** body not listed **
33707 }
33708
33709 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_,
33710 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_,
33711 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_
33712 basmat_, real_8 _p_ csc_, real_8 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_)
33713 { // ** body not listed **
33810 }
33811
33812 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_
33813 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_
33814 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_,
33815 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
33816 _p_ colnrm_, real_8 _p_ duals_, logical_4 _p_ found_)
33817 { // ** body not listed **
33966 }
33967
33968 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_
33969 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_,
33970 real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ erp_, real_8 _p_ rprim_, real_8 _p_ primal_, logical_4 _p_ finite_,
33971 logical_4 _p_ zerolv_)
33972 { // ** body not listed **
34122 }
34123
34124 int_4 _dplpmn (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ prgopt_, real_8
34125 _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_,
34126 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_
34127 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_
34128 , int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_)
34129 { // ** body not listed **
35395 }
35396
35397 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_,
35398 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_
35399 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_
35400 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_,
35401 real_8 _p_ costsc_, real_8 _p_ xlamda_, real_8 _p_ rhsnrm_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_ csc_,
35402 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_,
35403 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_
35404 duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_)
35405 { // ** body not listed **
35863 }
35864
35865 int_4 _dplpup (int_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ prgopt_, real_8 _p_ dattrv_, real_8
35866 _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_,
35867 real_8 _p_ asmall_, real_8 _p_ abig_)
35868 { // ** body not listed **
36409 }
36410
36411 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_)
36412 { // ** body not listed **
36616 }
36617
36618 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_
36619 work_)
36620 { // ** body not listed **
36812 }
36813
36814 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_)
36815 { // ** body not listed **
36854 }
36855
36856 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
36857 _p_ eps_, real_8 _p_ r_, int_4 _p_ ierr_, real_8 _p_ a_)
36858 { // ** body not listed **
37167 }
37168
37169 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
37170 _p_ c_, real_8 _p_ work_, int_4 _p_ ierr_)
37171 { // ** body not listed **
37265 }
37266
37267 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_
37268 ibasis_, real_8 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_)
37269 { // ** body not listed **
37625 }
37626
37627 int_4 _dpperm (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
37628 { // ** body not listed **
37673 }
37674
37675 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
37676 _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_)
37677 { // ** body not listed **
37948 }
37949
37950 real_8 _dprvec (int_4 _p_ m_, real_8 _p_ u_, real_8 _p_ v_)
37951 { // ** body not listed **
37962 }
37963
37964 int_4 _dprwpg (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_)
37965 { // ** body not listed **
37985 }
37986
37987 int_4 _dprwvr (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_)
37988 { // ** body not listed **
38033 }
38034
38035 real_8 _dpsixn (int_4 _p_ n_)
38036 { // ** body not listed **
38635 }
38636
38637 int_4 _dpsort (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
38638 { // ** body not listed **
38794 }
38795
38796 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_
38797 incy_)
38798 { // ** body not listed **
38845 }
38846
38847 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_
38848 incy_)
38849 { // ** body not listed **
38897 }
38898
38899 int_4 _dqform (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ q_, int_4 _p_ ldq_, real_8 _p_ wa_)
38900 { // ** body not listed **
38966 }
38967
38968 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
38969 _p_ lipvt_, real_8 _p_ sigma_, real_8 _p_ acnorm_, real_8 _p_ wa_)
38970 { // ** body not listed **
39073 }
39074
39075 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
39076 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa_)
39077 { // ** body not listed **
39186 }
39187
39188 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_,
39189 real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
39190 { // ** body not listed **
39468 }
39469
39470 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_,
39471 real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
39472 { // ** body not listed **
39742 }
39743
39744 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
39745 _p_ l1max_, real_8 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
39746 { // ** body not listed **
40040 }
40041
40042 real_8 _drc (real_8 _p_ x_, real_8 _p_ y_, int_4 _p_ ier_)
40043 { // ** body not listed **
40416 }
40417
40418 real_8 _drd (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_)
40419 { // ** body not listed **
40896 }
40897
40898 int_4 _dreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
40899 { // ** body not listed **
41004 }
41005
41006 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
41007 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, real_8 _p_ stowa_, int_4 _p_ iflag_)
41008 { // ** body not listed **
41151 }
41152
41153 real_8 _drf (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_)
41154 { // ** body not listed **
41658 }
41659
41660 real_8 _drj (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, real_8 _p_ p_, int_4 _p_ ier_)
41661 { // ** body not listed **
42257 }
42258
42259 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
42260 _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
42261 _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
42262 _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_,
42263 logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_8 _p_ rpar_, int_4 _p_ ipar_)
42264 { // ** body not listed **
43118 }
43119
43120 int_4 _dsort (real_8 _p_ dx_, real_8 _p_ dy_, int_4 _p_ n_, int_4 _p_ kflag_)
43121 { // ** body not listed **
43362 }
43363
43364 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_,
43365 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_
43366 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_,
43367 real_8 _p_ fac_, int_4 _p_ is_)
43368 { // ** body not listed **
43746 }
43747
43748 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_,
43749 int_4 _p_ iflag_, real_8 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_)
43750 { // ** body not listed **
44078 }
44079
44080 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_)
44081 { // ** body not listed **
44115 }
44116
44117 int_4 _dsplp (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ prgopt_, real_8
44118 _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_,
44119 int_4 _p_ ibasis_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_)
44120 { // ** body not listed **
44419 }
44420
44421 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
44422 _p_ ntape_)
44423 { // ** body not listed **
44468 }
44469
44470 int_4 _dstway (real_8 _p_ u_, real_8 _p_ v_, real_8 _p_ yhp_, int_4 _p_ inout_, real_8 _p_ stowa_)
44471 { // ** body not listed **
44529 }
44530
44531 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_
44532 iflag_, int_4 _p_ mlso_, real_8 _p_ work_, int_4 _p_ iwork_)
44533 { // ** body not listed **
44546 }
44547
44548 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_
44549 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_,
44550 int_4 _p_ ir_)
44551 { // ** body not listed **
44833 }
44834
44835 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_
44836 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_,
44837 int_4 _p_ ic_)
44838 { // ** body not listed **
45120 }
45121
45122 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_,
45123 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_)
45124 { // ** body not listed **
45265 }
45266
45267 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_,
45268 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_)
45269 { // ** body not listed **
45409 }
45410
45411 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_,
45412 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_,
45413 real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
45414 { // ** body not listed **
45663 }
45664
45665 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_,
45666 int_4 _p_ iflag_)
45667 { // ** body not listed **
45705 }
45706
45707 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_
45708 , int_4 _p_ iflag_)
45709 { // ** body not listed **
45747 }
45748
45749 real_8 _dvnrms (int_4 _p_ n_, real_8 _p_ v_, real_8 _p_ w_)
45750 { // ** body not listed **
45762 }
45763
45764 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_
45765 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_)
45766 { // ** body not listed **
45931 }
45932
45933 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_
45934 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
45935 _p_ h_, real_8 _p_ scale_, real_8 _p_ z_, real_8 _p_ temp_, real_8 _p_ d_)
45936 { // ** body not listed **
46364 }
46365
46366 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_,
46367 int_4 _p_ imax_, real_8 _p_ hbar_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ w_)
46368 { // ** body not listed **
46393 }
46394
46395 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_
46396 scale_, real_8 _p_ wic_)
46397 { // ** body not listed **
46419 }
46420
46421 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
46422 _p_ w_)
46423 { // ** body not listed **
46438 }
46439
46440 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_
46441 prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_8 _p_ work_)
46442 { // ** body not listed **
46564 }
46565
46566 int_4 _dwritp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
46567 { // ** body not listed **
46672 }
46673
46674 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_
46675 cos_, real_8 _p_ sin_)
46676 { // ** body not listed **
46743 }
46744
46745 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_)
46746 { // ** body not listed **
46835 }
46836
46837 int_4 _dxadj (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
46838 { // ** body not listed **
46892 }
46893
46894 int_4 _dxc210 (int_4 _p_ k_, real_8 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_)
46895 { // ** body not listed **
46959 }
46960
46961 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_)
46962 { // ** body not listed **
47052 }
47053
47054 real_8 _dxpsi (real_8 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_)
47055 { // ** body not listed **
47212 }
47213
47214 int_4 _dxred (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
47215 { // ** body not listed **
47286 }
47287
47288 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_)
47289 { // ** body not listed **
47377 }
47378
47379 int_4 _dyairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ bi_, real_8 _p_ dbi_)
47380 { // ** body not listed **
49217 }
49218
49219 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_)
49220 { // ** body not listed **
49310 }
49311
49312 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_
49313 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_,
49314 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_)
49315 { // ** body not listed **
49510 }
49511
49512 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_
49513 nbkpt_, real_4 _p_ bkptin_, int_4 _p_ nconst_, real_4 _p_ xconst_, real_4 _p_ yconst_, int_4 _p_ nderiv_, int_4 _p_
49514 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
49515 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, real_4 _p_ work_, int_4 _p_ iwork_)
49516 { // ** body not listed **
49881 }
49882
49883 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
49884 _p_ ldfjac_, int_4 _p_ iflag_, real_4 _p_ epsfcn_, real_4 _p_ wa_)
49885 { // ** body not listed **
49923 }
49924
49925 int_4 _fdump (void)
49926 { // ** body not listed **
49929 }
49930
49931 int_4 _fftdoc (void)
49932 { // ** body not listed **
49935 }
49936
49937 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_,
49938 int_4 _p_ iflag_)
49939 { // ** body not listed **
50011 }
50012
50013 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_
50014 iflag_)
50015 { // ** body not listed **
50145 }
50146
50147 real_4 _gamrn (real_4 _p_ x_)
50148 { // ** body not listed **
50271 }
50272
50273 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_)
50274 { // ** body not listed **
50525 }
50526
50527 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_
50528 up_, real_4 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_)
50529 { // ** body not listed **
50659 }
50660
50661 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_,
50662 real_4 _p_ tau_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ g_, int_4 _p_ ip_)
50663 { // ** body not listed **
50845 }
50846
50847 int_4 _hkseq (real_4 _p_ x_, int_4 _p_ m_, real_4 _p_ h_, int_4 _p_ ierr_)
50848 { // ** body not listed **
51075 }
51076
51077 int_4 _hpperm (char _p_ _p_ hx_, int_4 _p_ n_, int_4 _p_ iperm_, char _p_ work_, int_4 _p_ ier_)
51078 { // ** body not listed **
51127 }
51128
51129 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_
51130 , char _p_ work_, int_4 _p_ ier_)
51131 { // ** body not listed **
51314 }
51315
51316 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
51317 _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_,
51318 real_4 _p_ sf_, real_4 _p_ rpar_, int_4 _p_ ipar_, real_4 _p_ h_)
51319 { // ** body not listed **
51499 }
51500
51501 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
51502 _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_
51503 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
51504 _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_)
51505 { // ** body not listed **
51737 }
51738
51739 real_4 _hvnrm (real_4 _p_ v_, int_4 _p_ ncomp_)
51740 { // ** body not listed **
51749 }
51750
51751 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_,
51752 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_,
51753 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_,
51754 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
51755 _p_ bmh_)
51756 { // ** body not listed **
52248 }
52249
52250 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_,
52251 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_
52252 , 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_,
52253 real_4 _p_ ss_, real_4 _p_ sint_, real_4 _p_ d_)
52254 { // ** body not listed **
52891 }
52892
52893 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_)
52894 { // ** body not listed **
52933 }
52934
52935 int_4 _idloc (int_4 _p_ loc_, real_8 _p_ sx_, int_4 _p_ ix_)
52936 { // ** body not listed **
52969 }
52970
52971 int_4 _indxa (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_)
52972 { // ** body not listed **
52989 }
52990
52991 int_4 _indxb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_)
52992 { // ** body not listed **
53050 }
53051
53052 int_4 _indxc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_)
53053 { // ** body not listed **
53070 }
53071
53072 int_4 _inxca (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_)
53073 { // ** body not listed **
53090 }
53091
53092 int_4 _inxcb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_)
53093 { // ** body not listed **
53150 }
53151
53152 int_4 _inxcc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_)
53153 { // ** body not listed **
53170 }
53171
53172 int_4 _iploc (int_4 _p_ loc_, real_4 _p_ sx_, int_4 _p_ ix_)
53173 { // ** body not listed **
53206 }
53207
53208 int_4 _ipperm (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
53209 { // ** body not listed **
53253 }
53254
53255 int_4 _ipsort (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
53256 { // ** body not listed **
53412 }
53413
53414 int_4 _isort (int_4 _p_ ix_, int_4 _p_ iy_, int_4 _p_ n_, int_4 _p_ kflag_)
53415 { // ** body not listed **
53656 }
53657
53658 int_4 _jairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ ai_, real_4 _p_ dai_)
53659 { // ** body not listed **
55248 }
55249
55250 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_,
55251 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_,
55252 real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
55253 { // ** body not listed **
55502 }
55503
55504 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_
55505 x_, real_4 _p_ wnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ is_)
55506 { // ** body not listed **
55664 }
55665
55666 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_
55667 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_)
55668 { // ** body not listed **
56172 }
56173
56174 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_
56175 x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_)
56176 { // ** body not listed **
56393 }
56394
56395 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_
56396 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_,
56397 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_
56398 scales_)
56399 { // ** body not listed **
56568 }
56569
56570 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_,
56571 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_
56572 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_)
56573 { // ** body not listed **
56744 }
56745
56746 int_4 _macon (void)
56747 { // ** body not listed **
56763 }
56764
56765 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_
56766 , real_4 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_4 _p_ v_, real_4 _p_ w_, real_4 _p_ wcnd_)
56767 { // ** body not listed **
57007 }
57008
57009 int_4 _minso4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_)
57010 { // ** body not listed **
57035 }
57036
57037 int_4 _minsol (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_)
57038 { // ** body not listed **
57063 }
57064
57065 int_4 _mpadd2 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_, int_4 _p_ y1_, int_4 _p_ trunc_)
57066 { // ** body not listed **
57158 }
57159
57160 int_4 _mpadd3 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ s_, int_4 _p_ med_, int_4 _p_ re_)
57161 { // ** body not listed **
57288 }
57289
57290 int_4 _mpadd (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_)
57291 { // ** body not listed **
57295 }
57296
57297 int_4 _mpblas (int_4 _p_ i1_)
57298 { // ** body not listed **
57317 }
57318
57319 int_4 _mpcdm (real_8 _p_ dx_, int_4 _p_ z_)
57320 { // ** body not listed **
57406 }
57407
57408 int_4 _mpchk (int_4 _p_ i_, int_4 _p_ j_)
57409 { // ** body not listed **
57678 }
57679
57680 int_4 _mpcmd (int_4 _p_ x_, real_8 _p_ dz_)
57681 { // ** body not listed **
57730 }
57731
57732 int_4 _mpdivi (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_)
57733 { // ** body not listed **
57924 }
57925
57926 int_4 _mperr (void)
57927 { // ** body not listed **
57934 }
57935
57936 int_4 _mpmaxr (int_4 _p_ x_)
57937 { // ** body not listed **
57949 }
57950
57951 int_4 _mpmlp (int_4 _p_ u_, int_4 _p_ v_, int_4 _p_ w_, int_4 _p_ j_)
57952 { // ** body not listed **
57959 }
57960
57961 int_4 _mpmul2 (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_, int_4 _p_ trunc_)
57962 { // ** body not listed **
58104 }
58105
58106 int_4 _mpmul (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_)
58107 { // ** body not listed **
58213 }
58214
58215 int_4 _mpmuli (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_)
58216 { // ** body not listed **
58220 }
58221
58222 int_4 _mpnzr (int_4 _p_ rs_, int_4 _p_ re_, int_4 _p_ z_, int_4 _p_ trunc_)
58223 { // ** body not listed **
58359 }
58360
58361 int_4 _mpovfl (int_4 _p_ x_)
58362 { // ** body not listed **
58383 }
58384
58385 int_4 _mpstr (int_4 _p_ x_, int_4 _p_ y_)
58386 { // ** body not listed **
58393 }
58394
58395 int_4 _mpunfl (int_4 _p_ x_)
58396 { // ** body not listed **
58402 }
58403
58404 int_4 _numxer (int_4 _p_ nerr_)
58405 { // ** body not listed **
58413 }
58414
58415 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_,
58416 real_4 _p_ td_)
58417 { // ** body not listed **
58450 }
58451
58452 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_,
58453 real_4 _p_ td_)
58454 { // ** body not listed **
58487 }
58488
58489 int_4 _ortho4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_)
58490 { // ** body not listed **
58515 }
58516
58517 int_4 _orthog (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_)
58518 { // ** body not listed **
58543 }
58544
58545 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
58546 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ cols_, real_4 _p_ cs_)
58547 { // ** body not listed **
58655 }
58656
58657 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
58658 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ rows_, real_4 _p_ rs_)
58659 { // ** body not listed **
58764 }
58765
58766 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_)
58767 { // ** body not listed **
58977 }
58978
58979 int_4 _pcoef (int_4 _p_ l_, real_4 _p_ c_, real_4 _p_ tc_, real_4 _p_ a_)
58980 { // ** body not listed **
59009 }
59010
59011 real_4 _pgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
59012 { // ** body not listed **
59039 }
59040
59041 real_4 _pimach (real_4 _p_ dum_)
59042 { // ** body not listed **
59047 }
59048
59049 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_)
59050 { // ** body not listed **
59123 }
59124
59125 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_)
59126 { // ** body not listed **
59330 }
59331
59332 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
59333 _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_)
59334 { // ** body not listed **
59755 }
59756
59757 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
59758 _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_,
59759 real_4 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
59760 { // ** body not listed **
60395 }
60396
60397 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_
60398 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_,
60399 real_4 _p_ tcos_, real_4 _p_ p_)
60400 { // ** body not listed **
60495 }
60496
60497 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_)
60498 { // ** body not listed **
60537 }
60538
60539 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
60540 _p_ eps_, real_4 _p_ r_, int_4 _p_ ierr_, real_4 _p_ a_)
60541 { // ** body not listed **
60850 }
60851
60852 int_4 _polint (int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ c_)
60853 { // ** body not listed **
60884 }
60885
60886 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
60887 _p_ c_, real_4 _p_ work_, int_4 _p_ ierr_)
60888 { // ** body not listed **
60982 }
60983
60984 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_,
60985 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_,
60986 real_4 _p_ d_, real_4 _p_ wx_, real_4 _p_ wy_, real_4 _p_ c1_, real_4 _p_ c2_, real_4 _p_ bb_)
60987 { // ** body not listed **
61262 }
61263
61264 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_
61265 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_,
61266 real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
61267 { // ** body not listed **
61901 }
61902
61903 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
61904 _p_ bh_)
61905 { // ** body not listed **
62191 }
62192
62193 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_
62194 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_)
62195 { // ** body not listed **
62466 }
62467
62468 real_4 _ppgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62469 { // ** body not listed **
62480 }
62481
62482 real_4 _pppsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62483 { // ** body not listed **
62493 }
62494
62495 real_4 _ppsgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62496 { // ** body not listed **
62507 }
62508
62509 real_4 _ppspf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62510 { // ** body not listed **
62520 }
62521
62522 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_
62523 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
62524 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ u_)
62525 { // ** body not listed **
62699 }
62700
62701 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
62702 _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_,
62703 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ w_)
62704 { // ** body not listed **
62907 }
62908
62909 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_
62910 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
62911 _p_ d_, real_4 _p_ w_, real_4 _p_ u_)
62912 { // ** body not listed **
63085 }
63086
63087 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
63088 _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_,
63089 real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ w_)
63090 { // ** body not listed **
63292 }
63293
63294 real_4 _prvec (int_4 _p_ m_, real_4 _p_ u_, real_4 _p_ v_)
63295 { // ** body not listed **
63305 }
63306
63307 int_4 _prwpge (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_)
63308 { // ** body not listed **
63328 }
63329
63330 int_4 _prwvir (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_)
63331 { // ** body not listed **
63376 }
63377
63378 real_4 _psgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
63379 { // ** body not listed **
63406 }
63407
63408 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_
63409 ierr_)
63410 { // ** body not listed **
63821 }
63822
63823 real_4 _psixn (int_4 _p_ n_)
63824 { // ** body not listed **
64422 }
64423
64424 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_)
64425 { // ** body not listed **
64598 }
64599
64600 real_4 _pythag (real_4 _p_ a_, real_4 _p_ b_)
64601 { // ** body not listed **
64624 }
64625
64626 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_,
64627 real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
64628 { // ** body not listed **
64907 }
64908
64909 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_,
64910 real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
64911 { // ** body not listed **
65182 }
65183
65184 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
65185 _p_ l1max_, real_4 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
65186 { // ** body not listed **
65480 }
65481
65482 real_4 _rc (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ ier_)
65483 { // ** body not listed **
65856 }
65857
65858 real_4 _rd (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_)
65859 { // ** body not listed **
66336 }
66337
66338 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
66339 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, real_4 _p_ stowa_, int_4 _p_ iflag_)
66340 { // ** body not listed **
66470 }
66471
66472 real_4 _rf (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_)
66473 { // ** body not listed **
66977 }
66978
66979 real_4 _rj (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, real_4 _p_ p_, int_4 _p_ ier_)
66980 { // ** body not listed **
67576 }
67577
67578 int_4 _rpqr79 (int_4 _p_ ndeg_, real_4 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_)
67579 { // ** body not listed **
67626 }
67627
67628 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_)
67629 { // ** body not listed **
67638 }
67639
67640 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_)
67641 { // ** body not listed **
67680 }
67681
67682 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_,
67683 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_,
67684 real_4 _p_ rw_, int_4 _p_ iw_)
67685 { // ** body not listed **
69210 }
69211
69212 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
69213 _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_)
69214 { // ** body not listed **
70547 }
70548
70549 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_,
70550 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_,
70551 real_4 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_)
70552 { // ** body not listed **
72269 }
72270 int_4 _sclosm (int_4 _p_ ipage_)
72271 { // ** body not listed **
72329 }
72330
72331 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_,
72332 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_,
72333 real_4 _p_ cvec_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_)
72334 { // ** body not listed **
72465 }
72466
72467 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_
72468 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_)
72469 { // ** body not listed **
72609 }
72610
72611 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_
72612 work_, int_4 _p_ job_, int_4 _p_ info_)
72613 { // ** body not listed **
72716 }
72717
72718 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_
72719 work_, int_4 _p_ iwork_)
72720 { // ** body not listed **
72911 }
72912
72913 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_
72914 work_, int_4 _p_ iwork_)
72915 { // ** body not listed **
73125 }
73126
73127 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_,
73128 real_4 _p_ rnorm_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
73129 { // ** body not listed **
73157 }
73158
73159 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_
73160 rcond_, real_4 _p_ z_)
73161 { // ** body not listed **
73310 }
73311
73312 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_
73313 det_)
73314 { // ** body not listed **
73348 }
73349
73350 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_
73351 info_)
73352 { // ** body not listed **
73407 }
73408
73409 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_
73410 itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_)
73411 { // ** body not listed **
73688 }
73689
73690 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_
73691 itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_)
73692 { // ** body not listed **
73993 }
73994
73995 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_
73996 b_, int_4 _p_ job_)
73997 { // ** body not listed **
74067 }
74068
74069 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
74070 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_4 _p_ wa_, int_4 _p_ lwa_)
74071 { // ** body not listed **
74121 }
74122
74123 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_
74124 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_,
74125 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_
74126 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_)
74127 { // ** body not listed **
74701 }
74702
74703 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
74704 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_4 _p_ wa_, int_4 _p_ lwa_)
74705 { // ** body not listed **
74761 }
74762
74763 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
74764 _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_,
74765 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_
74766 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_
74767 wa4_)
74768 { // ** body not listed **
75082 }
75083
75084 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_
75085 iflag_, real_4 _p_ work_, int_4 _p_ iwork_)
75086 { // ** body not listed **
75101 }
75102
75103 int_4 _sopenm (int_4 _p_ ipage_, int_4 _p_ lpage_)
75104 { // ** body not listed **
75157 }
75158
75159 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_,
75160 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_
75161 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_,
75162 real_4 _p_ fac_, int_4 _p_ is_)
75163 { // ** body not listed **
75536 }
75537
75538 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_,
75539 int_4 _p_ iflag_, real_4 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_)
75540 { // ** body not listed **
75868 }
75869
75870 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_)
75871 { // ** body not listed **
75905 }
75906
75907 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_,
75908 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_,
75909 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_,
75910 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
75911 _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_)
75912 { // ** body not listed **
76216 }
76217
76218 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_,
76219 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_,
76220 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
76221 (*_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_
76222 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_
76223 , int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_)
76224 { // ** body not listed **
76525 }
76526
76527 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_,
76528 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_,
76529 real_4 _p_ costsc_, real_4 _p_ gg_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_ amat_, real_4 _p_ basmat_,
76530 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_,
76531 real_4 _p_ duals_, logical_4 _p_ stpedg_)
76532 { // ** body not listed **
76664 }
76665
76666 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_,
76667 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
76668 _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_
76669 , logical_4 _p_ lopt_)
76670 { // ** body not listed **
76942 }
76943
76944 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_,
76945 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_,
76946 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_
76947 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_,
76948 logical_4 _p_ redbas_)
76949 { // ** body not listed **
77141 }
77142
77143 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_,
77144 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_,
77145 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_
77146 basmat_, real_4 _p_ csc_, real_4 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_)
77147 { // ** body not listed **
77244 }
77245
77246 int_4 _splp (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ prgopt_, real_4
77247 _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_,
77248 int_4 _p_ ibasis_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_)
77249 { // ** body not listed **
77548 }
77549
77550 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_
77551 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_
77552 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_,
77553 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
77554 _p_ colnrm_, real_4 _p_ duals_, logical_4 _p_ found_)
77555 { // ** body not listed **
77701 }
77702
77703 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_
77704 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_,
77705 real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ erp_, real_4 _p_ rprim_, real_4 _p_ primal_, logical_4 _p_ finite_,
77706 logical_4 _p_ zerolv_)
77707 { // ** body not listed **
77857 }
77858
77859 int_4 _splpmn (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ prgopt_, real_4
77860 _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_,
77861 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_
77862 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_
77863 , int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_)
77864 { // ** body not listed **
79129 }
79130
79131 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_,
79132 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_
79133 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_
79134 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_,
79135 real_4 _p_ costsc_, real_4 _p_ xlamda_, real_4 _p_ rhsnrm_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_ csc_,
79136 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_,
79137 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_
79138 duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_)
79139 { // ** body not listed **
79597 }
79598
79599 int_4 _splpup (int_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ prgopt_, real_4 _p_ dattrv_, real_4
79600 _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_,
79601 real_4 _p_ asmall_, real_4 _p_ abig_)
79602 { // ** body not listed **
80143 }
80144
80145 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_
80146 work_)
80147 { // ** body not listed **
80339 }
80340
80341 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_
80342 work_)
80343 { // ** body not listed **
80553 }
80554
80555 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_
80556 ibasis_, real_4 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_)
80557 { // ** body not listed **
80913 }
80914
80915 int_4 _spperm (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
80916 { // ** body not listed **
80961 }
80962
80963 int_4 _spsort (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
80964 { // ** body not listed **
81120 }
81121
81122 int_4 _sreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
81123 { // ** body not listed **
81228 }
81229
81230 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_
81231 info_)
81232 { // ** body not listed **
81269 }
81270
81271 int_4 _ssort (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ n_, int_4 _p_ kflag_)
81272 { // ** body not listed **
81513 }
81514
81515 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
81516 _p_ ntape_)
81517 { // ** body not listed **
81562 }
81563
81564 int_4 _stway (real_4 _p_ u_, real_4 _p_ v_, real_4 _p_ yhp_, int_4 _p_ inout_, real_4 _p_ stowa_)
81565 { // ** body not listed **
81622 }
81623
81624 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_
81625 iflag_, int_4 _p_ mlso_, real_4 _p_ work_, int_4 _p_ iwork_)
81626 { // ** body not listed **
81639 }
81640
81641 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_
81642 , int_4 _p_ iflag_)
81643 { // ** body not listed **
81673 }
81674
81675 int_4 _swritp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
81676 { // ** body not listed **
81781 }
81782
81783 int_4 _tevlc (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_)
81784 { // ** body not listed **
81896 }
81897
81898 int_4 _tevls (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_)
81899 { // ** body not listed **
82011 }
82012
82013 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_,
82014 real_4 _p_ y3_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w1_, real_4 _p_ w2_, real_4 _p_ w3_)
82015 { // ** body not listed **
82125 }
82126
82127 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_)
82128 { // ** body not listed **
82156 }
82157
82158 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_)
82159 { // ** body not listed **
82188 }
82189
82190 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_)
82191 { // ** body not listed **
82220 }
82221
82222 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
82223 _p_ y_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w_)
82224 { // ** body not listed **
82277 }
82278
82279 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_
82280 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_,
82281 int_4 _p_ ir_)
82282 { // ** body not listed **
82564 }
82565
82566 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_
82567 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_,
82568 int_4 _p_ ic_)
82569 { // ** body not listed **
82851 }
82852
82853 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_,
82854 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_)
82855 { // ** body not listed **
82996 }
82997
82998 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_,
82999 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_)
83000 { // ** body not listed **
83140 }
83141
83142 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_,
83143 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_,
83144 real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
83145 { // ** body not listed **
83394 }
83395
83396 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_,
83397 int_4 _p_ iflag_)
83398 { // ** body not listed **
83436 }
83437
83438 real_4 _vnwrms (int_4 _p_ n_, real_4 _p_ v_, real_4 _p_ w_)
83439 { // ** body not listed **
83451 }
83452
83453 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_
83454 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_)
83455 { // ** body not listed **
83620 }
83621
83622 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_
83623 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
83624 _p_ h_, real_4 _p_ scale_, real_4 _p_ z_, real_4 _p_ temp_, real_4 _p_ d_)
83625 { // ** body not listed **
84052 }
84053
84054 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_,
84055 int_4 _p_ imax_, real_4 _p_ hbar_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ w_)
84056 { // ** body not listed **
84081 }
84082
84083 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_
84084 , real_4 _p_ wic_)
84085 { // ** body not listed **
84107 }
84108
84109 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_
84110 w_)
84111 { // ** body not listed **
84126 }
84127
84128 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_
84129 prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_4 _p_ work_)
84130 { // ** body not listed **
84252 }
84253
84254 int_4 _xadj (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
84255 { // ** body not listed **
84309 }
84310
84311 int_4 _xc210 (int_4 _p_ k_, real_4 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_)
84312 { // ** body not listed **
84376 }
84377
84378 real_4 _xpsi (real_4 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_)
84379 { // ** body not listed **
84536 }
84537
84538 int_4 _xred (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
84539 { // ** body not listed **
84610 }
84611
84612 int_4 _yairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ bi_, real_4 _p_ dbi_)
84613 { // ** body not listed **
86450 }
86451
|
© 2002-2025 J.M. van der Veer (jmvdveer@xs4all.nl)
|
