Home
last modified time | relevance | path

Searched refs:BMIN (Results 1 – 25 of 91) sorted by relevance

1234

/dports/science/aircraft-datcom/aircraft-datcom-ed877bb/src/
H A Dsorter.f32 INTEGER A,B,BMIN,BMAX local
56 BMIN=BMAX
63 1070 IF(BMIN.GE.B(K,ICOL))BMIN=B(K,ICOL)
64 IF(BMIN.EQ.B(K,ICOL))KK=K
76 BMIN=BMAX+BMAX
102 BMIN=BMAX
109 1190 IF(BMIN.GE.B(IROW,K))BMIN=B(IROW,K)
110 IF(BMIN.EQ.B(IROW,K))KK=K
122 BMIN=BMAX+BMAX
/dports/math/cmlib/cmlib-3.0_8/src/odrpack/
H A Ddsclb.f43 DOUBLE PRECISION BMIN
86 BMIN = BMAX
89 BMIN = MIN(BMIN,ABS(BETA(K)))
92 BIGDIF = LOG10(BMAX)-LOG10(BMIN).GE.TWO
95 SSF(K) = ONE/(SQRT(EPSMAC)*BMIN)
H A Dssclb.f43 REAL BMIN
86 BMIN = BMAX
89 BMIN = MIN(BMIN,ABS(BETA(K)))
92 BIGDIF = LOG10(BMAX)-LOG10(BMIN).GE.TWO
95 SSF(K) = ONE/(SQRT(EPSMAC)*BMIN)
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/double/
H A Ddlag2.f107 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
136 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
137 IF( ABS( B11 ).LT.BMIN )
138 $ B11 = SIGN( BMIN, B11 )
139 IF( ABS( B22 ).LT.BMIN )
140 $ B22 = SIGN( BMIN, B22 )
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/
H A Ddlag2.f185 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
214 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
215 IF( ABS( B11 ).LT.BMIN )
216 $ B11 = SIGN( BMIN, B11 )
217 IF( ABS( B22 ).LT.BMIN )
218 $ B22 = SIGN( BMIN, B22 )
H A Dslag2.f185 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
214 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
215 IF( ABS( B11 ).LT.BMIN )
216 $ B11 = SIGN( BMIN, B11 )
217 IF( ABS( B22 ).LT.BMIN )
218 $ B22 = SIGN( BMIN, B22 )
/dports/math/xlapack/lapack-3.10.0/SRC/
H A Dslag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
H A Ddlag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
/dports/math/blas/lapack-3.10.0/SRC/
H A Ddlag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
H A Dslag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/
H A Dslag2.f107 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5, local
136 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
137 IF( ABS( B11 ).LT.BMIN )
138 $ B11 = SIGN( BMIN, B11 )
139 IF( ABS( B22 ).LT.BMIN )
140 $ B22 = SIGN( BMIN, B22 )
H A Ddlag2.f107 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5, local
136 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
137 IF( ABS( B11 ).LT.BMIN )
138 $ B11 = SIGN( BMIN, B11 )
139 IF( ABS( B22 ).LT.BMIN )
140 $ B22 = SIGN( BMIN, B22 )
/dports/math/lapacke/lapack-3.10.0/SRC/
H A Dslag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
H A Ddlag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
/dports/math/lapack/lapack-3.10.0/SRC/
H A Dslag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
H A Ddlag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
/dports/math/algae/algae-4.3.6/lapack/
H A Ddlag2.f107 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
136 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
137 IF( ABS( B11 ).LT.BMIN )
138 $ B11 = SIGN( BMIN, B11 )
139 IF( ABS( B22 ).LT.BMIN )
140 $ B22 = SIGN( BMIN, B22 )
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/
H A Ddlag2.f185 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5, local
214 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
215 IF( ABS( B11 ).LT.BMIN )
216 $ B11 = SIGN( BMIN, B11 )
217 IF( ABS( B22 ).LT.BMIN )
218 $ B22 = SIGN( BMIN, B22 )
H A Dslag2.f185 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5, local
214 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
215 IF( ABS( B11 ).LT.BMIN )
216 $ B11 = SIGN( BMIN, B11 )
217 IF( ABS( B22 ).LT.BMIN )
218 $ B22 = SIGN( BMIN, B22 )
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/
H A Ddlag2.f107 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
136 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
137 IF( ABS( B11 ).LT.BMIN )
138 $ B11 = SIGN( BMIN, B11 )
139 IF( ABS( B22 ).LT.BMIN )
140 $ B22 = SIGN( BMIN, B22 )
H A Dslag2.f107 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
136 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
137 IF( ABS( B11 ).LT.BMIN )
138 $ B11 = SIGN( BMIN, B11 )
139 IF( ABS( B22 ).LT.BMIN )
140 $ B22 = SIGN( BMIN, B22 )
/dports/math/cblas/lapack-3.10.0/SRC/
H A Dslag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
H A Ddlag2.f182 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
211 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
212 IF( ABS( B11 ).LT.BMIN )
213 $ B11 = SIGN( BMIN, B11 )
214 IF( ABS( B22 ).LT.BMIN )
215 $ B22 = SIGN( BMIN, B22 )
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/double/
H A Ddlag2.f107 $ BMIN, BNORM, BSCALE, BSIZE, C1, C2, C3, C4, C5,
136 BMIN = RTMIN*MAX( ABS( B11 ), ABS( B12 ), ABS( B22 ), RTMIN )
137 IF( ABS( B11 ).LT.BMIN )
138 $ B11 = SIGN( BMIN, B11 )
139 IF( ABS( B22 ).LT.BMIN )
140 $ B22 = SIGN( BMIN, B22 )
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/soppa/
H A Dso_ordeig.F282 BMIN = ALFAI(I)
286 BMIN = ALFAI(J)
294 ALFAI(I) = BMIN
302 BMIN = ALFAI(I)
306 BMIN = ALFAI(J)
314 ALFAI(I) = BMIN

1234