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.10
111 */
891 static CALLS __calls[__ncalls] = {
892 {"aaaaaa", 0}, // subroutine
893 {"asyik", 0}, // subroutine
894 {"asyjy", 0}, // subroutine
895 {"avint", 0}, // subroutine
896 {"bcrh", 0}, // function
897 {"bdiff", 0}, // subroutine
898 {"bksol", 0}, // subroutine
899 {"blktr1", 0}, // subroutine
900 {"bndacc", 0}, // subroutine
901 {"bndsol", 0}, // subroutine
902 {"bsgq8", 0}, // subroutine
903 {"bsplvd", 0}, // subroutine
904 {"bsplvn", 0}, // subroutine
905 {"bsrh", 0}, // function
906 {"c1merg", 0}, // subroutine
907 {"casyi", 0}, // subroutine
908 {"cblkt1", 0}, // subroutine
909 {"ccmpb", 0}, // subroutine
910 {"cfod", 0}, // subroutine
911 {"cgeev", 0}, // subroutine
912 {"cgefs", 0}, // subroutine
913 {"cgeir", 0}, // subroutine
914 {"chiev", 0}, // subroutine
915 {"chkpr4", 0}, // subroutine
916 {"chkprm", 0}, // subroutine
917 {"chksn4", 0}, // subroutine
918 {"chksng", 0}, // subroutine
919 {"cmpcsg", 0}, // subroutine
920 {"cmposd", 0}, // subroutine
921 {"cmposn", 0}, // subroutine
922 {"cmposp", 0}, // subroutine
923 {"cmptr3", 0}, // subroutine
924 {"cmptrx", 0}, // subroutine
925 {"cnbco", 0}, // subroutine
926 {"cnbdi", 0}, // subroutine
927 {"cnbfa", 0}, // subroutine
928 {"cnbfs", 0}, // subroutine
929 {"cnbir", 0}, // subroutine
930 {"cnbsl", 0}, // subroutine
931 {"compb", 0}, // subroutine
932 {"cosgen", 0}, // subroutine
933 {"cpadd", 0}, // subroutine
934 {"cpevl", 0}, // subroutine
935 {"cpevlr", 0}, // subroutine
936 {"cpofs", 0}, // subroutine
937 {"cpoir", 0}, // subroutine
938 {"cpqr79", 0}, // subroutine
939 {"cproc", 0}, // subroutine
940 {"cprocp", 0}, // subroutine
941 {"cprod", 0}, // subroutine
942 {"cprodp", 0}, // subroutine
943 {"cpzero", 0}, // subroutine
944 {"crati", 0}, // subroutine
945 {"cs1s2", 0}, // subroutine
946 {"cscale", 0}, // subroutine
947 {"cshch", 0}, // subroutine
948 {"cuchk", 0}, // subroutine
949 {"cunhj", 0}, // subroutine
950 {"cunik", 0}, // subroutine
951 {"cv", 0}, // real*4 function
952 {"d1merg", 0}, // subroutine
953 {"d1mpyq", 0}, // subroutine
954 {"d1updt", 0}, // subroutine
955 {"dasyik", 0}, // subroutine
956 {"davint", 0}, // subroutine
957 {"dbdiff", 0}, // subroutine
958 {"dbksol", 0}, // subroutine
959 {"dbndac", 0}, // subroutine
960 {"dbndsl", 0}, // subroutine
961 {"dbocls", 0}, // subroutine
962 {"dbols", 0}, // subroutine
963 {"dbolsm", 0}, // subroutine
964 {"dbsgq8", 0}, // subroutine
965 {"dcfod", 0}, // subroutine
966 {"dckder", 0}, // subroutine
967 {"dcoef", 0}, // subroutine
968 {"dcov", 0}, // subroutine
969 {"dcscal", 0}, // subroutine
970 {"dcv", 0}, // real*8 function
971 {"ddes", 0}, // subroutine
972 {"ddoglg", 0}, // subroutine
973 {"defcmn", 0}, // subroutine
974 {"defe4", 0}, // subroutine
975 {"defehl", 0}, // subroutine
976 {"defer", 0}, // subroutine
977 {"denorm", 0}, // real*8 function
978 {"derkfs", 0}, // subroutine
979 {"des", 0}, // subroutine
980 {"dfcmn", 0}, // subroutine
981 {"dfdjc1", 0}, // subroutine
982 {"dfdjc3", 0}, // subroutine
983 {"dfehl", 0}, // subroutine
984 {"dfspvd", 0}, // subroutine
985 {"dfspvn", 0}, // subroutine
986 {"dfulmt", 0}, // subroutine
987 {"dfzero", 0}, // subroutine
988 {"dgaus8", 0}, // subroutine
989 {"dgefs", 0}, // subroutine
990 {"dglss", 0}, // subroutine
991 {"dh12", 0}, // subroutine
992 {"dhfti", 0}, // subroutine
993 {"dhstrt", 0}, // subroutine
994 {"dhvnrm", 0}, // real*8 function
995 {"djairy", 0}, // subroutine
996 {"dllsia", 0}, // subroutine
997 {"dlpdp", 0}, // subroutine
998 {"dlsei", 0}, // subroutine
999 {"dlsi", 0}, // subroutine
1000 {"dlssud", 0}, // subroutine
1001 {"dmacon", 0}, // subroutine
1002 {"dmgsbv", 0}, // subroutine
1003 {"dmpar", 0}, // subroutine
1004 {"dnbco", 0}, // subroutine
1005 {"dnbdi", 0}, // subroutine
1006 {"dnbfa", 0}, // subroutine
1007 {"dnbfs", 0}, // subroutine
1008 {"dnbsl", 0}, // subroutine
1009 {"dnls1e", 0}, // subroutine
1010 {"dnls1", 0}, // subroutine
1011 {"dnsqe", 0}, // subroutine
1012 {"dnsq", 0}, // subroutine
1013 {"dohtrl", 0}, // subroutine
1014 {"dorthr", 0}, // subroutine
1015 {"dp1vlu", 0}, // subroutine
1016 {"dpchng", 0}, // subroutine
1017 {"dpcoef", 0}, // subroutine
1018 {"dpincw", 0}, // subroutine
1019 {"dpinit", 0}, // subroutine
1020 {"dpintm", 0}, // subroutine
1021 {"dplint", 0}, // subroutine
1022 {"dplpce", 0}, // subroutine
1023 {"dplpdm", 0}, // subroutine
1024 {"dplpfe", 0}, // subroutine
1025 {"dplpfl", 0}, // subroutine
1026 {"dplpmn", 0}, // subroutine
1027 {"dplpmu", 0}, // subroutine
1028 {"dplpup", 0}, // subroutine
1029 {"dpnnzr", 0}, // subroutine
1030 {"dpofs", 0}, // subroutine
1031 {"dpolcf", 0}, // subroutine
1032 {"dpolft", 0}, // subroutine
1033 {"dpolvl", 0}, // subroutine
1034 {"dpopt", 0}, // subroutine
1035 {"dpperm", 0}, // subroutine
1036 {"dppgq8", 0}, // subroutine
1037 {"dprvec", 0}, // real*8 function
1038 {"dprwpg", 0}, // subroutine
1039 {"dprwvr", 0}, // subroutine
1040 {"dpsixn", 0}, // real*8 function
1041 {"dpsort", 0}, // subroutine
1042 {"dqdota", 0}, // real*8 function
1043 {"dqdoti", 0}, // real*8 function
1044 {"dqform", 0}, // subroutine
1045 {"dqrfac", 0}, // subroutine
1046 {"dqrslv", 0}, // subroutine
1047 {"drc3jj", 0}, // subroutine
1048 {"drc3jm", 0}, // subroutine
1049 {"drc6j", 0}, // subroutine
1050 {"drc", 0}, // real*8 function
1051 {"drd", 0}, // real*8 function
1052 {"dreadp", 0}, // subroutine
1053 {"dreort", 0}, // subroutine
1054 {"drf", 0}, // real*8 function
1055 {"drj", 0}, // real*8 function
1056 {"drkfs", 0}, // subroutine
1057 {"dsort", 0}, // subroutine
1058 {"dsoseq", 0}, // subroutine
1059 {"dsos", 0}, // subroutine
1060 {"dsossl", 0}, // subroutine
1061 {"dsplp", 0}, // subroutine
1062 {"dstor1", 0}, // subroutine
1063 {"dstway", 0}, // subroutine
1064 {"dsuds", 0}, // subroutine
1065 {"du11ls", 0}, // subroutine
1066 {"du11us", 0}, // subroutine
1067 {"du12ls", 0}, // subroutine
1068 {"du12us", 0}, // subroutine
1069 {"dulsia", 0}, // subroutine
1070 {"dusrmt", 0}, // subroutine
1071 {"dvecs", 0}, // subroutine
1072 {"dvnrms", 0}, // real*8 function
1073 {"dwnlit", 0}, // subroutine
1074 {"dwnlsm", 0}, // subroutine
1075 {"dwnlt1", 0}, // subroutine
1076 {"dwnlt2", 0}, // logical*4 function
1077 {"dwnlt3", 0}, // subroutine
1078 {"dwnnls", 0}, // subroutine
1079 {"dwritp", 0}, // subroutine
1080 {"dwupdt", 0}, // subroutine
1081 {"dx4", 0}, // subroutine
1082 {"dxadj", 0}, // subroutine
1083 {"dxc210", 0}, // subroutine
1084 {"dx", 0}, // subroutine
1085 {"dxpsi", 0}, // real*8 function
1086 {"dxred", 0}, // subroutine
1087 {"dy4", 0}, // subroutine
1088 {"dyairy", 0}, // subroutine
1089 {"dy", 0}, // subroutine
1090 {"efcmn", 0}, // subroutine
1091 {"fcmn", 0}, // subroutine
1092 {"fdjac3", 0}, // subroutine
1093 {"fdump", 0}, // subroutine
1094 {"fftdoc", 0}, // subroutine
1095 {"fulmat", 0}, // subroutine
1096 {"fzero", 0}, // subroutine
1097 {"gamrn", 0}, // real*4 function
1098 {"gaus8", 0}, // subroutine
1099 {"h12", 0}, // subroutine
1100 {"hfti", 0}, // subroutine
1101 {"hkseq", 0}, // subroutine
1102 {"hpperm", 0}, // subroutine
1103 {"hpsort", 0}, // subroutine
1104 {"hstart", 0}, // subroutine
1105 {"hstcs1", 0}, // subroutine
1106 {"hvnrm", 0}, // function
1107 {"hwscs1", 0}, // subroutine
1108 {"hwsss1", 0}, // subroutine
1109 {"i1merg", 0}, // subroutine
1110 {"idloc", 0}, // integer*4 function
1111 {"indxa", 0}, // subroutine
1112 {"indxb", 0}, // subroutine
1113 {"indxc", 0}, // subroutine
1114 {"inxca", 0}, // subroutine
1115 {"inxcb", 0}, // subroutine
1116 {"inxcc", 0}, // subroutine
1117 {"iploc", 0}, // integer*4 function
1118 {"ipperm", 0}, // subroutine
1119 {"ipsort", 0}, // subroutine
1120 {"isort", 0}, // subroutine
1121 {"jairy", 0}, // subroutine
1122 {"llsia", 0}, // subroutine
1123 {"lpdp", 0}, // subroutine
1124 {"lsei", 0}, // subroutine
1125 {"lsi", 0}, // subroutine
1126 {"lssods", 0}, // subroutine
1127 {"lssuds", 0}, // subroutine
1128 {"macon", 0}, // subroutine
1129 {"mgsbv", 0}, // subroutine
1130 {"minso4", 0}, // subroutine
1131 {"minsol", 0}, // subroutine
1132 {"mpadd2", 0}, // subroutine
1133 {"mpadd3", 0}, // subroutine
1134 {"mpadd", 0}, // subroutine
1135 {"mpblas", 0}, // subroutine
1136 {"mpcdm", 0}, // subroutine
1137 {"mpchk", 0}, // subroutine
1138 {"mpcmd", 0}, // subroutine
1139 {"mpdivi", 0}, // subroutine
1140 {"mperr", 0}, // subroutine
1141 {"mpmaxr", 0}, // subroutine
1142 {"mpmlp", 0}, // subroutine
1143 {"mpmul2", 0}, // subroutine
1144 {"mpmul", 0}, // subroutine
1145 {"mpmuli", 0}, // subroutine
1146 {"mpnzr", 0}, // subroutine
1147 {"mpovfl", 0}, // subroutine
1148 {"mpstr", 0}, // subroutine
1149 {"mpunfl", 0}, // subroutine
1150 {"numxer", 0}, // function
1151 {"ohtrol", 0}, // subroutine
1152 {"ohtror", 0}, // subroutine
1153 {"ortho4", 0}, // subroutine
1154 {"orthog", 0}, // subroutine
1155 {"orthol", 0}, // subroutine
1156 {"orthor", 0}, // subroutine
1157 {"pchngs", 0}, // subroutine
1158 {"pcoef", 0}, // subroutine
1159 {"pgsf", 0}, // function
1160 {"pimach", 0}, // function
1161 {"pinitm", 0}, // subroutine
1162 {"pnnzrs", 0}, // subroutine
1163 {"poisd2", 0}, // subroutine
1164 {"poisn2", 0}, // subroutine
1165 {"poisp2", 0}, // subroutine
1166 {"polcof", 0}, // subroutine
1167 {"polfit", 0}, // subroutine
1168 {"polint", 0}, // subroutine
1169 {"polyvl", 0}, // subroutine
1170 {"pos3d1", 0}, // subroutine
1171 {"postg2", 0}, // subroutine
1172 {"ppadd", 0}, // subroutine
1173 {"ppgq8", 0}, // subroutine
1174 {"ppgsf", 0}, // function
1175 {"pppsf", 0}, // function
1176 {"ppsgf", 0}, // function
1177 {"ppspf", 0}, // function
1178 {"proc", 0}, // subroutine
1179 {"procp", 0}, // subroutine
1180 {"prod", 0}, // subroutine
1181 {"prodp", 0}, // subroutine
1182 {"prvec", 0}, // function
1183 {"prwpge", 0}, // subroutine
1184 {"prwvir", 0}, // subroutine
1185 {"psgf", 0}, // function
1186 {"psifn", 0}, // subroutine
1187 {"psixn", 0}, // function
1188 {"pvalue", 0}, // subroutine
1189 {"pythag", 0}, // real*4 function
1190 {"rc3jj", 0}, // subroutine
1191 {"rc3jm", 0}, // subroutine
1192 {"rc6j", 0}, // subroutine
1193 {"rc", 0}, // real*4 function
1194 {"rd", 0}, // real*4 function
1195 {"reort", 0}, // subroutine
1196 {"rf", 0}, // real*4 function
1197 {"rj", 0}, // real*4 function
1198 {"rpqr79", 0}, // subroutine
1199 {"rpzero", 0}, // subroutine
1200 {"s1merg", 0}, // subroutine
1201 {"sbocls", 0}, // subroutine
1202 {"sbols", 0}, // subroutine
1203 {"sbolsm", 0}, // subroutine
1204 {"sclosm", 0}, // subroutine
1205 {"scoef", 0}, // subroutine
1206 {"scov", 0}, // subroutine
1207 {"sgeev", 0}, // subroutine
1208 {"sgefs", 0}, // subroutine
1209 {"sgeir", 0}, // subroutine
1210 {"sglss", 0}, // subroutine
1211 {"snbco", 0}, // subroutine
1212 {"snbdi", 0}, // subroutine
1213 {"snbfa", 0}, // subroutine
1214 {"snbfs", 0}, // subroutine
1215 {"snbir", 0}, // subroutine
1216 {"snbsl", 0}, // subroutine
1217 {"snls1e", 0}, // subroutine
1218 {"snls1", 0}, // subroutine
1219 {"snsqe", 0}, // subroutine
1220 {"snsq", 0}, // subroutine
1221 {"sods", 0}, // subroutine
1222 {"sopenm", 0}, // subroutine
1223 {"soseqs", 0}, // subroutine
1224 {"sos", 0}, // subroutine
1225 {"sossol", 0}, // subroutine
1226 {"speli4", 0}, // subroutine
1227 {"spelip", 0}, // subroutine
1228 {"spincw", 0}, // subroutine
1229 {"spinit", 0}, // subroutine
1230 {"splpce", 0}, // subroutine
1231 {"splpdm", 0}, // subroutine
1232 {"splp", 0}, // subroutine
1233 {"splpfe", 0}, // subroutine
1234 {"splpfl", 0}, // subroutine
1235 {"splpmn", 0}, // subroutine
1236 {"splpmu", 0}, // subroutine
1237 {"splpup", 0}, // subroutine
1238 {"spofs", 0}, // subroutine
1239 {"spoir", 0}, // subroutine
1240 {"spopt", 0}, // subroutine
1241 {"spperm", 0}, // subroutine
1242 {"spsort", 0}, // subroutine
1243 {"sreadp", 0}, // subroutine
1244 {"ssiev", 0}, // subroutine
1245 {"ssort", 0}, // subroutine
1246 {"stor1", 0}, // subroutine
1247 {"stway", 0}, // subroutine
1248 {"suds", 0}, // subroutine
1249 {"svecs", 0}, // subroutine
1250 {"swritp", 0}, // subroutine
1251 {"tevlc", 0}, // subroutine
1252 {"tevls", 0}, // subroutine
1253 {"tri3", 0}, // subroutine
1254 {"tridq", 0}, // subroutine
1255 {"tris4", 0}, // subroutine
1256 {"trisp", 0}, // subroutine
1257 {"trix", 0}, // subroutine
1258 {"u11ls", 0}, // subroutine
1259 {"u11us", 0}, // subroutine
1260 {"u12ls", 0}, // subroutine
1261 {"u12us", 0}, // subroutine
1262 {"ulsia", 0}, // subroutine
1263 {"usrmat", 0}, // subroutine
1264 {"vnwrms", 0}, // real*4 function
1265 {"wnlit", 0}, // subroutine
1266 {"wnlsm", 0}, // subroutine
1267 {"wnlt1", 0}, // subroutine
1268 {"wnlt2", 0}, // logical*4 function
1269 {"wnlt3", 0}, // subroutine
1270 {"wnnls", 0}, // subroutine
1271 {"xadj", 0}, // subroutine
1272 {"xc210", 0}, // subroutine
1273 {"xpsi", 0}, // real*4 function
1274 {"xred", 0}, // subroutine
1275 {"yairy", 0}, // subroutine
1276 {NULL, 0}
1277 };
1278 static struct {
1279 int_4 npp_, k_, nm_, ncmplx_, ik_;
1280 real_4 eps_, cnv_, machep_;
1281 } ccblk_;
1282 static struct {
1283 int_4 npp_, k_, nm_, ncmplx_, ik_;
1284 real_4 eps_, cnv_, machep_;
1285 } cblkt_;
1286 static struct {
1287 int_4 kswx_, kswy_, k_, l_, mit_, nit_, is_, ms_, js_, ns_;
1288 real_4 ait_, bit_, cit_, dit_, dlx_, dly_, tdlx3_, tdly3_, dlx4_, dly4_;
1289 } spl4_;
1290 static struct {
1291 int_4 kswx_, kswy_, k_, l_, mit_, nit_, is_, ms_, js_, ns_;
1292 real_4 ait_, bit_, cit_, dit_, dlx_, dly_, tdlx3_, tdly3_, dlx4_, dly4_;
1293 } splpcm_;
1294 static struct {
1295 int_4 lpar_;
1296 real_8 eps_, fouru_, sqovfl_, sru_, twou_, uro_;
1297 } dml5mc_;
1298 static struct {
1299 int_4 icoco_, indpvt_, integ_, mxnon_, ndisk_, neq_, neqivp_, nfcc_, nic_, nopg_, nps_, ntape_, ntp_, numort_, nxpts_,
1300 lnfcc_;
1301 real_8 ae_, re_, tol_;
1302 } dml18j_;
1303 static struct {
1304 int_4 lp_, lenl_, lenu_, ncp_, lrow_, lcol_;
1305 real_8 small_;
1306 } la05dd_;
1307 static struct {
1308 int_4 mpb_, mpt_, mpm_, mplun_, mpmxr_, mpr_[30], b_, t_, m_, lun_, mxr_, r_[30];
1309 } mpcom_;
1310 static struct {
1311 int_4 igofx_, inhomo_, ivp_, ncompd_, nfc_, ncomp_;
1312 real_8 c_, xsav_;
1313 } dml8sz_;
1314 static struct {
1315 int_4 info_[15], istkop_, knswot_, kop_, lotjp_, mnswot_, nswot_;
1316 real_8 pwcnd_, px_, tnd_, x_, xbeg_, xend_, xop_, xot_;
1317 } dml15t_;
1318 static struct {
1319 int_4 l_, l2_, kmax_;
1320 real_8 radix_, radixl_, rad2l_, dlg10r_;
1321 } dxblk2_;
1322 static struct {
1323 int_4 nlg102_, mlg102_, lg102_[21];
1324 } dxblk3_;
1325 static struct {
1326 int_4 lpar_;
1327 real_4 uro_, sru_, eps_, sqovfl_, twou_, fouru_;
1328 } ml5mco_;
1329 static struct {
1330 int_4 nxpts_, nic_, nopg_, mxnon_, ndisk_, ntape_, neq_, indpvt_, integ_, nps_, ntp_, neqivp_, numort_, nfcc_, icoco_,
1331 lnfcc_;
1332 real_4 ae_, re_, tol_;
1333 } ml18jr_;
1334 static struct {
1335 int_4 igofx_, inhomo_, ivp_, ncompd_, nfc_, ncomp_;
1336 real_4 c_, xsav_;
1337 } ml8sz_;
1338 static struct {
1339 int_4 info_[15], istkop_, knswot_, kop_, lotjp_, mnswot_, nswot_;
1340 real_4 px_, pwcnd_, tnd_, x_, xbeg_, xend_, xot_, xop_;
1341 } ml15to_;
1342 static struct {
1343 int_4 lp_, lenl_, lenu_, ncp_, lrow_, lcol_;
1344 real_4 small_;
1345 } la05ds_;
1346 static struct {
1347 int_4 l_, l2_, kmax_;
1348 real_4 radix_, radixl_, rad2l_, dlg10r_;
1349 } xblk2_;
1350 static struct {
1351 int_4 nlg102_, mlg102_, lg102_[21];
1352 } xblk3_;
1355 arg_, int_4 _p_ in_, real_4 _p_ y_);
1357 y_, real_4 _p_ wk_, int_4 _p_ iflw_);
1359 int_4 _p_ ierr_);
1361 real_4 (*_f)(), real_4 _p_ sgn_);
1365 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
1366 _p_ w3_, real_4 _p_ wd_, real_4 _p_ ww_, real_4 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)());
1368 int_4 _p_ jt_);
1370 real_4 _p_ x_, int_4 _p_ n_, real_4 _p_ rnorm_);
1372 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_);
1374 nderiv_);
1376 vnikx_);
1378 real_4 (*_f)(), real_4 _p_ sgn_);
1380 );
1382 nz_, real_4 _p_ rl_, real_4 _p_ tol_, real_4 _p_ elim_, real_4 _p_ alim_);
1384 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
1385 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ wd_, complex_8 _p_ ww_, complex_8 _p_ wu_, int_4 (*_prdct)(), int_4
1386 (*_cprdct)());
1388 real_4 _p_ ah_, real_4 _p_ bh_);
1391 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1393 ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1395 ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1397 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1399 c_, real_4 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 _p_ idmn_, int_4 _p_ ierror_);
1401 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_
1402 idmn_, int_4 _p_ ierror_);
1404 logical_4 _p_ singlr_);
1406 real_4 _p_ xnu_, int_4 (*_cofx)(), int_4 (*_cofy)(), logical_4 _p_ singlr_);
1409 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
1410 _p_ tcos_, complex_8 _p_ p_);
1412 _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_,
1413 complex_8 _p_ w_, complex_8 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_);
1415 _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_,
1416 complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_);
1418 _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_
1419 w2_, complex_8 _p_ w3_);
1421 complex_8 _p_ c_, complex_8 _p_ y_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w_);
1423 , real_4 _p_ rcond_, complex_8 _p_ z_);
1425 , complex_8 _p_ det_);
1427 , int_4 _p_ info_);
1429 v_, int_4 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1431 v_, int_4 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_);
1433 , complex_8 _p_ b_, int_4 _p_ job_);
1435 real_4 _p_ ah_, real_4 _p_ bh_);
1438 bp_, real_4 _p_ bh_);
1440 b_, logical_4 _p_ kbd_);
1443 ind_, complex_8 _p_ work_);
1445 ind_, complex_8 _p_ work_);
1447 ;
1449 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_
1450 b_, complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, real_4 _p_ yy_);
1452 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_
1453 b_, complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, real_4 _p_ yy_);
1455 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
1456 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ y_);
1458 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
1459 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ y_);
1461 _p_ s_);
1464 real_4 _p_ alim_, int_4 _p_ iuf_);
1466 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_)
1467 ;
1471 complex_8 _p_ arg_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ asum_, complex_8 _p_ bsum_);
1473 _p_ init_, complex_8 _p_ phi_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ sum_, complex_8 _p_ cwrk_);
1475 _p_ bkpt_, real_4 _p_ w_);
1479 _p_ w_, logical_4 _p_ sing_);
1481 arg_, int_4 _p_ in_, real_8 _p_ y_);
1483 int_4 _p_ ierr_);
1487 int_4 _p_ jt_);
1489 real_8 _p_ x_, int_4 _p_ n_, real_8 _p_ rnorm_);
1491 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_
1492 mode_, real_8 _p_ rw_, int_4 _p_ iw_);
1494 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_)
1495 ;
1497 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_
1498 , real_8 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_);
1500 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_);
1503 ldfjac_, real_8 _p_ xp_, real_8 _p_ fvecp_, int_4 _p_ mode_, real_8 _p_ err_);
1505 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_
1506 by_, real_8 _p_ cvec_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_);
1508 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_);
1510 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_)
1511 ;
1513 _p_ bkpt_, real_8 _p_ w_);
1515 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_,
1516 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_,
1517 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
1518 _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_
1519 start_, logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4
1520 _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_,
1521 int_4 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_8 _p_ rpar_, int_4 _p_ ipar_);
1523 delta_, real_8 _p_ x_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1525 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
1526 _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
1527 _p_ lw_);
1530 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
1531 _p_ ipar_);
1535 , 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_
1536 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_
1537 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_,
1538 logical_4 _p_ stiff_, logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_4 _p_ rpar_, int_4 _p_ ipar_);
1540 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_,
1541 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_,
1542 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
1543 _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_
1544 start_, logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4
1545 _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_,
1546 int_4 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_4 _p_ rpar_, int_4 _p_ ipar_);
1548 int_4 _p_ nbkpt_, real_8 _p_ bkptin_, int_4 _p_ nconst_, real_8 _p_ xconst_, real_8 _p_ yconst_, int_4 _p_ nderiv_,
1549 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_
1550 g_, int_4 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, real_8 _p_ work_, int_4 _p_ iwork_);
1552 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_);
1554 , int_4 _p_ ldfjac_, int_4 _p_ iflag_, real_8 _p_ epsfcn_, real_8 _p_ wa_);
1556 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
1557 _p_ ipar_);
1559 nderiv_);
1561 vnikx_);
1563 dattrv_, int_4 _p_ iflag_);
1565 int_4 _p_ iflag_);
1567 ierr_);
1569 real_8 _p_ work_, int_4 _p_ iwork_);
1571 _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_);
1573 real_8 _p_ up_, real_8 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_);
1575 _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_);
1577 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_,
1578 real_8 _p_ yp_, real_8 _p_ sf_, real_8 _p_ rpar_, int_4 _p_ ipar_, real_8 _p_ h_);
1582 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
1583 _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_);
1585 real_8 _p_ x_, real_8 _p_ wnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ is_);
1587 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_
1588 ip_);
1590 real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_);
1592 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_,
1593 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_
1594 scales_);
1597 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_);
1599 , real_8 _p_ delta_, real_8 _p_ par_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa1_, real_8 _p_ wa2_);
1601 real_8 _p_ rcond_, real_8 _p_ z_);
1603 real_8 _p_ det_);
1605 int_4 _p_ info_);
1607 int_4 _p_ itask_, int_4 _p_ ind_, real_8 _p_ work_, int_4 _p_ iwork_);
1609 real_8 _p_ b_, int_4 _p_ job_);
1611 , real_8 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_8 _p_ wa_, int_4 _p_ lwa_);
1613 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
1614 _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_
1615 , 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_
1616 );
1618 fvec_, real_8 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_8 _p_ wa_, int_4 _p_ lwa_);
1620 , 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_
1621 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_,
1622 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_,
1623 real_8 _p_ wa4_);
1625 div_, real_8 _p_ td_);
1627 , int_4 _p_ iscale_, real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ scales_, real_8 _p_ rows_, real_8 _p_ rs_);
1629 ;
1631 ircx_);
1634 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_
1635 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_,
1636 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_,
1637 real_8 _p_ duals_, logical_4 _p_ stpedg_);
1639 _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_
1640 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_,
1641 int_4 _p_ imat_, logical_4 _p_ lopt_);
1645 _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
1646 _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_,
1647 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_
1648 singlr_, logical_4 _p_ redbas_);
1650 _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
1651 _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
1652 _p_ basmat_, real_8 _p_ csc_, real_8 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_);
1654 _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
1655 _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_
1656 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_
1657 rg_, real_8 _p_ colnrm_, real_8 _p_ duals_, logical_4 _p_ found_);
1659 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_
1660 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_,
1661 logical_4 _p_ zerolv_);
1663 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_,
1664 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_
1665 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_
1666 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_
1667 iwr_);
1669 _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_,
1670 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_,
1671 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_
1672 theta_, real_8 _p_ costsc_, real_8 _p_ xlamda_, real_8 _p_ rhsnrm_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_
1673 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_
1674 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_,
1675 real_8 _p_ duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_);
1677 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
1678 _p_ sizeup_, real_8 _p_ asmall_, real_8 _p_ abig_);
1680 ircx_);
1682 real_8 _p_ work_);
1685 real_8 _p_ eps_, real_8 _p_ r_, int_4 _p_ ierr_, real_8 _p_ a_);
1687 , real_8 _p_ c_, real_8 _p_ work_, int_4 _p_ ierr_);
1689 int_4 _p_ ibasis_, real_8 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_);
1692 , 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_);
1699 int_4 _p_ incy_);
1701 int_4 _p_ incy_);
1704 ipvt_, int_4 _p_ lipvt_, real_8 _p_ sigma_, real_8 _p_ acnorm_, real_8 _p_ wa_);
1706 qtb_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa_);
1708 l1max_, real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1710 m2max_, real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1712 l1min_, real_8 _p_ l1max_, real_8 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1717 w_, real_8 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, real_8 _p_ stowa_, int_4 _p_ iflag_);
1721 , 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_
1722 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_
1723 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_,
1724 logical_4 _p_ stiff_, logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_8 _p_ rpar_, int_4 _p_ ipar_);
1727 _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_,
1728 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
1729 _p_ y_, real_8 _p_ fac_, int_4 _p_ is_);
1731 _p_ tolf_, int_4 _p_ iflag_, real_8 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_);
1733 _p_ m_);
1735 , 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_
1736 duals_, int_4 _p_ ibasis_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_);
1738 ndisk_, int_4 _p_ ntape_);
1741 int_4 _p_ iflag_, int_4 _p_ mlso_, real_8 _p_ work_, int_4 _p_ iwork_);
1743 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
1744 _p_ ic_, int_4 _p_ ir_);
1746 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
1747 _p_ ir_, int_4 _p_ ic_);
1749 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
1750 _p_ ir_);
1752 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
1753 _p_ ic_);
1755 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
1756 _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_);
1758 dattrv_, int_4 _p_ iflag_);
1760 _p_ inhomo_, int_4 _p_ iflag_);
1763 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
1764 _p_ done_);
1766 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_
1767 wd_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ z_, real_8 _p_ temp_, real_8 _p_ d_);
1769 recalc_, int_4 _p_ imax_, real_8 _p_ hbar_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ w_);
1771 _p_ scale_, real_8 _p_ wic_);
1773 real_8 _p_ w_);
1775 real_8 _p_ prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_8 _p_ work_);
1778 real_8 _p_ cos_, real_8 _p_ sin_);
1789 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
1790 _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
1791 _p_ lw_);
1793 int_4 _p_ nbkpt_, real_4 _p_ bkptin_, int_4 _p_ nconst_, real_4 _p_ xconst_, real_4 _p_ yconst_, int_4 _p_ nderiv_,
1794 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_
1795 g_, int_4 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, real_4 _p_ work_, int_4 _p_ iwork_);
1797 , int_4 _p_ ldfjac_, int_4 _p_ iflag_, real_4 _p_ epsfcn_, real_4 _p_ wa_);
1801 dattrv_, int_4 _p_ iflag_);
1803 int_4 _p_ iflag_);
1806 ierr_);
1808 real_4 _p_ up_, real_4 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_);
1810 _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_);
1814 _p_ kflag_, char _p_ work_, int_4 _p_ ier_);
1816 , 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_
1817 yp_, real_4 _p_ sf_, real_4 _p_ rpar_, int_4 _p_ ipar_, real_4 _p_ h_);
1819 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_,
1820 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_
1821 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_
1822 );
1825 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_
1826 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
1827 _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_
1828 sint_, real_4 _p_ bmh_);
1830 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_
1831 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
1832 _p_ sn_, real_4 _p_ ss_, real_4 _p_ sint_, real_4 _p_ d_);
1847 _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_
1848 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_);
1850 real_4 _p_ x_, real_4 _p_ wnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ is_);
1852 _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_);
1854 real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_);
1856 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_
1857 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_
1858 scales_);
1860 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_,
1861 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_
1862 scales_);
1865 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_);
1888 div_, real_4 _p_ td_);
1890 div_, real_4 _p_ td_);
1894 , int_4 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ cols_, real_4 _p_ cs_);
1896 , int_4 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ rows_, real_4 _p_ rs_);
1898 ircx_);
1904 ircx_);
1906 , 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_);
1908 , 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
1909 _p_ w2_, real_4 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
1911 _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_
1912 , real_4 _p_ tcos_, real_4 _p_ p_);
1915 real_4 _p_ eps_, real_4 _p_ r_, int_4 _p_ ierr_, real_4 _p_ a_);
1918 , real_4 _p_ c_, real_4 _p_ work_, int_4 _p_ ierr_);
1920 _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_
1921 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_);
1923 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
1924 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_);
1926 bp_, real_4 _p_ bh_);
1928 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_);
1934 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_,
1935 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ u_);
1937 , 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_,
1938 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ w_);
1940 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_,
1941 real_4 _p_ d_, real_4 _p_ w_, real_4 _p_ u_);
1943 , 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_
1944 c_, real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ w_);
1950 int_4 _p_ ierr_);
1953 ;
1956 l1max_, real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1958 m2max_, real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1960 l1min_, real_4 _p_ l1max_, real_4 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_);
1964 , real_4 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, real_4 _p_ stowa_, int_4 _p_ iflag_);
1969 s_);
1972 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_
1973 mode_, real_4 _p_ rw_, int_4 _p_ iw_);
1975 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_)
1976 ;
1978 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_
1979 , real_4 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_);
1982 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_
1983 by_, real_4 _p_ cvec_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_);
1985 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_);
1987 real_4 _p_ work_, int_4 _p_ job_, int_4 _p_ info_);
1989 real_4 _p_ work_, int_4 _p_ iwork_);
1991 real_4 _p_ work_, int_4 _p_ iwork_);
1993 _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_);
1995 real_4 _p_ rcond_, real_4 _p_ z_);
1997 real_4 _p_ det_);
1999 int_4 _p_ info_);
2001 int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_);
2003 int_4 _p_ itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_);
2005 real_4 _p_ b_, int_4 _p_ job_);
2007 , real_4 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_4 _p_ wa_, int_4 _p_ lwa_);
2009 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
2010 _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_
2011 , 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_
2012 );
2014 fvec_, real_4 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_4 _p_ wa_, int_4 _p_ lwa_);
2016 , 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_
2017 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_,
2018 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_,
2019 real_4 _p_ wa4_);
2021 int_4 _p_ iflag_, real_4 _p_ work_, int_4 _p_ iwork_);
2024 _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_,
2025 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
2026 _p_ y_, real_4 _p_ fac_, int_4 _p_ is_);
2028 tolf_, int_4 _p_ iflag_, real_4 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_);
2030 _p_ m_);
2032 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_
2033 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_
2034 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_,
2035 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_
2036 ierror_);
2038 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_
2039 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
2040 (*_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_
2041 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_
2042 , int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_);
2044 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_
2045 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_,
2046 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_,
2047 real_4 _p_ duals_, logical_4 _p_ stpedg_);
2049 _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_
2050 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_,
2051 int_4 _p_ imat_, logical_4 _p_ lopt_);
2053 _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
2054 _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_,
2055 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_
2056 singlr_, logical_4 _p_ redbas_);
2058 _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
2059 _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
2060 _p_ basmat_, real_4 _p_ csc_, real_4 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_);
2062 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_
2063 duals_, int_4 _p_ ibasis_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_);
2065 _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
2066 _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_
2067 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_
2068 rg_, real_4 _p_ colnrm_, real_4 _p_ duals_, logical_4 _p_ found_);
2070 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_
2071 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_,
2072 logical_4 _p_ zerolv_);
2074 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_,
2075 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_
2076 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_
2077 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_
2078 iwr_);
2080 _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_,
2081 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_,
2082 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_
2083 theta_, real_4 _p_ costsc_, real_4 _p_ xlamda_, real_4 _p_ rhsnrm_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_
2084 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_
2085 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_,
2086 real_4 _p_ duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_);
2088 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
2089 _p_ sizeup_, real_4 _p_ asmall_, real_4 _p_ abig_);
2091 real_4 _p_ work_);
2093 real_4 _p_ work_);
2095 int_4 _p_ ibasis_, real_4 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_);
2100 int_4 _p_ info_);
2103 ndisk_, int_4 _p_ ntape_);
2106 int_4 _p_ iflag_, int_4 _p_ mlso_, real_4 _p_ work_, int_4 _p_ iwork_);
2108 _p_ inhomo_, int_4 _p_ iflag_);
2113 _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_);
2116 _p_ z_);
2118 _p_ z_);
2120 real_4 _p_ y_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w_);
2122 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
2123 _p_ ic_, int_4 _p_ ir_);
2125 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
2126 _p_ ir_, int_4 _p_ ic_);
2128 _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_
2129 ir_);
2131 _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_
2132 ic_);
2134 _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_
2135 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_);
2137 dattrv_, int_4 _p_ iflag_);
2140 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
2141 _p_ done_);
2143 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_
2144 wd_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ z_, real_4 _p_ temp_, real_4 _p_ d_);
2146 recalc_, int_4 _p_ imax_, real_4 _p_ hbar_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ w_);
2148 _p_ scale_, real_4 _p_ wic_);
2150 real_4 _p_ w_);
2152 _p_ prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_4 _p_ work_);
2158 int_4 _aaaaaa (char _p_ ver_)
2159 { // ** body not listed **
2163 }
2164 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_,
2165 int_4 _p_ in_, real_4 _p_ y_)
2166 { // ** body not listed **
2575 }
2576 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_,
2577 real_4 _p_ wk_, int_4 _p_ iflw_)
2578 { // ** body not listed **
4658 }
4659 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_
4660 ierr_)
4661 { // ** body not listed **
4807 }
4808 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
4809 (*_f)(), real_4 _p_ sgn_)
4810 { // ** body not listed **
4845 }
4846 int_4 _bdiff (int_4 _p_ l_, real_4 _p_ v_)
4847 { // ** body not listed **
4862 }
4863 int_4 _bksol (int_4 _p_ n_, real_4 _p_ a_, real_4 _p_ x_)
4864 { // ** body not listed **
4881 }
4882 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_
4883 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_,
4884 real_4 _p_ wd_, real_4 _p_ ww_, real_4 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)())
4885 { // ** body not listed **
5218 }
5219 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_
5220 )
5221 { // ** body not listed **
5297 }
5298 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_
5299 x_, int_4 _p_ n_, real_4 _p_ rnorm_)
5300 { // ** body not listed **
5388 }
5389 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_
5390 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_)
5391 { // ** body not listed **
5659 }
5660 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_)
5661 { // ** body not listed **
5727 }
5728 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_)
5729 { // ** body not listed **
5832 }
5833 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
5834 (*_f)(), real_4 _p_ sgn_)
5835 { // ** body not listed **
5870 }
5871 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_)
5872 { // ** body not listed **
5911 }
5912 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
5913 _p_ rl_, real_4 _p_ tol_, real_4 _p_ elim_, real_4 _p_ alim_)
5914 { // ** body not listed **
6069 }
6070 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
6071 _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_,
6072 complex_8 _p_ w3_, complex_8 _p_ wd_, complex_8 _p_ ww_, complex_8 _p_ wu_, int_4 (*_prdct)(), int_4 (*_cprdct)())
6073 { // ** body not listed **
6406 }
6407 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
6408 _p_ ah_, real_4 _p_ bh_)
6409 { // ** body not listed **
6567 }
6568 int_4 _cfod (int_4 _p_ meth_, real_4 _p_ elco_, real_4 _p_ tesco_)
6569 { // ** body not listed **
6644 }
6645 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_
6646 work_, int_4 _p_ job_, int_4 _p_ info_)
6647 { // ** body not listed **
6742 }
6743 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_,
6744 complex_8 _p_ work_, int_4 _p_ iwork_)
6745 { // ** body not listed **
6936 }
6937 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_,
6938 complex_8 _p_ work_, int_4 _p_ iwork_)
6939 { // ** body not listed **
7149 }
7150 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_
7151 work_, int_4 _p_ job_, int_4 _p_ info_)
7152 { // ** body not listed **
7265 }
7266 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
7267 _p_ d_, int_4 _p_ n_, int_4 _p_ nbdcnd_, int_4 (*_cofx)(), int_4 _p_ idmn_, int_4 _p_ ierror_)
7268 { // ** body not listed **
7314 }
7315 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_,
7316 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_,
7317 int_4 _p_ ierror_)
7318 { // ** body not listed **
7373 }
7374 int_4 _chksn4 (int_4 _p_ mbdcnd_, int_4 _p_ nbdcnd_, real_4 _p_ alpha_, real_4 _p_ beta_, int_4 (*_cofx)(), logical_4
7375 _p_ singlr_)
7376 { // ** body not listed **
7401 }
7402 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_
7403 xnu_, int_4 (*_cofx)(), int_4 (*_cofy)(), logical_4 _p_ singlr_)
7404 { // ** body not listed **
7443 }
7444 int_4 _cmpcsg (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, complex_8 _p_ a_)
7445 { // ** body not listed **
7478 }
7479 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_,
7480 complex_8 _p_ q_, int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ w_, complex_8 _p_ d_, complex_8 _p_ tcos_,
7481 complex_8 _p_ p_)
7482 { // ** body not listed **
7904 }
7905 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_,
7906 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
7907 _p_ w_, complex_8 _p_ w2_, complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_)
7908 { // ** body not listed **
8544 }
8545 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_,
8546 int_4 _p_ idimq_, complex_8 _p_ b_, complex_8 _p_ b2_, complex_8 _p_ b3_, complex_8 _p_ w_, complex_8 _p_ w2_,
8547 complex_8 _p_ w3_, complex_8 _p_ d_, complex_8 _p_ tcos_, complex_8 _p_ p_)
8548 { // ** body not listed **
8643 }
8644 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_,
8645 complex_8 _p_ y2_, complex_8 _p_ y3_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w1_, complex_8 _p_ w2_,
8646 complex_8 _p_ w3_)
8647 { // ** body not listed **
8757 }
8758 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_
8759 , complex_8 _p_ y_, complex_8 _p_ tcos_, complex_8 _p_ d_, complex_8 _p_ w_)
8760 { // ** body not listed **
8813 }
8814 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
8815 _p_ rcond_, complex_8 _p_ z_)
8816 { // ** body not listed **
8849 }
8850 s_ = ({complex_8 zdum_1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf
8851 (zdum_1_));}) / ({complex_8 zdum_1_ = ek_ - z_[k_ - 1]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));})
8852 ;
8853 (void) _csscal (n_, &s_, z_, &_k1);
8854 ek_ = CMPLXF (s_, 0.0) * ek_;
8855 _l30:;
8856 wk_ = ek_ - z_[k_ - 1];
8857 wkm_ = -ek_ - z_[k_ - 1];
8858 s_ = ({complex_8 zdum_1_ = wk_; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));});
8859 sm_ = ({complex_8 zdum_1_ = wkm_; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));});
8860 if (({complex_8 zdum_1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf
8861 (zdum_1_));}) == 0.0e0) {
8862 goto _l40;
8863 }
8864 wk_ = wk_ / conjf (abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]);
8865 wkm_ = wkm_ / conjf (abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]);
8866 goto _l50;
8867 _l40:;
8868 wk_ = CMPLXF (1.0, 0.0);
8869 wkm_ = CMPLXF (1.0, 0.0);
8870 _l50:;
8871 kp1_ = k_ + 1;
8872 ju_ = _min (_max (ju_, (*mu_) + ipvt_[k_ - 1]), (*n_));
8873 mm_ = ml1_;
8874 if (kp1_ > ju_) {
8875 goto _l90;
8876 }
8877 for (i_ = kp1_; i_ <= ju_; (i_)++) {
8878 mm_ = mm_ + 1;
8879 sm_ = sm_ + ({complex_8 zdum_1_ = z_[i_ - 1] + wkm_ * conjf (abe_[k_ - 1 + ((*lda_)) * ((mm_ - 1))]); _abs ((real_4)
8880 (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));});
8881 z_[i_ - 1] = z_[i_ - 1] + wk_ * conjf (abe_[k_ - 1 + ((*lda_)) * ((mm_ - 1))]);
8882 s_ = s_ + ({complex_8 zdum_1_ = z_[i_ - 1]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));});
8883 }
8884 if (s_ >= sm_) {
8885 goto _l80;
8886 }
8887 t_ = wkm_ - wk_;
8888 wk_ = wkm_;
8889 mm_ = ml1_;
8890 for (i_ = kp1_; i_ <= ju_; (i_)++) {
8891 mm_ = mm_ + 1;
8892 z_[i_ - 1] = z_[i_ - 1] + t_ * conjf (abe_[k_ - 1 + ((*lda_)) * ((mm_ - 1))]);
8893 }
8894 _l80:;
8895 _l90:;
8896 z_[k_ - 1] = wk_;
8897 }
8898 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8899 (void) _csscal (n_, &s_, z_, &_k1);
8900 for (kb_ = 1; kb_ <= (*n_); (kb_)++) {
8901 k_ = (*n_) + 1 - kb_;
8902 nl_ = _min ((*ml_), (*n_) - k_);
8903 if (k_ < (*n_)) {
8904 z_[k_ - 1] = z_[k_ - 1] + _cdotc (&nl_, &abe_[k_ + nl_ - 1 + ((*lda_)) * ((ml1_ - nl_ - 1))], ($0_ = -ldb_, &$0_),
8905 &z_[k_ + 1 - 1], &_k1);
8906 }
8907 if (({complex_8 zdum_1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));}) <= 1.0e0) {
8908 goto _l110;
8909 }
8910 s_ = 1.0e0 / ({complex_8 zdum_1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));});
8911 (void) _csscal (n_, &s_, z_, &_k1);
8912 _l110:;
8913 l_ = ipvt_[k_ - 1];
8914 t_ = z_[l_ - 1];
8915 z_[l_ - 1] = z_[k_ - 1];
8916 z_[k_ - 1] = t_;
8917 }
8918 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8919 (void) _csscal (n_, &s_, z_, &_k1);
8920 ynorm_ = 1.0;
8921 for (k_ = 1; k_ <= (*n_); (k_)++) {
8922 l_ = ipvt_[k_ - 1];
8923 t_ = z_[l_ - 1];
8924 z_[l_ - 1] = z_[k_ - 1];
8925 z_[k_ - 1] = t_;
8926 nl_ = _min ((*ml_), (*n_) - k_);
8927 if (k_ < (*n_)) {
8928 (void) _caxpy (&nl_, &t_, &abe_[k_ + nl_ - 1 + ((*lda_)) * ((ml1_ - nl_ - 1))], ($1_ = -ldb_, &$1_), &z_[k_ + 1 - 1],
8929 &_k1);
8930 }
8931 if (({complex_8 zdum_1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));}) <= 1.0e0) {
8932 goto _l130;
8933 }
8934 s_ = 1.0e0 / ({complex_8 zdum_1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));});
8935 (void) _csscal (n_, &s_, z_, &_k1);
8936 ynorm_ = s_ * ynorm_;
8937 _l130:;
8938 }
8939 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8940 (void) _csscal (n_, &s_, z_, &_k1);
8941 ynorm_ = s_ * ynorm_;
8942 for (kb_ = 1; kb_ <= (*n_); (kb_)++) {
8943 k_ = (*n_) + 1 - kb_;
8944 if (({complex_8 zdum_1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));}) <= ({complex_8
8945 zdum_1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));})) {
8946 goto _l150;
8947 }
8948 s_ = ({complex_8 zdum_1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf
8949 (zdum_1_));}) / ({complex_8 zdum_1_ = z_[k_ - 1]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));});
8950 (void) _csscal (n_, &s_, z_, &_k1);
8951 ynorm_ = s_ * ynorm_;
8952 _l150:;
8953 if (({complex_8 zdum_1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf
8954 (zdum_1_));}) != 0.0e0) {
8955 z_[k_ - 1] = z_[k_ - 1] / abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))];
8956 }
8957 if (({complex_8 zdum_1_ = abe_[k_ - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf
8958 (zdum_1_));}) == 0.0e0) {
8959 z_[k_ - 1] = 1.0;
8960 }
8961 lm_ = _min (k_, m_) - 1;
8962 lz_ = k_ - lm_;
8963 t_ = -z_[k_ - 1];
8964 (void) _caxpy (&lm_, &t_, &abe_[k_ - 1 - 1 + ((*lda_)) * (((*ml_) + 2 - 1))], ($2_ = -ldb_, &$2_), &z_[lz_ - 1], &_k1)
8965 ;
8966 }
8967 s_ = 1.0e0 / _scasum (n_, z_, &_k1);
8968 (void) _csscal (n_, &s_, z_, &_k1);
8969 ynorm_ = s_ * ynorm_;
8970 if (anorm_ != 0.0e0) {
8971 (*rcond_) = ynorm_ / anorm_;
8972 }
8973 if (anorm_ == 0.0e0) {
8974 (*rcond_) = 0.0;
8975 }
8976 __calls[33].calls++;
8977 return 0;
8978 }
8979 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_,
8980 complex_8 _p_ det_)
8981 { // ** body not listed **
8999 }
9000 det_[0] = CMPLXF (ten_, 0.0) * det_[0];
9001 det_[1] = det_[1] - CMPLXF (1.0, 0.0);
9002 goto _l10;
9003 _l20:;
9004 _l30:;
9005 if (({complex_8 zdum_1_ = det_[0]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf (zdum_1_));}) < ten_) {
9006 goto _l40;
9007 }
9008 det_[0] = det_[0] / CMPLXF (ten_, 0.0);
9009 det_[1] = det_[1] + CMPLXF (1.0, 0.0);
9010 goto _l30;
9011 _l40:;
9012 }
9013 _l60:;
9014 __calls[34].calls++;
9015 return 0;
9016 }
9017 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
9018 _p_ info_)
9019 { // ** body not listed **
9067 }
9068 _l50:;
9069 ipvt_[(*n_) - 1] = (*n_);
9070 if (({complex_8 zdum_1_ = abe_[(*n_) - 1 + ((*lda_)) * ((ml1_ - 1))]; _abs ((real_4) (crealf (zdum_1_))) + _abs (cimagf
9071 (zdum_1_));}) == 0.0e0) {
9072 (*info_) = (*n_);
9073 }
9074 __calls[35].calls++;
9075 return 0;
9076 }
9077 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
9078 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_)
9079 { // ** body not listed **
9356 }
9357 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
9358 _p_ itask_, int_4 _p_ ind_, complex_8 _p_ work_, int_4 _p_ iwork_)
9359 { // ** body not listed **
9660 }
9661 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_,
9662 complex_8 _p_ b_, int_4 _p_ job_)
9663 { // ** body not listed **
9733 }
9734 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
9735 _p_ ah_, real_4 _p_ bh_)
9736 { // ** body not listed **
9894 }
9895 int_4 _cosgen (int_4 _p_ n_, int_4 _p_ ijump_, real_4 _p_ fnum_, real_4 _p_ fden_, real_4 _p_ a_)
9896 { // ** body not listed **
9929 }
9930 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
9931 _p_ bh_)
9932 { // ** body not listed **
10218 }
10219 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_,
10220 logical_4 _p_ kbd_)
10221 { // ** body not listed **
10280 }
10281 int_4 _cpevlr (int_4 _p_ n_, int_4 _p_ m_, real_4 _p_ a_, real_4 _p_ x_, real_4 _p_ c_)
10282 { // ** body not listed **
10302 }
10303 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_,
10304 complex_8 _p_ work_)
10305 { // ** body not listed **
10497 }
10498 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_,
10499 complex_8 _p_ work_)
10500 { // ** body not listed **
10715 }
10716 int_4 _cpqr79 (int_4 _p_ ndeg_, complex_8 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_)
10717 { // ** body not listed **
10768 }
10769 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
10770 _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_,
10771 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, real_4 _p_ yy_)
10772 { // ** body not listed **
10925 }
10926 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_,
10927 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_,
10928 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, real_4 _p_ yy_)
10929 { // ** body not listed **
11111 }
11112 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
11113 _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_,
11114 complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ y_)
11115 { // ** body not listed **
11271 }
11272 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_,
11273 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_
11274 , complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ y_)
11275 { // ** body not listed **
11460 }
11461 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_)
11462 { // ** body not listed **
11583 }
11584 int_4 _crati (complex_8 _p_ z_, real_4 _p_ fnu_, int_4 _p_ n_, complex_8 _p_ cy_, real_4 _p_ tol_)
11585 { // ** body not listed **
11694 }
11695 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_
11696 alim_, int_4 _p_ iuf_)
11697 { // ** body not listed **
11747 }
11748 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_,
11749 real_4 _p_ rows_, real_4 _p_ rowsav_, real_4 _p_ anorm_, real_4 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
11750 { // ** body not listed **
11834 }
11835 int_4 _cshch (complex_8 _p_ z_, complex_8 _p_ csh_, complex_8 _p_ cch_)
11836 { // ** body not listed **
11852 }
11853 int_4 _cuchk (complex_8 _p_ y_, int_4 _p_ nz_, real_4 _p_ ascle_, real_4 _p_ tol_)
11854 { // ** body not listed **
11873 }
11874 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_
11875 arg_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ asum_, complex_8 _p_ bsum_)
11876 { // ** body not listed **
15131 }
15132 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_,
15133 complex_8 _p_ phi_, complex_8 _p_ zeta1_, complex_8 _p_ zeta2_, complex_8 _p_ sum_, complex_8 _p_ cwrk_)
15134 { // ** body not listed **
15887 }
15888 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_,
15889 real_4 _p_ w_)
15890 { // ** body not listed **
15920 }
15921 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_)
15922 { // ** body not listed **
15961 }
15962 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_)
15963 { // ** body not listed **
16026 }
16027 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_,
16028 logical_4 _p_ sing_)
16029 { // ** body not listed **
16160 }
16161 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_,
16162 int_4 _p_ in_, real_8 _p_ y_)
16163 { // ** body not listed **
16572 }
16573 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_
16574 ierr_)
16575 { // ** body not listed **
16719 }
16720 int_4 _dbdiff (int_4 _p_ l_, real_8 _p_ v_)
16721 { // ** body not listed **
16736 }
16737 int_4 _dbksol (int_4 _p_ n_, real_8 _p_ a_, real_8 _p_ x_)
16738 { // ** body not listed **
16755 }
16756 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_
16757 )
16758 { // ** body not listed **
16834 }
16835 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_
16836 x_, int_4 _p_ n_, real_8 _p_ rnorm_)
16837 { // ** body not listed **
16925 }
16926 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_,
16927 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_,
16928 real_8 _p_ rw_, int_4 _p_ iw_)
16929 { // ** body not listed **
18454 }
18455 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
18456 _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_)
18457 { // ** body not listed **
19789 }
19790 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_,
19791 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_,
19792 real_8 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_)
19793 { // ** body not listed **
21510 }
21511 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_
21512 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_)
21513 { // ** body not listed **
21781 }
21782 int_4 _dcfod (int_4 _p_ meth_, real_8 _p_ elco_, real_8 _p_ tesco_)
21783 { // ** body not listed **
21858 }
21859 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
21860 _p_ xp_, real_8 _p_ fvecp_, int_4 _p_ mode_, real_8 _p_ err_)
21861 { // ** body not listed **
21933 }
21934 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_,
21935 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_,
21936 real_8 _p_ cvec_, real_8 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_)
21937 { // ** body not listed **
22071 }
22072 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_
22073 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_)
22074 { // ** body not listed **
22213 }
22214 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_,
22215 real_8 _p_ rows_, real_8 _p_ rowsav_, real_8 _p_ anorm_, real_8 _p_ scales_, int_4 _p_ iscale_, int_4 _p_ ic_)
22216 { // ** body not listed **
22300 }
22301 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_
22302 , real_8 _p_ w_)
22303 { // ** body not listed **
22333 }
22334 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
22335 _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
22336 _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_
22337 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_,
22338 real_8 _p_ told_, real_8 _p_ delsgn_, real_8 _p_ tstop_, real_8 _p_ twou_, real_8 _p_ fouru_, logical_4 _p_ start_,
22339 logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4 _p_
22340 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
22341 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_8 _p_ rpar_, int_4 _p_ ipar_)
22342 { // ** body not listed **
23221 }
23222 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
23223 _p_ x_, real_8 _p_ wa1_, real_8 _p_ wa2_)
23224 { // ** body not listed **
23333 }
23334 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_
23335 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_,
23336 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_)
23337 { // ** body not listed **
23532 }
23533 int_4 _defe4 (int_4 (*_cofx)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_)
23534 { // ** body not listed **
23566 }
23567 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_
23568 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_)
23569 { // ** body not listed **
23607 }
23608 int_4 _defer (int_4 (*_cofx)(), int_4 (*_cofy)(), int_4 _p_ idmn_, real_4 _p_ usol_, real_4 _p_ grhs_)
23609 { // ** body not listed **
23643 }
23644 real_8 _denorm (int_4 _p_ n_, real_8 _p_ x_)
23645 { // ** body not listed **
23742 }
23743 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
23744 _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
23745 _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
23746 _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_,
23747 logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_4 _p_ rpar_, int_4 _p_ ipar_)
23748 { // ** body not listed **
24588 }
24589 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_
24590 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_
24591 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_
24592 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_,
24593 real_4 _p_ told_, real_4 _p_ delsgn_, real_4 _p_ tstop_, real_4 _p_ twou_, real_4 _p_ fouru_, logical_4 _p_ start_,
24594 logical_4 _p_ phase1_, logical_4 _p_ nornd_, logical_4 _p_ stiff_, logical_4 _p_ intout_, int_4 _p_ ns_, int_4 _p_
24595 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
24596 _p_ ivc_, int_4 _p_ iv_, int_4 _p_ kgi_, real_4 _p_ rpar_, int_4 _p_ ipar_)
24597 { // ** body not listed **
25477 }
25478 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_
25479 nbkpt_, real_8 _p_ bkptin_, int_4 _p_ nconst_, real_8 _p_ xconst_, real_8 _p_ yconst_, int_4 _p_ nderiv_, int_4 _p_
25480 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
25481 _p_ mdg_, real_8 _p_ w_, int_4 _p_ mdw_, real_8 _p_ work_, int_4 _p_ iwork_)
25482 { // ** body not listed **
25847 }
25848 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_,
25849 int_4 _p_ iflag_, int_4 _p_ ml_, int_4 _p_ mu_, real_8 _p_ epsfcn_, real_8 _p_ wa1_, real_8 _p_ wa2_)
25850 { // ** body not listed **
25922 }
25923 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
25924 _p_ ldfjac_, int_4 _p_ iflag_, real_8 _p_ epsfcn_, real_8 _p_ wa_)
25925 { // ** body not listed **
25963 }
25964 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_
25965 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_)
25966 { // ** body not listed **
26004 }
26005 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_)
26006 { // ** body not listed **
26072 }
26073 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_)
26074 { // ** body not listed **
26177 }
26178 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_,
26179 int_4 _p_ iflag_)
26180 { // ** body not listed **
26251 }
26252 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_
26253 iflag_)
26254 { // ** body not listed **
26384 }
26385 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_)
26386 { // ** body not listed **
26635 }
26636 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_
26637 work_, int_4 _p_ iwork_)
26638 { // ** body not listed **
26829 }
26830 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_,
26831 real_8 _p_ rnorm_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
26832 { // ** body not listed **
26860 }
26861 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_
26862 up_, real_8 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_)
26863 { // ** body not listed **
26965 }
26966 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_,
26967 real_8 _p_ tau_, int_4 _p_ krank_, real_8 _p_ rnorm_, real_8 _p_ h_, real_8 _p_ g_, int_4 _p_ ip_)
26968 { // ** body not listed **
27152 }
27153 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
27154 _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_,
27155 real_8 _p_ sf_, real_8 _p_ rpar_, int_4 _p_ ipar_, real_8 _p_ h_)
27156 { // ** body not listed **
27301 }
27302 real_8 _dhvnrm (real_8 _p_ v_, int_4 _p_ ncomp_)
27303 { // ** body not listed **
27312 }
27313 int_4 _djairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ ai_, real_8 _p_ dai_)
27314 { // ** body not listed **
28903 }
28904 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_,
28905 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_,
28906 real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
28907 { // ** body not listed **
29156 }
29157 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_
29158 x_, real_8 _p_ wnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ is_)
29159 { // ** body not listed **
29318 }
29319 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_
29320 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_)
29321 { // ** body not listed **
29825 }
29826 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_
29827 x_, real_8 _p_ rnorm_, int_4 _p_ mode_, real_8 _p_ ws_, int_4 _p_ ip_)
29828 { // ** body not listed **
30045 }
30046 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_,
30047 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_
30048 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_)
30049 { // ** body not listed **
30221 }
30222 int_4 _dmacon (void)
30223 { // ** body not listed **
30239 }
30240 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_
30241 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_)
30242 { // ** body not listed **
30481 }
30482 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
30483 _p_ delta_, real_8 _p_ par_, real_8 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa1_, real_8 _p_ wa2_)
30484 { // ** body not listed **
30643 }
30644 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_
30645 rcond_, real_8 _p_ z_)
30646 { // ** body not listed **
30795 }
30796 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_
30797 det_)
30798 { // ** body not listed **
30832 }
30833 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_
30834 info_)
30835 { // ** body not listed **
30890 }
30891 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_
30892 itask_, int_4 _p_ ind_, real_8 _p_ work_, int_4 _p_ iwork_)
30893 { // ** body not listed **
31170 }
31171 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_
31172 b_, int_4 _p_ job_)
31173 { // ** body not listed **
31243 }
31244 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
31245 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_8 _p_ wa_, int_4 _p_ lwa_)
31246 { // ** body not listed **
31296 }
31297 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_
31298 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_,
31299 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_
31300 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_)
31301 { // ** body not listed **
31874 }
31875 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
31876 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_8 _p_ wa_, int_4 _p_ lwa_)
31877 { // ** body not listed **
31933 }
31934 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
31935 _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_,
31936 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_
31937 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_
31938 wa4_)
31939 { // ** body not listed **
32252 }
32253 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_,
32254 real_8 _p_ td_)
32255 { // ** body not listed **
32288 }
32289 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
32290 _p_ iscale_, real_8 _p_ diag_, int_4 _p_ kpivot_, real_8 _p_ scales_, real_8 _p_ rows_, real_8 _p_ rs_)
32291 { // ** body not listed **
32397 }
32398 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_)
32399 { // ** body not listed **
32572 }
32573 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_)
32574 { // ** body not listed **
32784 }
32785 int_4 _dpcoef (int_4 _p_ l_, real_8 _p_ c_, real_8 _p_ tc_, real_8 _p_ a_)
32786 { // ** body not listed **
32815 }
32816 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_,
32817 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_,
32818 real_8 _p_ costsc_, real_8 _p_ gg_, real_8 _p_ erdnrm_, real_8 _p_ dulnrm_, real_8 _p_ amat_, real_8 _p_ basmat_,
32819 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_,
32820 real_8 _p_ duals_, logical_4 _p_ stpedg_)
32821 { // ** body not listed **
32953 }
32954 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_,
32955 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
32956 _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_
32957 , logical_4 _p_ lopt_)
32958 { // ** body not listed **
33230 }
33231 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_)
33232 { // ** body not listed **
33305 }
33306 int_4 _dplint (int_4 _p_ n_, real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ c_)
33307 { // ** body not listed **
33338 }
33339 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_,
33340 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_,
33341 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_
33342 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_,
33343 logical_4 _p_ redbas_)
33344 { // ** body not listed **
33537 }
33538 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_,
33539 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_,
33540 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_
33541 basmat_, real_8 _p_ csc_, real_8 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_)
33542 { // ** body not listed **
33639 }
33640 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_
33641 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_
33642 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_,
33643 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
33644 _p_ colnrm_, real_8 _p_ duals_, logical_4 _p_ found_)
33645 { // ** body not listed **
33794 }
33795 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_
33796 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_,
33797 real_8 _p_ bl_, real_8 _p_ bu_, real_8 _p_ erp_, real_8 _p_ rprim_, real_8 _p_ primal_, logical_4 _p_ finite_,
33798 logical_4 _p_ zerolv_)
33799 { // ** body not listed **
33949 }
33950 int_4 _dplpmn (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ prgopt_, real_8
33951 _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_,
33952 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_
33953 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_
33954 , int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_)
33955 { // ** body not listed **
35221 }
35222 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_,
35223 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_
35224 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_
35225 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_,
35226 real_8 _p_ costsc_, real_8 _p_ xlamda_, real_8 _p_ rhsnrm_, real_8 _p_ amat_, real_8 _p_ basmat_, real_8 _p_ csc_,
35227 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_,
35228 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_
35229 duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_)
35230 { // ** body not listed **
35688 }
35689 int_4 _dplpup (int_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ prgopt_, real_8 _p_ dattrv_, real_8
35690 _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_,
35691 real_8 _p_ asmall_, real_8 _p_ abig_)
35692 { // ** body not listed **
36233 }
36234 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_)
36235 { // ** body not listed **
36439 }
36440 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_
36441 work_)
36442 { // ** body not listed **
36634 }
36635 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_)
36636 { // ** body not listed **
36675 }
36676 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
36677 _p_ eps_, real_8 _p_ r_, int_4 _p_ ierr_, real_8 _p_ a_)
36678 { // ** body not listed **
36987 }
36988 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
36989 _p_ c_, real_8 _p_ work_, int_4 _p_ ierr_)
36990 { // ** body not listed **
37084 }
37085 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_
37086 ibasis_, real_8 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_)
37087 { // ** body not listed **
37443 }
37444 int_4 _dpperm (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
37445 { // ** body not listed **
37490 }
37491 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
37492 _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_)
37493 { // ** body not listed **
37761 }
37762 real_8 _dprvec (int_4 _p_ m_, real_8 _p_ u_, real_8 _p_ v_)
37763 { // ** body not listed **
37774 }
37775 int_4 _dprwpg (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_)
37776 { // ** body not listed **
37796 }
37797 int_4 _dprwvr (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_8 _p_ sx_, int_4 _p_ ix_)
37798 { // ** body not listed **
37843 }
37844 real_8 _dpsixn (int_4 _p_ n_)
37845 { // ** body not listed **
38444 }
38445 int_4 _dpsort (real_8 _p_ dx_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
38446 { // ** body not listed **
38602 }
38603 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_
38604 incy_)
38605 { // ** body not listed **
38652 }
38653 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_
38654 incy_)
38655 { // ** body not listed **
38703 }
38704 int_4 _dqform (int_4 _p_ m_, int_4 _p_ n_, real_8 _p_ q_, int_4 _p_ ldq_, real_8 _p_ wa_)
38705 { // ** body not listed **
38771 }
38772 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
38773 _p_ lipvt_, real_8 _p_ sigma_, real_8 _p_ acnorm_, real_8 _p_ wa_)
38774 { // ** body not listed **
38877 }
38878 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
38879 _p_ x_, real_8 _p_ sigma_, real_8 _p_ wa_)
38880 { // ** body not listed **
38989 }
38990 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_,
38991 real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
38992 { // ** body not listed **
39270 }
39271 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_,
39272 real_8 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
39273 { // ** body not listed **
39543 }
39544 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
39545 _p_ l1max_, real_8 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
39546 { // ** body not listed **
39840 }
39841 real_8 _drc (real_8 _p_ x_, real_8 _p_ y_, int_4 _p_ ier_)
39842 { // ** body not listed **
40215 }
40216 real_8 _drd (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_)
40217 { // ** body not listed **
40694 }
40695 int_4 _dreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
40696 { // ** body not listed **
40801 }
40802 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
40803 _p_ s_, real_8 _p_ p_, int_4 _p_ ip_, real_8 _p_ stowa_, int_4 _p_ iflag_)
40804 { // ** body not listed **
40947 }
40948 real_8 _drf (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, int_4 _p_ ier_)
40949 { // ** body not listed **
41453 }
41454 real_8 _drj (real_8 _p_ x_, real_8 _p_ y_, real_8 _p_ z_, real_8 _p_ p_, int_4 _p_ ier_)
41455 { // ** body not listed **
42051 }
42052 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
42053 _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
42054 _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
42055 _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_,
42056 logical_4 _p_ nonstf_, int_4 _p_ ntstep_, int_4 _p_ nstifs_, real_8 _p_ rpar_, int_4 _p_ ipar_)
42057 { // ** body not listed **
42911 }
42912 int_4 _dsort (real_8 _p_ dx_, real_8 _p_ dy_, int_4 _p_ n_, int_4 _p_ kflag_)
42913 { // ** body not listed **
43154 }
43155 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_,
43156 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_
43157 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_,
43158 real_8 _p_ fac_, int_4 _p_ is_)
43159 { // ** body not listed **
43537 }
43538 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_,
43539 int_4 _p_ iflag_, real_8 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_)
43540 { // ** body not listed **
43868 }
43869 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_)
43870 { // ** body not listed **
43904 }
43905 int_4 _dsplp (real_4 (*_dusrmt)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_8 _p_ costs_, real_8 _p_ prgopt_, real_8
43906 _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_,
43907 int_4 _p_ ibasis_, real_8 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_)
43908 { // ** body not listed **
44207 }
44208 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
44209 _p_ ntape_)
44210 { // ** body not listed **
44255 }
44256 int_4 _dstway (real_8 _p_ u_, real_8 _p_ v_, real_8 _p_ yhp_, int_4 _p_ inout_, real_8 _p_ stowa_)
44257 { // ** body not listed **
44315 }
44316 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_
44317 iflag_, int_4 _p_ mlso_, real_8 _p_ work_, int_4 _p_ iwork_)
44318 { // ** body not listed **
44331 }
44332 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_
44333 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_,
44334 int_4 _p_ ir_)
44335 { // ** body not listed **
44617 }
44618 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_
44619 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_,
44620 int_4 _p_ ic_)
44621 { // ** body not listed **
44903 }
44904 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_,
44905 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_)
44906 { // ** body not listed **
45047 }
45048 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_,
45049 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_)
45050 { // ** body not listed **
45190 }
45191 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_,
45192 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_,
45193 real_8 _p_ rnorm_, real_8 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
45194 { // ** body not listed **
45443 }
45444 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_,
45445 int_4 _p_ iflag_)
45446 { // ** body not listed **
45484 }
45485 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_
45486 , int_4 _p_ iflag_)
45487 { // ** body not listed **
45525 }
45526 real_8 _dvnrms (int_4 _p_ n_, real_8 _p_ v_, real_8 _p_ w_)
45527 { // ** body not listed **
45539 }
45540 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_
45541 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_)
45542 { // ** body not listed **
45707 }
45708 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_
45709 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
45710 _p_ h_, real_8 _p_ scale_, real_8 _p_ z_, real_8 _p_ temp_, real_8 _p_ d_)
45711 { // ** body not listed **
46139 }
46140 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_,
46141 int_4 _p_ imax_, real_8 _p_ hbar_, real_8 _p_ h_, real_8 _p_ scale_, real_8 _p_ w_)
46142 { // ** body not listed **
46167 }
46168 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_
46169 scale_, real_8 _p_ wic_)
46170 { // ** body not listed **
46192 }
46193 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
46194 _p_ w_)
46195 { // ** body not listed **
46210 }
46211 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_
46212 prgopt_, real_8 _p_ x_, real_8 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_8 _p_ work_)
46213 { // ** body not listed **
46335 }
46336 int_4 _dwritp (int_4 _p_ ipage_, int_4 _p_ list_, real_8 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
46337 { // ** body not listed **
46442 }
46443 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_
46444 cos_, real_8 _p_ sin_)
46445 { // ** body not listed **
46512 }
46513 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_)
46514 { // ** body not listed **
46603 }
46604 int_4 _dxadj (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
46605 { // ** body not listed **
46659 }
46660 int_4 _dxc210 (int_4 _p_ k_, real_8 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_)
46661 { // ** body not listed **
46725 }
46726 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_)
46727 { // ** body not listed **
46817 }
46818 real_8 _dxpsi (real_8 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_)
46819 { // ** body not listed **
46976 }
46977 int_4 _dxred (real_8 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
46978 { // ** body not listed **
47049 }
47050 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_)
47051 { // ** body not listed **
47139 }
47140 int_4 _dyairy (real_8 _p_ x_, real_8 _p_ rx_, real_8 _p_ c_, real_8 _p_ bi_, real_8 _p_ dbi_)
47141 { // ** body not listed **
48978 }
48979 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_)
48980 { // ** body not listed **
49070 }
49071 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_
49072 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_,
49073 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_)
49074 { // ** body not listed **
49269 }
49270 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_
49271 nbkpt_, real_4 _p_ bkptin_, int_4 _p_ nconst_, real_4 _p_ xconst_, real_4 _p_ yconst_, int_4 _p_ nderiv_, int_4 _p_
49272 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
49273 _p_ mdg_, real_4 _p_ w_, int_4 _p_ mdw_, real_4 _p_ work_, int_4 _p_ iwork_)
49274 { // ** body not listed **
49639 }
49640 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
49641 _p_ ldfjac_, int_4 _p_ iflag_, real_4 _p_ epsfcn_, real_4 _p_ wa_)
49642 { // ** body not listed **
49680 }
49681 int_4 _fdump (void)
49682 { // ** body not listed **
49685 }
49686 int_4 _fftdoc (void)
49687 { // ** body not listed **
49690 }
49691 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_,
49692 int_4 _p_ iflag_)
49693 { // ** body not listed **
49765 }
49766 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_
49767 iflag_)
49768 { // ** body not listed **
49898 }
49899 real_4 _gamrn (real_4 _p_ x_)
49900 { // ** body not listed **
50023 }
50024 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_)
50025 { // ** body not listed **
50274 }
50275 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_
50276 up_, real_4 _p_ c_, int_4 _p_ ice_, int_4 _p_ icv_, int_4 _p_ ncv_)
50277 { // ** body not listed **
50407 }
50408 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_,
50409 real_4 _p_ tau_, int_4 _p_ krank_, real_4 _p_ rnorm_, real_4 _p_ h_, real_4 _p_ g_, int_4 _p_ ip_)
50410 { // ** body not listed **
50592 }
50593 int_4 _hkseq (real_4 _p_ x_, int_4 _p_ m_, real_4 _p_ h_, int_4 _p_ ierr_)
50594 { // ** body not listed **
50821 }
50822 int_4 _hpperm (char _p_ _p_ hx_, int_4 _p_ n_, int_4 _p_ iperm_, char _p_ work_, int_4 _p_ ier_)
50823 { // ** body not listed **
50872 }
50873 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_
50874 , char _p_ work_, int_4 _p_ ier_)
50875 { // ** body not listed **
51058 }
51059 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
51060 _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_,
51061 real_4 _p_ sf_, real_4 _p_ rpar_, int_4 _p_ ipar_, real_4 _p_ h_)
51062 { // ** body not listed **
51242 }
51243 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
51244 _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_
51245 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
51246 _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_)
51247 { // ** body not listed **
51479 }
51480 real_4 _hvnrm (real_4 _p_ v_, int_4 _p_ ncomp_)
51481 { // ** body not listed **
51490 }
51491 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_,
51492 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_,
51493 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_,
51494 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
51495 _p_ bmh_)
51496 { // ** body not listed **
51988 }
51989 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_,
51990 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_
51991 , 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_,
51992 real_4 _p_ ss_, real_4 _p_ sint_, real_4 _p_ d_)
51993 { // ** body not listed **
52630 }
52631 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_)
52632 { // ** body not listed **
52671 }
52672 int_4 _idloc (int_4 _p_ loc_, real_8 _p_ sx_, int_4 _p_ ix_)
52673 { // ** body not listed **
52706 }
52707 int_4 _indxa (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_)
52708 { // ** body not listed **
52725 }
52726 int_4 _indxb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_)
52727 { // ** body not listed **
52785 }
52786 int_4 _indxc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_)
52787 { // ** body not listed **
52804 }
52805 int_4 _inxca (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxa_, int_4 _p_ na_)
52806 { // ** body not listed **
52823 }
52824 int_4 _inxcb (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idx_, int_4 _p_ idp_)
52825 { // ** body not listed **
52882 }
52883 int_4 _inxcc (int_4 _p_ i_, int_4 _p_ ir_, int_4 _p_ idxc_, int_4 _p_ nc_)
52884 { // ** body not listed **
52901 }
52902 int_4 _iploc (int_4 _p_ loc_, real_4 _p_ sx_, int_4 _p_ ix_)
52903 { // ** body not listed **
52936 }
52937 int_4 _ipperm (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
52938 { // ** body not listed **
52982 }
52983 int_4 _ipsort (int_4 _p_ ix_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
52984 { // ** body not listed **
53140 }
53141 int_4 _isort (int_4 _p_ ix_, int_4 _p_ iy_, int_4 _p_ n_, int_4 _p_ kflag_)
53142 { // ** body not listed **
53383 }
53384 int_4 _jairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ ai_, real_4 _p_ dai_)
53385 { // ** body not listed **
54974 }
54975 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_,
54976 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_,
54977 real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
54978 { // ** body not listed **
55227 }
55228 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_
55229 x_, real_4 _p_ wnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ is_)
55230 { // ** body not listed **
55388 }
55389 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_
55390 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_)
55391 { // ** body not listed **
55895 }
55896 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_
55897 x_, real_4 _p_ rnorm_, int_4 _p_ mode_, real_4 _p_ ws_, int_4 _p_ ip_)
55898 { // ** body not listed **
56115 }
56116 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_
56117 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_,
56118 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_
56119 scales_)
56120 { // ** body not listed **
56289 }
56290 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_,
56291 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_
56292 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_)
56293 { // ** body not listed **
56464 }
56465 int_4 _macon (void)
56466 { // ** body not listed **
56482 }
56483 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_
56484 , real_4 _p_ p_, int_4 _p_ ip_, int_4 _p_ inhomo_, real_4 _p_ v_, real_4 _p_ w_, real_4 _p_ wcnd_)
56485 { // ** body not listed **
56725 }
56726 int_4 _minso4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_)
56727 { // ** body not listed **
56752 }
56753 int_4 _minsol (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertb_)
56754 { // ** body not listed **
56779 }
56780 int_4 _mpadd2 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_, int_4 _p_ y1_, int_4 _p_ trunc_)
56781 { // ** body not listed **
56873 }
56874 int_4 _mpadd3 (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ s_, int_4 _p_ med_, int_4 _p_ re_)
56875 { // ** body not listed **
57002 }
57003 int_4 _mpadd (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_)
57004 { // ** body not listed **
57008 }
57009 int_4 _mpblas (int_4 _p_ i1_)
57010 { // ** body not listed **
57029 }
57030 int_4 _mpcdm (real_8 _p_ dx_, int_4 _p_ z_)
57031 { // ** body not listed **
57117 }
57118 int_4 _mpchk (int_4 _p_ i_, int_4 _p_ j_)
57119 { // ** body not listed **
57388 }
57389 int_4 _mpcmd (int_4 _p_ x_, real_8 _p_ dz_)
57390 { // ** body not listed **
57439 }
57440 int_4 _mpdivi (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_)
57441 { // ** body not listed **
57632 }
57633 int_4 _mperr (void)
57634 { // ** body not listed **
57641 }
57642 int_4 _mpmaxr (int_4 _p_ x_)
57643 { // ** body not listed **
57655 }
57656 int_4 _mpmlp (int_4 _p_ u_, int_4 _p_ v_, int_4 _p_ w_, int_4 _p_ j_)
57657 { // ** body not listed **
57664 }
57665 int_4 _mpmul2 (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_, int_4 _p_ trunc_)
57666 { // ** body not listed **
57808 }
57809 int_4 _mpmul (int_4 _p_ x_, int_4 _p_ y_, int_4 _p_ z_)
57810 { // ** body not listed **
57916 }
57917 int_4 _mpmuli (int_4 _p_ x_, int_4 _p_ iy_, int_4 _p_ z_)
57918 { // ** body not listed **
57922 }
57923 int_4 _mpnzr (int_4 _p_ rs_, int_4 _p_ re_, int_4 _p_ z_, int_4 _p_ trunc_)
57924 { // ** body not listed **
58060 }
58061 int_4 _mpovfl (int_4 _p_ x_)
58062 { // ** body not listed **
58083 }
58084 int_4 _mpstr (int_4 _p_ x_, int_4 _p_ y_)
58085 { // ** body not listed **
58092 }
58093 int_4 _mpunfl (int_4 _p_ x_)
58094 { // ** body not listed **
58100 }
58101 int_4 _numxer (int_4 _p_ nerr_)
58102 { // ** body not listed **
58110 }
58111 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_,
58112 real_4 _p_ td_)
58113 { // ** body not listed **
58146 }
58147 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_,
58148 real_4 _p_ td_)
58149 { // ** body not listed **
58182 }
58183 int_4 _ortho4 (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_)
58184 { // ** body not listed **
58209 }
58210 int_4 _orthog (real_4 _p_ usol_, int_4 _p_ idmn_, real_4 _p_ zn_, real_4 _p_ zm_, real_4 _p_ pertrb_)
58211 { // ** body not listed **
58236 }
58237 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
58238 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ cols_, real_4 _p_ cs_)
58239 { // ** body not listed **
58347 }
58348 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
58349 _p_ iscale_, real_4 _p_ diag_, int_4 _p_ kpivot_, real_4 _p_ scales_, real_4 _p_ rows_, real_4 _p_ rs_)
58350 { // ** body not listed **
58455 }
58456 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_)
58457 { // ** body not listed **
58667 }
58668 int_4 _pcoef (int_4 _p_ l_, real_4 _p_ c_, real_4 _p_ tc_, real_4 _p_ a_)
58669 { // ** body not listed **
58698 }
58699 real_4 _pgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
58700 { // ** body not listed **
58727 }
58728 real_4 _pimach (real_4 _p_ dum_)
58729 { // ** body not listed **
58734 }
58735 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_)
58736 { // ** body not listed **
58809 }
58810 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_)
58811 { // ** body not listed **
59015 }
59016 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
59017 _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_)
59018 { // ** body not listed **
59439 }
59440 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
59441 _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_,
59442 real_4 _p_ w3_, real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
59443 { // ** body not listed **
60078 }
60079 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_
60080 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_,
60081 real_4 _p_ tcos_, real_4 _p_ p_)
60082 { // ** body not listed **
60177 }
60178 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_)
60179 { // ** body not listed **
60218 }
60219 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
60220 _p_ eps_, real_4 _p_ r_, int_4 _p_ ierr_, real_4 _p_ a_)
60221 { // ** body not listed **
60530 }
60531 int_4 _polint (int_4 _p_ n_, real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ c_)
60532 { // ** body not listed **
60563 }
60564 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
60565 _p_ c_, real_4 _p_ work_, int_4 _p_ ierr_)
60566 { // ** body not listed **
60660 }
60661 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_,
60662 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_,
60663 real_4 _p_ d_, real_4 _p_ wx_, real_4 _p_ wy_, real_4 _p_ c1_, real_4 _p_ c2_, real_4 _p_ bb_)
60664 { // ** body not listed **
60939 }
60940 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_
60941 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_,
60942 real_4 _p_ d_, real_4 _p_ tcos_, real_4 _p_ p_)
60943 { // ** body not listed **
61577 }
61578 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
61579 _p_ bh_)
61580 { // ** body not listed **
61866 }
61867 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_
61868 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_)
61869 { // ** body not listed **
62137 }
62138 real_4 _ppgsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62139 { // ** body not listed **
62150 }
62151 real_4 _pppsf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62152 { // ** body not listed **
62162 }
62163 real_4 _ppsgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62164 { // ** body not listed **
62175 }
62176 real_4 _ppspf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
62177 { // ** body not listed **
62187 }
62188 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_
62189 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
62190 _p_ c_, complex_8 _p_ d_, complex_8 _p_ w_, complex_8 _p_ u_)
62191 { // ** body not listed **
62365 }
62366 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
62367 _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_,
62368 complex_8 _p_ c_, complex_8 _p_ d_, complex_8 _p_ u_, complex_8 _p_ w_)
62369 { // ** body not listed **
62572 }
62573 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_
62574 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
62575 _p_ d_, real_4 _p_ w_, real_4 _p_ u_)
62576 { // ** body not listed **
62749 }
62750 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
62751 _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_,
62752 real_4 _p_ d_, real_4 _p_ u_, real_4 _p_ w_)
62753 { // ** body not listed **
62955 }
62956 real_4 _prvec (int_4 _p_ m_, real_4 _p_ u_, real_4 _p_ v_)
62957 { // ** body not listed **
62967 }
62968 int_4 _prwpge (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_)
62969 { // ** body not listed **
62989 }
62990 int_4 _prwvir (int_4 _p_ key_, int_4 _p_ ipage_, int_4 _p_ lpg_, real_4 _p_ sx_, int_4 _p_ ix_)
62991 { // ** body not listed **
63036 }
63037 real_4 _psgf (real_4 _p_ x_, int_4 _p_ iz_, real_4 _p_ c_, real_4 _p_ a_, real_4 _p_ bh_)
63038 { // ** body not listed **
63065 }
63066 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_
63067 ierr_)
63068 { // ** body not listed **
63479 }
63480 real_4 _psixn (int_4 _p_ n_)
63481 { // ** body not listed **
64079 }
64080 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_)
64081 { // ** body not listed **
64254 }
64255 real_4 _pythag (real_4 _p_ a_, real_4 _p_ b_)
64256 { // ** body not listed **
64279 }
64280 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_,
64281 real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
64282 { // ** body not listed **
64561 }
64562 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_,
64563 real_4 _p_ thrcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
64564 { // ** body not listed **
64835 }
64836 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
64837 _p_ l1max_, real_4 _p_ sixcof_, int_4 _p_ ndim_, int_4 _p_ ier_)
64838 { // ** body not listed **
65132 }
65133 real_4 _rc (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ ier_)
65134 { // ** body not listed **
65507 }
65508 real_4 _rd (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_)
65509 { // ** body not listed **
65986 }
65987 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
65988 _p_ s_, real_4 _p_ p_, int_4 _p_ ip_, real_4 _p_ stowa_, int_4 _p_ iflag_)
65989 { // ** body not listed **
66119 }
66120 real_4 _rf (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, int_4 _p_ ier_)
66121 { // ** body not listed **
66625 }
66626 real_4 _rj (real_4 _p_ x_, real_4 _p_ y_, real_4 _p_ z_, real_4 _p_ p_, int_4 _p_ ier_)
66627 { // ** body not listed **
67223 }
67224 int_4 _rpqr79 (int_4 _p_ ndeg_, real_4 _p_ coeff_, complex_8 _p_ root_, int_4 _p_ ierr_, real_4 _p_ work_)
67225 { // ** body not listed **
67272 }
67273 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_)
67274 { // ** body not listed **
67283 }
67284 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_)
67285 { // ** body not listed **
67324 }
67325 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_,
67326 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_,
67327 real_4 _p_ rw_, int_4 _p_ iw_)
67328 { // ** body not listed **
68853 }
68854 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
68855 _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_)
68856 { // ** body not listed **
70189 }
70190 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_,
70191 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_,
70192 real_4 _p_ scl_, int_4 _p_ ibasis_, int_4 _p_ ibb_)
70193 { // ** body not listed **
71910 }
71911 int_4 _sclosm (int_4 _p_ ipage_)
71912 { // ** body not listed **
71970 }
71971 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_,
71972 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_,
71973 real_4 _p_ cvec_, real_4 _p_ work_, int_4 _p_ iwork_, int_4 _p_ iflag_, int_4 _p_ nfcc_)
71974 { // ** body not listed **
72105 }
72106 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_
72107 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_)
72108 { // ** body not listed **
72248 }
72249 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_
72250 work_, int_4 _p_ job_, int_4 _p_ info_)
72251 { // ** body not listed **
72354 }
72355 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_
72356 work_, int_4 _p_ iwork_)
72357 { // ** body not listed **
72548 }
72549 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_
72550 work_, int_4 _p_ iwork_)
72551 { // ** body not listed **
72761 }
72762 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_,
72763 real_4 _p_ rnorm_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
72764 { // ** body not listed **
72792 }
72793 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_
72794 rcond_, real_4 _p_ z_)
72795 { // ** body not listed **
72944 }
72945 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_
72946 det_)
72947 { // ** body not listed **
72981 }
72982 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_
72983 info_)
72984 { // ** body not listed **
73039 }
73040 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_
73041 itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_)
73042 { // ** body not listed **
73319 }
73320 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_
73321 itask_, int_4 _p_ ind_, real_4 _p_ work_, int_4 _p_ iwork_)
73322 { // ** body not listed **
73623 }
73624 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_
73625 b_, int_4 _p_ job_)
73626 { // ** body not listed **
73696 }
73697 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
73698 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, int_4 _p_ iw_, real_4 _p_ wa_, int_4 _p_ lwa_)
73699 { // ** body not listed **
73749 }
73750 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_
73751 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_,
73752 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_
73753 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_)
73754 { // ** body not listed **
74328 }
74329 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
74330 _p_ tol_, int_4 _p_ nprint_, int_4 _p_ info_, real_4 _p_ wa_, int_4 _p_ lwa_)
74331 { // ** body not listed **
74387 }
74388 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
74389 _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_,
74390 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_
74391 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_
74392 wa4_)
74393 { // ** body not listed **
74707 }
74708 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_
74709 iflag_, real_4 _p_ work_, int_4 _p_ iwork_)
74710 { // ** body not listed **
74725 }
74726 int_4 _sopenm (int_4 _p_ ipage_, int_4 _p_ lpage_)
74727 { // ** body not listed **
74780 }
74781 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_,
74782 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_
74783 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_,
74784 real_4 _p_ fac_, int_4 _p_ is_)
74785 { // ** body not listed **
75158 }
75159 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_,
75160 int_4 _p_ iflag_, real_4 _p_ rw_, int_4 _p_ lrw_, int_4 _p_ iw_, int_4 _p_ liw_)
75161 { // ** body not listed **
75489 }
75490 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_)
75491 { // ** body not listed **
75525 }
75526 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_,
75527 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_,
75528 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_,
75529 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
75530 _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_)
75531 { // ** body not listed **
75835 }
75836 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_,
75837 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_,
75838 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
75839 (*_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_
75840 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_
75841 , int_4 _p_ idmn_, real_4 _p_ w_, real_4 _p_ pertrb_, int_4 _p_ ierror_)
75842 { // ** body not listed **
76143 }
76144 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_,
76145 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_,
76146 real_4 _p_ costsc_, real_4 _p_ gg_, real_4 _p_ erdnrm_, real_4 _p_ dulnrm_, real_4 _p_ amat_, real_4 _p_ basmat_,
76147 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_,
76148 real_4 _p_ duals_, logical_4 _p_ stpedg_)
76149 { // ** body not listed **
76281 }
76282 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_,
76283 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
76284 _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_
76285 , logical_4 _p_ lopt_)
76286 { // ** body not listed **
76558 }
76559 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_,
76560 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_,
76561 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_
76562 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_,
76563 logical_4 _p_ redbas_)
76564 { // ** body not listed **
76756 }
76757 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_,
76758 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_,
76759 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_
76760 basmat_, real_4 _p_ csc_, real_4 _p_ wr_, logical_4 _p_ singlr_, logical_4 _p_ redbas_)
76761 { // ** body not listed **
76858 }
76859 int_4 _splp (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ prgopt_, real_4
76860 _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_,
76861 int_4 _p_ ibasis_, real_4 _p_ work_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_)
76862 { // ** body not listed **
77161 }
77162 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_
77163 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_
77164 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_,
77165 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
77166 _p_ colnrm_, real_4 _p_ duals_, logical_4 _p_ found_)
77167 { // ** body not listed **
77313 }
77314 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_
77315 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_,
77316 real_4 _p_ bl_, real_4 _p_ bu_, real_4 _p_ erp_, real_4 _p_ rprim_, real_4 _p_ primal_, logical_4 _p_ finite_,
77317 logical_4 _p_ zerolv_)
77318 { // ** body not listed **
77468 }
77469 int_4 _splpmn (real_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ costs_, real_4 _p_ prgopt_, real_4
77470 _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_,
77471 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_
77472 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_
77473 , int_4 _p_ ibasis_, int_4 _p_ ibb_, int_4 _p_ imat_, int_4 _p_ ibrc_, int_4 _p_ ipr_, int_4 _p_ iwr_)
77474 { // ** body not listed **
78739 }
78740 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_,
78741 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_
78742 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_
78743 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_,
78744 real_4 _p_ costsc_, real_4 _p_ xlamda_, real_4 _p_ rhsnrm_, real_4 _p_ amat_, real_4 _p_ basmat_, real_4 _p_ csc_,
78745 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_,
78746 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_
78747 duals_, logical_4 _p_ singlr_, logical_4 _p_ redbas_, logical_4 _p_ zerolv_, logical_4 _p_ stpedg_)
78748 { // ** body not listed **
79206 }
79207 int_4 _splpup (int_4 (*_usrmat)(), int_4 _p_ mrelas_, int_4 _p_ nvars_, real_4 _p_ prgopt_, real_4 _p_ dattrv_, real_4
79208 _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_,
79209 real_4 _p_ asmall_, real_4 _p_ abig_)
79210 { // ** body not listed **
79751 }
79752 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_
79753 work_)
79754 { // ** body not listed **
79946 }
79947 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_
79948 work_)
79949 { // ** body not listed **
80159 }
80160 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_
80161 ibasis_, real_4 _p_ ropt_, int_4 _p_ intopt_, logical_4 _p_ lopt_)
80162 { // ** body not listed **
80518 }
80519 int_4 _spperm (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ ier_)
80520 { // ** body not listed **
80565 }
80566 int_4 _spsort (real_4 _p_ x_, int_4 _p_ n_, int_4 _p_ iperm_, int_4 _p_ kflag_, int_4 _p_ ier_)
80567 { // ** body not listed **
80723 }
80724 int_4 _sreadp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
80725 { // ** body not listed **
80830 }
80831 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_
80832 info_)
80833 { // ** body not listed **
80870 }
80871 int_4 _ssort (real_4 _p_ x_, real_4 _p_ y_, int_4 _p_ n_, int_4 _p_ kflag_)
80872 { // ** body not listed **
81113 }
81114 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
81115 _p_ ntape_)
81116 { // ** body not listed **
81161 }
81162 int_4 _stway (real_4 _p_ u_, real_4 _p_ v_, real_4 _p_ yhp_, int_4 _p_ inout_, real_4 _p_ stowa_)
81163 { // ** body not listed **
81220 }
81221 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_
81222 iflag_, int_4 _p_ mlso_, real_4 _p_ work_, int_4 _p_ iwork_)
81223 { // ** body not listed **
81236 }
81237 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_
81238 , int_4 _p_ iflag_)
81239 { // ** body not listed **
81269 }
81270 int_4 _swritp (int_4 _p_ ipage_, int_4 _p_ list_, real_4 _p_ rlist_, int_4 _p_ lpage_, int_4 _p_ irec_)
81271 { // ** body not listed **
81376 }
81377 int_4 _tevlc (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_)
81378 { // ** body not listed **
81490 }
81491 int_4 _tevls (int_4 _p_ n_, real_4 _p_ d_, real_4 _p_ e2_, int_4 _p_ ierr_)
81492 { // ** body not listed **
81604 }
81605 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_,
81606 real_4 _p_ y3_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w1_, real_4 _p_ w2_, real_4 _p_ w3_)
81607 { // ** body not listed **
81717 }
81718 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_)
81719 { // ** body not listed **
81747 }
81748 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_)
81749 { // ** body not listed **
81778 }
81779 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_)
81780 { // ** body not listed **
81809 }
81810 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
81811 _p_ y_, real_4 _p_ tcos_, real_4 _p_ d_, real_4 _p_ w_)
81812 { // ** body not listed **
81865 }
81866 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_
81867 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_,
81868 int_4 _p_ ir_)
81869 { // ** body not listed **
82151 }
82152 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_
82153 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_,
82154 int_4 _p_ ic_)
82155 { // ** body not listed **
82437 }
82438 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_,
82439 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_)
82440 { // ** body not listed **
82581 }
82582 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_,
82583 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_)
82584 { // ** body not listed **
82724 }
82725 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_,
82726 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_,
82727 real_4 _p_ rnorm_, real_4 _p_ w_, int_4 _p_ lw_, int_4 _p_ iwork_, int_4 _p_ liw_, int_4 _p_ info_)
82728 { // ** body not listed **
82977 }
82978 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_,
82979 int_4 _p_ iflag_)
82980 { // ** body not listed **
83018 }
83019 real_4 _vnwrms (int_4 _p_ n_, real_4 _p_ v_, real_4 _p_ w_)
83020 { // ** body not listed **
83032 }
83033 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_
83034 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_)
83035 { // ** body not listed **
83200 }
83201 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_
83202 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
83203 _p_ h_, real_4 _p_ scale_, real_4 _p_ z_, real_4 _p_ temp_, real_4 _p_ d_)
83204 { // ** body not listed **
83631 }
83632 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_,
83633 int_4 _p_ imax_, real_4 _p_ hbar_, real_4 _p_ h_, real_4 _p_ scale_, real_4 _p_ w_)
83634 { // ** body not listed **
83659 }
83660 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_
83661 , real_4 _p_ wic_)
83662 { // ** body not listed **
83684 }
83685 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_
83686 w_)
83687 { // ** body not listed **
83702 }
83703 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_
83704 prgopt_, real_4 _p_ x_, real_4 _p_ rnorm_, int_4 _p_ mode_, int_4 _p_ iwork_, real_4 _p_ work_)
83705 { // ** body not listed **
83827 }
83828 int_4 _xadj (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
83829 { // ** body not listed **
83883 }
83884 int_4 _xc210 (int_4 _p_ k_, real_4 _p_ z_, int_4 _p_ j_, int_4 _p_ ierror_)
83885 { // ** body not listed **
83949 }
83950 real_4 _xpsi (real_4 _p_ a_, int_4 _p_ ipsik_, int_4 _p_ ipsix_)
83951 { // ** body not listed **
84108 }
84109 int_4 _xred (real_4 _p_ x_, int_4 _p_ ix_, int_4 _p_ ierror_)
84110 { // ** body not listed **
84181 }
84182 int_4 _yairy (real_4 _p_ x_, real_4 _p_ rx_, real_4 _p_ c_, real_4 _p_ bi_, real_4 _p_ dbi_)
84183 { // ** body not listed **
86020 }
|
© 2002-2025 J.M. van der Veer (jmvdveer@xs4all.nl)
|
