Home
last modified time | relevance | path

Searched refs:LDST (Results 1 – 25 of 310) sorted by relevance

12345678910>>...13

/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/
H A Dstgex2.f261 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
262 $ LICOP( LDST, LDST ), S( LDST, LDST ),
263 $ SCPY( LDST, LDST ), T( LDST, LDST ),
264 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
300 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
301 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
488 CALL SLACPY( 'F', M, M, S, LDST, SCPY, LDST )
489 CALL SLACPY( 'F', M, M, T, LDST, TCPY, LDST )
490 CALL SLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
491 CALL SLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Ddtgex2.f261 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
262 $ LICOP( LDST, LDST ), S( LDST, LDST ),
263 $ SCPY( LDST, LDST ), T( LDST, LDST ),
264 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
300 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
301 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
488 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
489 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
490 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
491 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
/dports/math/xlapack/lapack-3.10.0/SRC/
H A Dstgex2.f260 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
261 $ LICOP( LDST, LDST ), S( LDST, LDST ),
262 $ SCPY( LDST, LDST ), T( LDST, LDST ),
263 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
299 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
300 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
498 CALL SLACPY( 'F', M, M, S, LDST, SCPY, LDST )
499 CALL SLACPY( 'F', M, M, T, LDST, TCPY, LDST )
500 CALL SLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
501 CALL SLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Ddtgex2.f259 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
260 $ LICOP( LDST, LDST ), S( LDST, LDST ),
261 $ SCPY( LDST, LDST ), T( LDST, LDST ),
262 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
298 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
299 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
497 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
498 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
499 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
500 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
/dports/math/blas/lapack-3.10.0/SRC/
H A Dstgex2.f260 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
261 $ LICOP( LDST, LDST ), S( LDST, LDST ),
262 $ SCPY( LDST, LDST ), T( LDST, LDST ),
263 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
299 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
300 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
498 CALL SLACPY( 'F', M, M, S, LDST, SCPY, LDST )
499 CALL SLACPY( 'F', M, M, T, LDST, TCPY, LDST )
500 CALL SLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
501 CALL SLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Ddtgex2.f259 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
260 $ LICOP( LDST, LDST ), S( LDST, LDST ),
261 $ SCPY( LDST, LDST ), T( LDST, LDST ),
262 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
298 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
299 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
497 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
498 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
499 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
500 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
/dports/math/lapacke/lapack-3.10.0/SRC/
H A Ddtgex2.f259 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
260 $ LICOP( LDST, LDST ), S( LDST, LDST ),
261 $ SCPY( LDST, LDST ), T( LDST, LDST ),
262 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
298 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
299 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
497 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
498 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
499 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
500 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Dstgex2.f260 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
261 $ LICOP( LDST, LDST ), S( LDST, LDST ),
262 $ SCPY( LDST, LDST ), T( LDST, LDST ),
263 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
299 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
300 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
498 CALL SLACPY( 'F', M, M, S, LDST, SCPY, LDST )
499 CALL SLACPY( 'F', M, M, T, LDST, TCPY, LDST )
500 CALL SLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
501 CALL SLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
/dports/math/lapack/lapack-3.10.0/SRC/
H A Ddtgex2.f259 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
260 $ LICOP( LDST, LDST ), S( LDST, LDST ),
261 $ SCPY( LDST, LDST ), T( LDST, LDST ),
262 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
298 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
299 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
497 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
498 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
499 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
500 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Dstgex2.f260 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
261 $ LICOP( LDST, LDST ), S( LDST, LDST ),
262 $ SCPY( LDST, LDST ), T( LDST, LDST ),
263 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
299 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
300 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
498 CALL SLACPY( 'F', M, M, S, LDST, SCPY, LDST )
499 CALL SLACPY( 'F', M, M, T, LDST, TCPY, LDST )
500 CALL SLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
501 CALL SLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/
H A Dstgex2.f261 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
262 $ LICOP( LDST, LDST ), S( LDST, LDST ),
263 $ SCPY( LDST, LDST ), T( LDST, LDST ),
264 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
300 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
301 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
488 CALL SLACPY( 'F', M, M, S, LDST, SCPY, LDST )
489 CALL SLACPY( 'F', M, M, T, LDST, TCPY, LDST )
490 CALL SLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
491 CALL SLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Ddtgex2.f261 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
262 $ LICOP( LDST, LDST ), S( LDST, LDST ),
263 $ SCPY( LDST, LDST ), T( LDST, LDST ),
264 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
300 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
301 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
488 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
489 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
490 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
491 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Dctgex2.f215 INTEGER LDST local
216 PARAMETER ( LDST = 2 )
228 COMPLEX S( LDST, LDST ), T( LDST, LDST ), WORK( 8 )
249 M = LDST
255 CALL CLACPY( 'Full', M, M, A( J1, J1 ), LDA, S, LDST )
256 CALL CLACPY( 'Full', M, M, B( J1, J1 ), LDB, T, LDST )
264 CALL CLACPY( 'Full', M, M, S, LDST, WORK, M )
265 CALL CLACPY( 'Full', M, M, T, LDST, WORK( M*M+1 ), M )
295 CALL CROT( 2, S( 1, 1 ), LDST, S( 2, 1 ), LDST, CQ, SQ )
296 CALL CROT( 2, T( 1, 1 ), LDST, T( 2, 1 ), LDST, CQ, SQ )
[all …]
/dports/math/cblas/lapack-3.10.0/SRC/
H A Ddtgex2.f259 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
260 $ LICOP( LDST, LDST ), S( LDST, LDST ),
261 $ SCPY( LDST, LDST ), T( LDST, LDST ),
262 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
298 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
299 CALL DLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
497 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
498 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
499 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
500 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Dstgex2.f260 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
261 $ LICOP( LDST, LDST ), S( LDST, LDST ),
262 $ SCPY( LDST, LDST ), T( LDST, LDST ),
263 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
299 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, LI, LDST )
300 CALL SLASET( 'Full', LDST, LDST, ZERO, ZERO, IR, LDST )
498 CALL SLACPY( 'F', M, M, S, LDST, SCPY, LDST )
499 CALL SLACPY( 'F', M, M, T, LDST, TCPY, LDST )
500 CALL SLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
501 CALL SLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/double/
H A Ddtgex2.f151 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
152 $ LICOP( LDST, LDST ), S( LDST, LDST ),
153 $ SCPY( LDST, LDST ), T( LDST, LDST ),
154 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
190 CALL DCOPY( LDST*LDST, ZERO, 0, LI, 1 )
191 CALL DCOPY( LDST*LDST, ZERO, 0, IR, 1 )
369 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
370 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
371 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
372 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/
H A Dstgex2.f151 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
152 $ LICOP( LDST, LDST ), S( LDST, LDST ),
153 $ SCPY( LDST, LDST ), T( LDST, LDST ),
154 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
190 CALL SCOPY( LDST*LDST, ZERO, 0, LI, 1 )
191 CALL SCOPY( LDST*LDST, ZERO, 0, IR, 1 )
369 CALL SLACPY( 'F', M, M, S, LDST, SCPY, LDST )
370 CALL SLACPY( 'F', M, M, T, LDST, TCPY, LDST )
371 CALL SLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
372 CALL SLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Ddtgex2.f151 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
152 $ LICOP( LDST, LDST ), S( LDST, LDST ),
153 $ SCPY( LDST, LDST ), T( LDST, LDST ),
154 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
190 CALL DCOPY( LDST*LDST, ZERO, 0, LI, 1 )
191 CALL DCOPY( LDST*LDST, ZERO, 0, IR, 1 )
369 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
370 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
371 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
372 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Dctgex2.f125 INTEGER LDST
126 PARAMETER ( LDST = 2 )
138 COMPLEX S( LDST, LDST ), T( LDST, LDST ), WORK( 8 )
159 M = LDST
165 CALL CLACPY( 'Full', M, M, A( J1, J1 ), LDA, S, LDST )
166 CALL CLACPY( 'Full', M, M, B( J1, J1 ), LDB, T, LDST )
174 CALL CLACPY( 'Full', M, M, S, LDST, WORK, M )
175 CALL CLACPY( 'Full', M, M, T, LDST, WORK( M*M+1 ), M )
196 CALL CROT( 2, S( 1, 1 ), LDST, S( 2, 1 ), LDST, CQ, SQ )
197 CALL CROT( 2, T( 1, 1 ), LDST, T( 2, 1 ), LDST, CQ, SQ )
[all …]
H A Dztgex2.f125 INTEGER LDST local
126 PARAMETER ( LDST = 2 )
138 COMPLEX*16 S( LDST, LDST ), T( LDST, LDST ), WORK( 8 )
159 M = LDST
165 CALL ZLACPY( 'Full', M, M, A( J1, J1 ), LDA, S, LDST )
166 CALL ZLACPY( 'Full', M, M, B( J1, J1 ), LDB, T, LDST )
174 CALL ZLACPY( 'Full', M, M, S, LDST, WORK, M )
175 CALL ZLACPY( 'Full', M, M, T, LDST, WORK( M*M+1 ), M )
196 CALL ZROT( 2, S( 1, 1 ), LDST, S( 2, 1 ), LDST, CQ, SQ )
197 CALL ZROT( 2, T( 1, 1 ), LDST, T( 2, 1 ), LDST, CQ, SQ )
[all …]
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/
H A Dstgex2.f151 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
152 $ LICOP( LDST, LDST ), S( LDST, LDST ),
153 $ SCPY( LDST, LDST ), T( LDST, LDST ),
154 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
190 CALL SCOPY( LDST*LDST, ZERO, 0, LI, 1 )
191 CALL SCOPY( LDST*LDST, ZERO, 0, IR, 1 )
369 CALL SLACPY( 'F', M, M, S, LDST, SCPY, LDST )
370 CALL SLACPY( 'F', M, M, T, LDST, TCPY, LDST )
371 CALL SLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
372 CALL SLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Ddtgex2.f151 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
152 $ LICOP( LDST, LDST ), S( LDST, LDST ),
153 $ SCPY( LDST, LDST ), T( LDST, LDST ),
154 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
190 CALL DCOPY( LDST*LDST, ZERO, 0, LI, 1 )
191 CALL DCOPY( LDST*LDST, ZERO, 0, IR, 1 )
369 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
370 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
371 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
372 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
H A Dctgex2.f125 INTEGER LDST
126 PARAMETER ( LDST = 2 )
138 COMPLEX S( LDST, LDST ), T( LDST, LDST ), WORK( 8 )
159 M = LDST
165 CALL CLACPY( 'Full', M, M, A( J1, J1 ), LDA, S, LDST )
166 CALL CLACPY( 'Full', M, M, B( J1, J1 ), LDB, T, LDST )
174 CALL CLACPY( 'Full', M, M, S, LDST, WORK, M )
175 CALL CLACPY( 'Full', M, M, T, LDST, WORK( M*M+1 ), M )
196 CALL CROT( 2, S( 1, 1 ), LDST, S( 2, 1 ), LDST, CQ, SQ )
197 CALL CROT( 2, T( 1, 1 ), LDST, T( 2, 1 ), LDST, CQ, SQ )
[all …]
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/double/
H A Ddtgex2.f151 $ IRCOP( LDST, LDST ), LI( LDST, LDST ),
152 $ LICOP( LDST, LDST ), S( LDST, LDST ),
153 $ SCPY( LDST, LDST ), T( LDST, LDST ),
154 $ TAUL( LDST ), TAUR( LDST ), TCPY( LDST, LDST )
190 CALL DCOPY( LDST*LDST, ZERO, 0, LI, 1 )
191 CALL DCOPY( LDST*LDST, ZERO, 0, IR, 1 )
369 CALL DLACPY( 'F', M, M, S, LDST, SCPY, LDST )
370 CALL DLACPY( 'F', M, M, T, LDST, TCPY, LDST )
371 CALL DLACPY( 'F', M, M, IR, LDST, IRCOP, LDST )
372 CALL DLACPY( 'F', M, M, LI, LDST, LICOP, LDST )
[all …]
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/complex16/
H A Dztgex2.f123 INTEGER LDST
124 PARAMETER ( LDST = 2 )
136 COMPLEX*16 S( LDST, LDST ), T( LDST, LDST ), WORK( 8 )
157 M = LDST
163 CALL ZLACPY( 'Full', M, M, A( J1, J1 ), LDA, S, LDST )
164 CALL ZLACPY( 'Full', M, M, B( J1, J1 ), LDB, T, LDST )
172 CALL ZLACPY( 'Full', M, M, S, LDST, WORK, M )
173 CALL ZLACPY( 'Full', M, M, T, LDST, WORK( M*M+1 ), M )
203 CALL ZROT( 2, S( 1, 1 ), LDST, S( 2, 1 ), LDST, CQ, SQ )
204 CALL ZROT( 2, T( 1, 1 ), LDST, T( 2, 1 ), LDST, CQ, SQ )
[all …]

12345678910>>...13