/dports/print/fontforge/fontforge-20201107/gdraw/ |
H A D | colorP.h | 33 #define LGN 6 macro 37 # if LRD+LGN+LBL!=11 38 # define RGB2GREY(r,g,b) ((LRD*(r)+LGN*(g)+LBL*(b))/(LRD+LGN+LBL)) 40 # define RGB2GREY(r,g,b) ( ( (LRD*(r)+LGN*(g)+LBL*(b)) *2979)>>15 ) 45 #define COLOR2GREYR(col) ((LRD*COLOR_RED(col)+LGN*COLOR_GREEN(col)+LBL*COLOR_BLUE(col))/((LRD+LGN+L… 48 #define COLOR2WHITE(col) (COLOR_RED(col)*LRD+COLOR_GREEN(col)*LGN+COLOR_BLUE(col)*LBL>=(LRD+LGN+LBL… 49 #define COLOR2BLACK(col) (COLOR_RED(col)*LRD+COLOR_GREEN(col)*LGN+COLOR_BLUE(col)*LBL< (LRD+LGN+LBL…
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/ |
H A D | sspgvd.f | 144 INTEGER J, LGN, LIWMIN, LWMIN, NEIG local 166 LGN = 0 170 LGN = INT( LOG( REAL( N ) ) / LOG( TWO ) ) 171 IF( 2**LGN.LT.N ) 172 $ LGN = LGN + 1 173 IF( 2**LGN.LT.N ) 174 $ LGN = LGN + 1 177 LWMIN = 1 + 5*N + 2*N*LGN + 2*N**2
|
H A D | dspgvd.f | 144 INTEGER J, LGN, LIWMIN, LWMIN, NEIG 166 LGN = 0 170 LGN = INT( LOG( DBLE( N ) ) / LOG( TWO ) ) 171 IF( 2**LGN.LT.N ) 172 $ LGN = LGN + 1 173 IF( 2**LGN.LT.N ) 174 $ LGN = LGN + 1 177 LWMIN = 1 + 5*N + 2*N*LGN + 2*N**2
|
H A D | claed0.f | 91 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, local 173 LGN = INT( TEMP ) 174 IF( 2**LGN.LT.N ) 175 $ LGN = LGN + 1 176 IF( 2**LGN.LT.N ) 177 $ LGN = LGN + 1 179 IPERM = IPRMPT + N*LGN 180 IQPTR = IPERM + N*LGN 182 IGIVCL = IGIVPT + N*LGN 185 IQ = IGIVNM + 2*N*LGN
|
H A D | zlaed0.f | 91 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, local 173 LGN = INT( TEMP ) 174 IF( 2**LGN.LT.N ) 175 $ LGN = LGN + 1 176 IF( 2**LGN.LT.N ) 177 $ LGN = LGN + 1 179 IPERM = IPRMPT + N*LGN 180 IQPTR = IPERM + N*LGN 182 IGIVCL = IGIVPT + N*LGN 185 IQ = IGIVNM + 2*N*LGN
|
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/ |
H A D | sspgvd.f | 144 INTEGER J, LGN, LIWMIN, LWMIN, NEIG 166 LGN = 0 170 LGN = INT( LOG( REAL( N ) ) / LOG( TWO ) ) 171 IF( 2**LGN.LT.N ) 172 $ LGN = LGN + 1 173 IF( 2**LGN.LT.N ) 174 $ LGN = LGN + 1 177 LWMIN = 1 + 5*N + 2*N*LGN + 2*N**2
|
H A D | dspgvd.f | 144 INTEGER J, LGN, LIWMIN, LWMIN, NEIG 166 LGN = 0 170 LGN = INT( LOG( DBLE( N ) ) / LOG( TWO ) ) 171 IF( 2**LGN.LT.N ) 172 $ LGN = LGN + 1 173 IF( 2**LGN.LT.N ) 174 $ LGN = LGN + 1 177 LWMIN = 1 + 5*N + 2*N*LGN + 2*N**2
|
H A D | claed0.f | 91 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 173 LGN = INT( TEMP ) 174 IF( 2**LGN.LT.N ) 175 $ LGN = LGN + 1 176 IF( 2**LGN.LT.N ) 177 $ LGN = LGN + 1 179 IPERM = IPRMPT + N*LGN 180 IQPTR = IPERM + N*LGN 182 IGIVCL = IGIVPT + N*LGN 185 IQ = IGIVNM + 2*N*LGN
|
H A D | zlaed0.f | 91 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 173 LGN = INT( TEMP ) 174 IF( 2**LGN.LT.N ) 175 $ LGN = LGN + 1 176 IF( 2**LGN.LT.N ) 177 $ LGN = LGN + 1 179 IPERM = IPRMPT + N*LGN 180 IQPTR = IPERM + N*LGN 182 IGIVCL = IGIVPT + N*LGN 185 IQ = IGIVNM + 2*N*LGN
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | zlaed0.f | 173 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 255 LGN = INT( TEMP ) 256 IF( 2**LGN.LT.N ) 257 $ LGN = LGN + 1 258 IF( 2**LGN.LT.N ) 259 $ LGN = LGN + 1 261 IPERM = IPRMPT + N*LGN 262 IQPTR = IPERM + N*LGN 264 IGIVCL = IGIVPT + N*LGN 267 IQ = IGIVNM + 2*N*LGN
|
/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | claed0.f | 170 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 252 LGN = INT( TEMP ) 253 IF( 2**LGN.LT.N ) 254 $ LGN = LGN + 1 255 IF( 2**LGN.LT.N ) 256 $ LGN = LGN + 1 258 IPERM = IPRMPT + N*LGN 259 IQPTR = IPERM + N*LGN 261 IGIVCL = IGIVPT + N*LGN 264 IQ = IGIVNM + 2*N*LGN
|
H A D | zlaed0.f | 170 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 252 LGN = INT( TEMP ) 253 IF( 2**LGN.LT.N ) 254 $ LGN = LGN + 1 255 IF( 2**LGN.LT.N ) 256 $ LGN = LGN + 1 258 IPERM = IPRMPT + N*LGN 259 IQPTR = IPERM + N*LGN 261 IGIVCL = IGIVPT + N*LGN 264 IQ = IGIVNM + 2*N*LGN
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/lapack-timing/EIG/EIGSRC/ |
H A D | claed0.f | 99 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 183 LGN = INT( TEMP ) 184 IF( 2**LGN.LT.N ) 185 $ LGN = LGN + 1 186 IF( 2**LGN.LT.N ) 187 $ LGN = LGN + 1 189 IPERM = IPRMPT + N*LGN 190 IQPTR = IPERM + N*LGN 192 IGIVCL = IGIVPT + N*LGN 195 IQ = IGIVNM + 2*N*LGN
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | zlaed0.f | 170 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 252 LGN = INT( TEMP ) 253 IF( 2**LGN.LT.N ) 254 $ LGN = LGN + 1 255 IF( 2**LGN.LT.N ) 256 $ LGN = LGN + 1 258 IPERM = IPRMPT + N*LGN 259 IQPTR = IPERM + N*LGN 261 IGIVCL = IGIVPT + N*LGN 264 IQ = IGIVNM + 2*N*LGN
|
H A D | claed0.f | 170 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 252 LGN = INT( TEMP ) 253 IF( 2**LGN.LT.N ) 254 $ LGN = LGN + 1 255 IF( 2**LGN.LT.N ) 256 $ LGN = LGN + 1 258 IPERM = IPRMPT + N*LGN 259 IQPTR = IPERM + N*LGN 261 IGIVCL = IGIVPT + N*LGN 264 IQ = IGIVNM + 2*N*LGN
|
/dports/math/lapacke/lapack-3.10.0/SRC/ |
H A D | zlaed0.f | 170 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 252 LGN = INT( TEMP ) 253 IF( 2**LGN.LT.N ) 254 $ LGN = LGN + 1 255 IF( 2**LGN.LT.N ) 256 $ LGN = LGN + 1 258 IPERM = IPRMPT + N*LGN 259 IQPTR = IPERM + N*LGN 261 IGIVCL = IGIVPT + N*LGN 264 IQ = IGIVNM + 2*N*LGN
|
H A D | claed0.f | 170 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 252 LGN = INT( TEMP ) 253 IF( 2**LGN.LT.N ) 254 $ LGN = LGN + 1 255 IF( 2**LGN.LT.N ) 256 $ LGN = LGN + 1 258 IPERM = IPRMPT + N*LGN 259 IQPTR = IPERM + N*LGN 261 IGIVCL = IGIVPT + N*LGN 264 IQ = IGIVNM + 2*N*LGN
|
/dports/math/lapack/lapack-3.10.0/SRC/ |
H A D | claed0.f | 170 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 252 LGN = INT( TEMP ) 253 IF( 2**LGN.LT.N ) 254 $ LGN = LGN + 1 255 IF( 2**LGN.LT.N ) 256 $ LGN = LGN + 1 258 IPERM = IPRMPT + N*LGN 259 IQPTR = IPERM + N*LGN 261 IGIVCL = IGIVPT + N*LGN 264 IQ = IGIVNM + 2*N*LGN
|
H A D | zlaed0.f | 170 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, local 252 LGN = INT( TEMP ) 253 IF( 2**LGN.LT.N ) 254 $ LGN = LGN + 1 255 IF( 2**LGN.LT.N ) 256 $ LGN = LGN + 1 258 IPERM = IPRMPT + N*LGN 259 IQPTR = IPERM + N*LGN 261 IGIVCL = IGIVPT + N*LGN 264 IQ = IGIVNM + 2*N*LGN
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
H A D | claed0.f | 173 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, local 255 LGN = INT( TEMP ) 256 IF( 2**LGN.LT.N ) 257 $ LGN = LGN + 1 258 IF( 2**LGN.LT.N ) 259 $ LGN = LGN + 1 261 IPERM = IPRMPT + N*LGN 262 IQPTR = IPERM + N*LGN 264 IGIVCL = IGIVPT + N*LGN 267 IQ = IGIVNM + 2*N*LGN
|
H A D | zlaed0.f | 173 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 255 LGN = INT( TEMP ) 256 IF( 2**LGN.LT.N ) 257 $ LGN = LGN + 1 258 IF( 2**LGN.LT.N ) 259 $ LGN = LGN + 1 261 IPERM = IPRMPT + N*LGN 262 IQPTR = IPERM + N*LGN 264 IGIVCL = IGIVPT + N*LGN 267 IQ = IGIVNM + 2*N*LGN
|
/dports/math/openblas/TIMING/EIG/EIGSRC/ |
H A D | claed0.f | 99 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 183 LGN = INT( TEMP ) 184 IF( 2**LGN.LT.N ) 185 $ LGN = LGN + 1 186 IF( 2**LGN.LT.N ) 187 $ LGN = LGN + 1 189 IPERM = IPRMPT + N*LGN 190 IQPTR = IPERM + N*LGN 192 IGIVCL = IGIVPT + N*LGN 195 IQ = IGIVNM + 2*N*LGN
|
H A D | zlaed0.f | 99 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 183 LGN = INT( TEMP ) 184 IF( 2**LGN.LT.N ) 185 $ LGN = LGN + 1 186 IF( 2**LGN.LT.N ) 187 $ LGN = LGN + 1 189 IPERM = IPRMPT + N*LGN 190 IQPTR = IPERM + N*LGN 192 IGIVCL = IGIVPT + N*LGN 195 IQ = IGIVNM + 2*N*LGN
|
/dports/science/elk/elk-7.2.42/src/LAPACK/ |
H A D | zlaed0.f | 173 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 255 LGN = INT( TEMP ) 256 IF( 2**LGN.LT.N ) 257 $ LGN = LGN + 1 258 IF( 2**LGN.LT.N ) 259 $ LGN = LGN + 1 261 IPERM = IPRMPT + N*LGN 262 IQPTR = IPERM + N*LGN 264 IGIVCL = IGIVPT + N*LGN 267 IQ = IGIVNM + 2*N*LGN
|
/dports/math/cblas/lapack-3.10.0/SRC/ |
H A D | claed0.f | 170 $ J, K, LGN, LL, MATSIZ, MSD2, SMLSIZ, SMM1, 252 LGN = INT( TEMP ) 253 IF( 2**LGN.LT.N ) 254 $ LGN = LGN + 1 255 IF( 2**LGN.LT.N ) 256 $ LGN = LGN + 1 258 IPERM = IPRMPT + N*LGN 259 IQPTR = IPERM + N*LGN 261 IGIVCL = IGIVPT + N*LGN 264 IQ = IGIVNM + 2*N*LGN
|