Home
last modified time | relevance | path

Searched refs:JY (Results 1 – 25 of 1734) sorted by relevance

12345678910>>...70

/dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/openblas/xianyi-OpenBLAS-e6e87a2/reference/
H A Dzhemvf.f212 JY = KY
226 JY = JY + INCY
250 JY = KY
254 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( J, J ) )
263 Y( JY ) = Y( JY ) + ALPHA*TEMP2
265 JY = JY + INCY
288 JY = KY
302 JY = JY + INCY
330 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( J, J ) )
339 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
H A Dchemvf.f212 JY = KY
226 JY = JY + INCY
249 JY = KY
253 Y( JY ) = Y( JY ) + TEMP1*REAL( A( J, J ) )
262 Y( JY ) = Y( JY ) + ALPHA*TEMP2
264 JY = JY + INCY
286 JY = KY
300 JY = JY + INCY
328 Y( JY ) = Y( JY ) + TEMP1*REAL( A( J, J ) )
337 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
H A Dzhbmvf.f247 JY = KY
260 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( KPLUS1, J ) )
263 JY = JY + INCY
295 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( 1, J ) )
305 Y( JY ) = Y( JY ) + ALPHA*TEMP2
307 JY = JY + INCY
346 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( KPLUS1, J ) )
349 JY = JY + INCY
381 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( 1, J ) )
391 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
H A Dcgeruf.f84 INTEGER I, INFO, IX, J, JY, KX local
120 JY = 1
122 JY = 1 - ( N - 1 )*INCY
126 IF( Y( JY ).NE.ZERO )THEN
127 TEMP = ALPHA*Y( JY )
132 JY = JY + INCY
141 IF( Y( JY ).NE.ZERO )THEN
142 TEMP = ALPHA*Y( JY )
149 JY = JY + INCY
H A Ddgerf.f85 INTEGER I, INFO, IX, J, JY, KX local
121 JY = 1
123 JY = 1 - ( N - 1 )*INCY
127 IF( Y( JY ).NE.ZERO )THEN
128 TEMP = ALPHA*Y( JY )
133 JY = JY + INCY
142 IF( Y( JY ).NE.ZERO )THEN
143 TEMP = ALPHA*Y( JY )
150 JY = JY + INCY
H A Dsgerf.f84 INTEGER I, INFO, IX, J, JY, KX local
120 JY = 1
122 JY = 1 - ( N - 1 )*INCY
126 IF( Y( JY ).NE.ZERO )THEN
127 TEMP = ALPHA*Y( JY )
132 JY = JY + INCY
141 IF( Y( JY ).NE.ZERO )THEN
142 TEMP = ALPHA*Y( JY )
149 JY = JY + INCY
H A Dzgercf.f84 INTEGER I, INFO, IX, J, JY, KX
120 JY = 1
122 JY = 1 - ( N - 1 )*INCY
126 IF( Y( JY ).NE.ZERO )THEN
127 TEMP = ALPHA*DCONJG( Y( JY ) )
132 JY = JY + INCY
141 IF( Y( JY ).NE.ZERO )THEN
142 TEMP = ALPHA*DCONJG( Y( JY ) )
149 JY = JY + INCY
/dports/cad/meshlab/meshlab-Meshlab-2020.05/src/plugins_unsupported/external/GotoBLAS2/reference/
H A Dchemvf.f212 JY = KY
226 JY = JY + INCY
249 JY = KY
253 Y( JY ) = Y( JY ) + TEMP1*REAL( A( J, J ) )
262 Y( JY ) = Y( JY ) + ALPHA*TEMP2
264 JY = JY + INCY
286 JY = KY
300 JY = JY + INCY
328 Y( JY ) = Y( JY ) + TEMP1*REAL( A( J, J ) )
337 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
H A Dzhemvf.f212 JY = KY
226 JY = JY + INCY
250 JY = KY
254 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( J, J ) )
263 Y( JY ) = Y( JY ) + ALPHA*TEMP2
265 JY = JY + INCY
288 JY = KY
302 JY = JY + INCY
330 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( J, J ) )
339 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
H A Dzhbmvf.f247 JY = KY
260 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( KPLUS1, J ) )
263 JY = JY + INCY
295 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( 1, J ) )
305 Y( JY ) = Y( JY ) + ALPHA*TEMP2
307 JY = JY + INCY
346 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( KPLUS1, J ) )
349 JY = JY + INCY
381 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( 1, J ) )
391 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
/dports/math/openblas/OpenBLAS-0.3.18/reference/
H A Dzhemvf.f212 JY = KY
226 JY = JY + INCY
250 JY = KY
254 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( J, J ) )
263 Y( JY ) = Y( JY ) + ALPHA*TEMP2
265 JY = JY + INCY
288 JY = KY
302 JY = JY + INCY
330 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( J, J ) )
339 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
H A Dchemvf.f212 JY = KY
226 JY = JY + INCY
249 JY = KY
253 Y( JY ) = Y( JY ) + TEMP1*REAL( A( J, J ) )
262 Y( JY ) = Y( JY ) + ALPHA*TEMP2
264 JY = JY + INCY
286 JY = KY
300 JY = JY + INCY
328 Y( JY ) = Y( JY ) + TEMP1*REAL( A( J, J ) )
337 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
H A Dzhbmvf.f247 JY = KY
260 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( KPLUS1, J ) )
263 JY = JY + INCY
295 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( 1, J ) )
305 Y( JY ) = Y( JY ) + ALPHA*TEMP2
307 JY = JY + INCY
346 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( KPLUS1, J ) )
349 JY = JY + INCY
381 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( 1, J ) )
391 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
/dports/math/gotoblas/GotoBLAS2/reference/
H A Dzhemvf.f212 JY = KY
226 JY = JY + INCY
250 JY = KY
254 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( J, J ) )
263 Y( JY ) = Y( JY ) + ALPHA*TEMP2
265 JY = JY + INCY
288 JY = KY
302 JY = JY + INCY
330 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( J, J ) )
339 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
H A Dchemvf.f212 JY = KY
226 JY = JY + INCY
249 JY = KY
253 Y( JY ) = Y( JY ) + TEMP1*REAL( A( J, J ) )
262 Y( JY ) = Y( JY ) + ALPHA*TEMP2
264 JY = JY + INCY
286 JY = KY
300 JY = JY + INCY
328 Y( JY ) = Y( JY ) + TEMP1*REAL( A( J, J ) )
337 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
H A Dzhbmvf.f247 JY = KY
260 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( KPLUS1, J ) )
263 JY = JY + INCY
295 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( 1, J ) )
305 Y( JY ) = Y( JY ) + ALPHA*TEMP2
307 JY = JY + INCY
346 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( KPLUS1, J ) )
349 JY = JY + INCY
381 Y( JY ) = Y( JY ) + TEMP1*DBLE( A( 1, J ) )
391 Y( JY ) = Y( JY ) + ALPHA*TEMP2
[all …]
/dports/science/berkeleygw/BGW-2.0.0/BSE/SSEIG/
H A Ddssr2.f90173 JY = KY + (JJ-1)*INCY
175 IF ( INCY .LT. 0 ) JY = JY + (JC-1)*INCY
200 JY = KY + (JJ-1)*INCY
202 IF ( INCY .LT. 0 ) JY = JY + (JC-1)*INCY
285 JY = KY + INCY
289 TEMP1 = ALPHA*Y( JY )
301 JY = JY + INCY
321 JY = KY
325 TEMP1 = ALPHA*Y( JY )
328 IY = JY + INCY
[all …]
H A Dsssr2.f90173 JY = KY + (JJ-1)*INCY
175 IF ( INCY .LT. 0 ) JY = JY + (JC-1)*INCY
200 JY = KY + (JJ-1)*INCY
202 IF ( INCY .LT. 0 ) JY = JY + (JC-1)*INCY
285 JY = KY + INCY
289 TEMP1 = ALPHA*Y( JY )
301 JY = JY + INCY
321 JY = KY
325 TEMP1 = ALPHA*Y( JY )
328 IY = JY + INCY
[all …]
/dports/science/dcl/dcl-5.4.8/src/grph2/udpack/
H A Dudgrdn.f6 SUBROUTINE UDGRDN(MODE,IX,IY,K,JX,JY,JK) argument
8 INTEGER JX(0:3),JY(0:3),JK(0:3) local
17 JY(0)=IY
18 JY(1)=IY+K
19 JY(2)=IY+KM
20 JY(3)=IY
30 JY(0)=IY
31 JY(1)=IY-KM
32 JY(2)=IY-KM
33 JY(3)=IY+1-2*KM
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/blas/
H A Dzgerc.f84 INTEGER I, INFO, IX, J, JY, KX
120 JY = 1
122 JY = 1 - ( N - 1 )*INCY
126 IF( Y( JY ).NE.ZERO )THEN
127 TEMP = ALPHA*DCONJG( Y( JY ) )
132 JY = JY + INCY
141 IF( Y( JY ).NE.ZERO )THEN
142 TEMP = ALPHA*DCONJG( Y( JY ) )
149 JY = JY + INCY
H A Dsger.f84 INTEGER I, INFO, IX, J, JY, KX
120 JY = 1
122 JY = 1 - ( N - 1 )*INCY
126 IF( Y( JY ).NE.ZERO )THEN
127 TEMP = ALPHA*Y( JY )
132 JY = JY + INCY
141 IF( Y( JY ).NE.ZERO )THEN
142 TEMP = ALPHA*Y( JY )
149 JY = JY + INCY
H A Ddger.f84 INTEGER I, INFO, IX, J, JY, KX
120 JY = 1
122 JY = 1 - ( N - 1 )*INCY
126 IF( Y( JY ).NE.ZERO )THEN
127 TEMP = ALPHA*Y( JY )
132 JY = JY + INCY
141 IF( Y( JY ).NE.ZERO )THEN
142 TEMP = ALPHA*Y( JY )
149 JY = JY + INCY
H A Dzgeru.f86 INTEGER I,INFO,IX,J,JY,KX
122 JY = 1
124 JY = 1 - (N-1)*INCY
128 IF (Y(JY).NE.ZERO) THEN
129 TEMP = ALPHA*Y(JY)
134 JY = JY + INCY
143 IF (Y(JY).NE.ZERO) THEN
144 TEMP = ALPHA*Y(JY)
151 JY = JY + INCY
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/BLAS/SRC/
H A Dsger.f154 INTEGER I,INFO,IX,J,JY,KX
190 JY = 1
192 JY = 1 - (N-1)*INCY
196 IF (Y(JY).NE.ZERO) THEN
197 TEMP = ALPHA*Y(JY)
202 JY = JY + INCY
211 IF (Y(JY).NE.ZERO) THEN
212 TEMP = ALPHA*Y(JY)
219 JY = JY + INCY
H A Dzgerc.f154 INTEGER I,INFO,IX,J,JY,KX
190 JY = 1
192 JY = 1 - (N-1)*INCY
196 IF (Y(JY).NE.ZERO) THEN
197 TEMP = ALPHA*DCONJG(Y(JY))
202 JY = JY + INCY
211 IF (Y(JY).NE.ZERO) THEN
212 TEMP = ALPHA*DCONJG(Y(JY))
219 JY = JY + INCY

12345678910>>...70