/dports/math/PDL/PDL-2.019/Lib/Slatec/slatec/ |
H A D | dpoco.f | 84 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 169 YNORM = 1.0D0 178 YNORM = S*YNORM 184 YNORM = S*YNORM 193 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
H A D | dgeco.f | 81 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 165 YNORM = 1.0D0 178 YNORM = S*YNORM 183 YNORM = S*YNORM 192 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
H A D | sgeco.f | 81 REAL ANORM,S,SASUM,SM,YNORM 165 YNORM = 1.0E0 178 YNORM = S*YNORM 183 YNORM = S*YNORM 192 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
H A D | spoco.f | 84 REAL ANORM,S,SASUM,SM,YNORM 169 YNORM = 1.0E0 178 YNORM = S*YNORM 184 YNORM = S*YNORM 193 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
/dports/math/slatec/src/ |
H A D | dgeco.f | 81 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 165 YNORM = 1.0D0 178 YNORM = S*YNORM 183 YNORM = S*YNORM 192 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
H A D | dpoco.f | 84 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 169 YNORM = 1.0D0 178 YNORM = S*YNORM 184 YNORM = S*YNORM 193 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
H A D | spoco.f | 84 REAL ANORM,S,SASUM,SM,YNORM 169 YNORM = 1.0E0 178 YNORM = S*YNORM 184 YNORM = S*YNORM 193 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
H A D | sppco.f | 97 REAL ANORM,S,SASUM,SM,YNORM 193 YNORM = 1.0E0 203 YNORM = S*YNORM 209 YNORM = S*YNORM 218 YNORM = S*YNORM 228 YNORM = S*YNORM 230 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
H A D | sgeco.f | 81 REAL ANORM,S,SASUM,SM,YNORM 165 YNORM = 1.0E0 178 YNORM = S*YNORM 183 YNORM = S*YNORM 192 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
H A D | dppco.f | 97 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 193 YNORM = 1.0D0 203 YNORM = S*YNORM 209 YNORM = S*YNORM 218 YNORM = S*YNORM 228 YNORM = S*YNORM 230 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
H A D | cpoco.f | 84 REAL ANORM,S,SCASUM,SM,YNORM 173 YNORM = 1.0E0 182 YNORM = S*YNORM 188 YNORM = S*YNORM 197 YNORM = S*YNORM 206 YNORM = S*YNORM 208 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
H A D | dgbco.f | 135 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 232 YNORM = 1.0D0 246 YNORM = S*YNORM 251 YNORM = S*YNORM 260 YNORM = S*YNORM 273 YNORM = S*YNORM 275 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
H A D | dpbco.f | 122 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 218 YNORM = 1.0D0 230 YNORM = S*YNORM 236 YNORM = S*YNORM 245 YNORM = S*YNORM 257 YNORM = S*YNORM 259 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
/dports/math/cmlib/cmlib-3.0_8/src/linpakd/ |
H A D | dgeco.f | 81 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 165 YNORM = 1.0D0 178 YNORM = S*YNORM 183 YNORM = S*YNORM 192 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
H A D | dpoco.f | 84 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 169 YNORM = 1.0D0 178 YNORM = S*YNORM 184 YNORM = S*YNORM 193 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
H A D | dppco.f | 97 DOUBLE PRECISION ANORM,S,DASUM,SM,YNORM 193 YNORM = 1.0D0 203 YNORM = S*YNORM 209 YNORM = S*YNORM 218 YNORM = S*YNORM 228 YNORM = S*YNORM 230 IF (ANORM .NE. 0.0D0) RCOND = YNORM/ANORM
|
/dports/math/cmlib/cmlib-3.0_8/src/linpaks/ |
H A D | sgeco.f | 80 REAL ANORM,S,SASUM,SM,YNORM 164 YNORM = 1.0E0 177 YNORM = S*YNORM 182 YNORM = S*YNORM 191 YNORM = S*YNORM 201 YNORM = S*YNORM 203 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
H A D | spoco.f | 84 REAL ANORM,S,SASUM,SM,YNORM 169 YNORM = 1.0E0 178 YNORM = S*YNORM 184 YNORM = S*YNORM 193 YNORM = S*YNORM 202 YNORM = S*YNORM 204 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
H A D | sppco.f | 96 REAL ANORM,S,SASUM,SM,YNORM 192 YNORM = 1.0E0 202 YNORM = S*YNORM 208 YNORM = S*YNORM 217 YNORM = S*YNORM 227 YNORM = S*YNORM 229 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
/dports/math/math77/MATH77/ |
H A D | dgeco.f | 68 double precision EK,T,WK,WKM, ANORM,S,SM,YNORM,ZERO,ONE local 148 YNORM = ONE 161 YNORM = S*YNORM 166 YNORM = S*YNORM 175 YNORM = S*YNORM 188 YNORM = S*YNORM 193 RCOND = YNORM/ANORM
|
H A D | sgeco.f | 68 real EK,T,WK,WKM, ANORM,S,SM,YNORM,ZERO,ONE local 148 YNORM = ONE 161 YNORM = S*YNORM 166 YNORM = S*YNORM 175 YNORM = S*YNORM 188 YNORM = S*YNORM 193 RCOND = YNORM/ANORM
|
H A D | cgeco.f | 68 REAL ANORM,S,SCASUM,SM,YNORM,ZERO,ONE local 162 YNORM = ONE 175 YNORM = S*YNORM 180 YNORM = S*YNORM 188 YNORM = S*YNORM 204 YNORM = S*YNORM 209 RCOND = YNORM/ANORM
|
/dports/math/cmlib/cmlib-3.0_8/src/linpakc/ |
H A D | cpoco.f | 84 REAL ANORM,S,SCASUM,SM,YNORM 173 YNORM = 1.0E0 182 YNORM = S*YNORM 188 YNORM = S*YNORM 197 YNORM = S*YNORM 206 YNORM = S*YNORM 208 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
H A D | cgeco.f | 80 REAL ANORM,S,SCASUM,SM,YNORM 168 YNORM = 1.0E0 181 YNORM = S*YNORM 186 YNORM = S*YNORM 195 YNORM = S*YNORM 205 YNORM = S*YNORM 207 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|
H A D | cppco.f | 95 REAL ANORM,S,SCASUM,SM,YNORM 195 YNORM = 1.0E0 205 YNORM = S*YNORM 211 YNORM = S*YNORM 220 YNORM = S*YNORM 230 YNORM = S*YNORM 232 IF (ANORM .NE. 0.0E0) RCOND = YNORM/ANORM
|