/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/BLAS/SRC/ |
H A D | drotm.f | 117 INTEGER I,KX,KY,NSTEPS 160 KY = 1 171 Z = DY(KY) 173 DY(KY) = W*DH21 + Z*DH22 175 KY = KY + INCY 182 Z = DY(KY) 184 DY(KY) = W*DH21 + Z 186 KY = KY + INCY 193 Z = DY(KY) 195 DY(KY) = -W + DH22*Z [all …]
|
H A D | srotm.f | 118 INTEGER I,KX,KY,NSTEPS 161 KY = 1 172 Z = SY(KY) 174 SY(KY) = W*SH21 + Z*SH22 176 KY = KY + INCY 183 Z = SY(KY) 185 SY(KY) = W*SH21 + Z 187 KY = KY + INCY 194 Z = SY(KY) 196 SY(KY) = -W + SH22*Z [all …]
|
/dports/math/xlapack/lapack-3.10.0/BLAS/SRC/ |
H A D | drotm.f | 112 INTEGER I,KX,KY,NSTEPS 155 KY = 1 166 Z = DY(KY) 168 DY(KY) = W*DH21 + Z*DH22 170 KY = KY + INCY 177 Z = DY(KY) 179 DY(KY) = W*DH21 + Z 181 KY = KY + INCY 188 Z = DY(KY) 190 DY(KY) = -W + DH22*Z [all …]
|
H A D | srotm.f | 113 INTEGER I,KX,KY,NSTEPS 156 KY = 1 167 Z = SY(KY) 169 SY(KY) = W*SH21 + Z*SH22 171 KY = KY + INCY 178 Z = SY(KY) 180 SY(KY) = W*SH21 + Z 182 KY = KY + INCY 189 Z = SY(KY) 191 SY(KY) = -W + SH22*Z [all …]
|
/dports/math/blas/lapack-3.10.0/BLAS/SRC/ |
H A D | srotm.f | 113 INTEGER I,KX,KY,NSTEPS 156 KY = 1 167 Z = SY(KY) 169 SY(KY) = W*SH21 + Z*SH22 171 KY = KY + INCY 178 Z = SY(KY) 180 SY(KY) = W*SH21 + Z 182 KY = KY + INCY 189 Z = SY(KY) 191 SY(KY) = -W + SH22*Z [all …]
|
H A D | drotm.f | 112 INTEGER I,KX,KY,NSTEPS 155 KY = 1 166 Z = DY(KY) 168 DY(KY) = W*DH21 + Z*DH22 170 KY = KY + INCY 177 Z = DY(KY) 179 DY(KY) = W*DH21 + Z 181 KY = KY + INCY 188 Z = DY(KY) 190 DY(KY) = -W + DH22*Z [all …]
|
/dports/math/lapack/lapack-3.10.0/BLAS/SRC/ |
H A D | drotm.f | 112 INTEGER I,KX,KY,NSTEPS 155 KY = 1 166 Z = DY(KY) 168 DY(KY) = W*DH21 + Z*DH22 170 KY = KY + INCY 177 Z = DY(KY) 179 DY(KY) = W*DH21 + Z 181 KY = KY + INCY 188 Z = DY(KY) 190 DY(KY) = -W + DH22*Z [all …]
|
H A D | srotm.f | 113 INTEGER I,KX,KY,NSTEPS 156 KY = 1 167 Z = SY(KY) 169 SY(KY) = W*SH21 + Z*SH22 171 KY = KY + INCY 178 Z = SY(KY) 180 SY(KY) = W*SH21 + Z 182 KY = KY + INCY 189 Z = SY(KY) 191 SY(KY) = -W + SH22*Z [all …]
|
/dports/math/lapacke/lapack-3.10.0/BLAS/SRC/ |
H A D | drotm.f | 112 INTEGER I,KX,KY,NSTEPS 155 KY = 1 166 Z = DY(KY) 168 DY(KY) = W*DH21 + Z*DH22 170 KY = KY + INCY 177 Z = DY(KY) 179 DY(KY) = W*DH21 + Z 181 KY = KY + INCY 188 Z = DY(KY) 190 DY(KY) = -W + DH22*Z [all …]
|
H A D | srotm.f | 113 INTEGER I,KX,KY,NSTEPS 156 KY = 1 167 Z = SY(KY) 169 SY(KY) = W*SH21 + Z*SH22 171 KY = KY + INCY 178 Z = SY(KY) 180 SY(KY) = W*SH21 + Z 182 KY = KY + INCY 189 Z = SY(KY) 191 SY(KY) = -W + SH22*Z [all …]
|
/dports/math/libflame/libflame-5.2.0/netlib-test/lapack-3.4.2/BLAS/SRC/ |
H A D | drotm.f | 117 INTEGER I,KX,KY,NSTEPS 160 KY = 1 171 Z = DY(KY) 173 DY(KY) = W*DH21 + Z*DH22 175 KY = KY + INCY 182 Z = DY(KY) 184 DY(KY) = W*DH21 + Z 186 KY = KY + INCY 193 Z = DY(KY) 195 DY(KY) = -W + DH22*Z [all …]
|
H A D | srotm.f | 118 INTEGER I,KX,KY,NSTEPS 161 KY = 1 172 Z = SY(KY) 174 SY(KY) = W*SH21 + Z*SH22 176 KY = KY + INCY 183 Z = SY(KY) 185 SY(KY) = W*SH21 + Z 187 KY = KY + INCY 194 Z = SY(KY) 196 SY(KY) = -W + SH22*Z [all …]
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/BLAS/SRC/ |
H A D | srotm.f | 116 INTEGER I,KX,KY,NSTEPS 159 KY = 1 170 Z = SY(KY) 172 SY(KY) = W*SH21 + Z*SH22 174 KY = KY + INCY 181 Z = SY(KY) 183 SY(KY) = W*SH21 + Z 185 KY = KY + INCY 192 Z = SY(KY) 194 SY(KY) = -W + SH22*Z [all …]
|
H A D | drotm.f | 115 INTEGER I,KX,KY,NSTEPS local 158 KY = 1 169 Z = DY(KY) 171 DY(KY) = W*DH21 + Z*DH22 173 KY = KY + INCY 180 Z = DY(KY) 182 DY(KY) = W*DH21 + Z 184 KY = KY + INCY 191 Z = DY(KY) 193 DY(KY) = -W + DH22*Z [all …]
|
/dports/math/cblas/lapack-3.10.0/BLAS/SRC/ |
H A D | srotm.f | 113 INTEGER I,KX,KY,NSTEPS 156 KY = 1 167 Z = SY(KY) 169 SY(KY) = W*SH21 + Z*SH22 171 KY = KY + INCY 178 Z = SY(KY) 180 SY(KY) = W*SH21 + Z 182 KY = KY + INCY 189 Z = SY(KY) 191 SY(KY) = -W + SH22*Z [all …]
|
H A D | drotm.f | 112 INTEGER I,KX,KY,NSTEPS 155 KY = 1 166 Z = DY(KY) 168 DY(KY) = W*DH21 + Z*DH22 170 KY = KY + INCY 177 Z = DY(KY) 179 DY(KY) = W*DH21 + Z 181 KY = KY + INCY 188 Z = DY(KY) 190 DY(KY) = -W + DH22*Z [all …]
|
/dports/math/libmesh/libmesh-1.6.2/contrib/eigen/3.2.9/blas/ |
H A D | drotm.f | 57 INTEGER I,KX,KY,NSTEPS 103 KY = 1 113 Z = DY(KY) 115 DY(KY) = W*DH21 + Z 117 KY = KY + INCY 125 Z = DY(KY) 127 DY(KY) = -W + DH22*Z 129 KY = KY + INCY 139 Z = DY(KY) 141 DY(KY) = W*DH21 + Z*DH22 [all …]
|
H A D | srotm.f | 58 INTEGER I,KX,KY,NSTEPS 104 KY = 1 114 Z = SY(KY) 116 SY(KY) = W*SH21 + Z 118 KY = KY + INCY 126 Z = SY(KY) 128 SY(KY) = -W + SH22*Z 130 KY = KY + INCY 140 Z = SY(KY) 142 SY(KY) = W*SH21 + Z*SH22 [all …]
|
/dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/openblas/xianyi-OpenBLAS-e6e87a2/reference/ |
H A D | srotmf.f | 62 KY=1 64 IF(INCY .LT. 0) KY=1+(1-N)*INCY 72 Z=SY(KY) 74 SY(KY)=W*SH21+Z 76 KY=KY+INCY 84 Z=SY(KY) 86 SY(KY)=-W+SH22*Z 88 KY=KY+INCY 98 Z=SY(KY) 100 SY(KY)=W*SH21+Z*SH22 [all …]
|
H A D | drotmf.f | 64 KY=1 66 IF(INCY .LT. 0) KY=1+(1-N)*INCY 74 Z=DY(KY) 76 DY(KY)=W*DH21+Z 78 KY=KY+INCY 86 Z=DY(KY) 88 DY(KY)=-W+DH22*Z 90 KY=KY+INCY 100 Z=DY(KY) 102 DY(KY)=W*DH21+Z*DH22 [all …]
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/blas/src_f77/ |
H A D | srotm.f | 62 KY=1 64 IF(INCY .LT. 0) KY=1+(1-N)*INCY 72 Z=SY(KY) 74 SY(KY)=W*SH21+Z 76 KY=KY+INCY 84 Z=SY(KY) 86 SY(KY)=-W+SH22*Z 88 KY=KY+INCY 98 Z=SY(KY) 100 SY(KY)=W*SH21+Z*SH22 [all …]
|
H A D | drotm.f | 64 KY=1 66 IF(INCY .LT. 0) KY=1+(1-N)*INCY 74 Z=DY(KY) 76 DY(KY)=W*DH21+Z 78 KY=KY+INCY 86 Z=DY(KY) 88 DY(KY)=-W+DH22*Z 90 KY=KY+INCY 100 Z=DY(KY) 102 DY(KY)=W*DH21+Z*DH22 [all …]
|
/dports/math/cmlib/cmlib-3.0_8/src/blas/ |
H A D | drotm.f | 101 KY=1 103 IF(INCY .LT. 0) KY=1+(1-N)*INCY 111 Z=DY(KY) 113 DY(KY)=W*DH21+Z 115 KY=KY+INCY 123 Z=DY(KY) 125 DY(KY)=-W+DH22*Z 127 KY=KY+INCY 137 Z=DY(KY) 139 DY(KY)=W*DH21+Z*DH22 [all …]
|
H A D | srotm.f | 100 KY=1 102 IF(INCY .LT. 0) KY=1+(1-N)*INCY 110 Z=SY(KY) 112 SY(KY)=W*SH21+Z 114 KY=KY+INCY 122 Z=SY(KY) 124 SY(KY)=-W+SH22*Z 126 KY=KY+INCY 136 Z=SY(KY) 138 SY(KY)=W*SH21+Z*SH22 [all …]
|
/dports/cad/meshlab/meshlab-Meshlab-2020.05/src/plugins_unsupported/external/GotoBLAS2/reference/ |
H A D | drotmf.f | 64 KY=1 66 IF(INCY .LT. 0) KY=1+(1-N)*INCY 74 Z=DY(KY) 76 DY(KY)=W*DH21+Z 78 KY=KY+INCY 86 Z=DY(KY) 88 DY(KY)=-W+DH22*Z 90 KY=KY+INCY 100 Z=DY(KY) 102 DY(KY)=W*DH21+Z*DH22 [all …]
|