Home
last modified time | relevance | path

Searched refs:ITAUP2 (Results 1 – 25 of 58) sorted by relevance

123

/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/
H A Dcuncsd2by1.f285 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
378 ITAUP2 = ITAUP1 + MAX( 1, P )
379 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
511 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
523 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
566 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
583 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
620 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
639 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
680 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Ddorcsd2by1.f263 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
342 ITAUP2 = ITAUP1 + MAX( 1, P )
343 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
474 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
486 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
529 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
546 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
583 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
602 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
643 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dzuncsd2by1.f284 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
377 ITAUP2 = ITAUP1 + MAX( 1, P )
378 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
510 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
522 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
565 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
582 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
619 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
638 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
679 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dsorcsd2by1.f261 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
340 ITAUP2 = ITAUP1 + MAX( 1, P )
341 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
472 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
484 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
527 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
544 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
581 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
600 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
641 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
/dports/math/xlapack/lapack-3.10.0/SRC/
H A Ddorcsd2by1.f259 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
341 ITAUP2 = ITAUP1 + MAX( 1, P )
342 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
499 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
511 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
554 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
571 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
608 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
627 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
668 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dcuncsd2by1.f285 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
382 ITAUP2 = ITAUP1 + MAX( 1, P )
383 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
538 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
550 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
593 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
610 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
647 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
666 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
707 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dsorcsd2by1.f259 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
341 ITAUP2 = ITAUP1 + MAX( 1, P )
342 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
499 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
511 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
554 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
571 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
608 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
627 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
668 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dzuncsd2by1.f284 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
381 ITAUP2 = ITAUP1 + MAX( 1, P )
382 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
536 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
548 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
591 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
608 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
645 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
664 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
705 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
/dports/math/blas/lapack-3.10.0/SRC/
H A Dsorcsd2by1.f259 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
341 ITAUP2 = ITAUP1 + MAX( 1, P )
342 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
499 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
511 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
554 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
571 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
608 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
627 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
668 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dzuncsd2by1.f284 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
381 ITAUP2 = ITAUP1 + MAX( 1, P )
382 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
536 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
548 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
591 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
608 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
645 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
664 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
705 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dcuncsd2by1.f285 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
382 ITAUP2 = ITAUP1 + MAX( 1, P )
383 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
538 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
550 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
593 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
610 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
647 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
666 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
707 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Ddorcsd2by1.f259 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
341 ITAUP2 = ITAUP1 + MAX( 1, P )
342 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
499 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
511 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
554 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
571 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
608 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
627 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
668 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
/dports/math/lapacke/lapack-3.10.0/SRC/
H A Dcuncsd2by1.f285 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
382 ITAUP2 = ITAUP1 + MAX( 1, P )
383 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
538 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
550 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
593 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
610 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
647 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
666 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
707 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Ddorcsd2by1.f259 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
341 ITAUP2 = ITAUP1 + MAX( 1, P )
342 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
499 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
511 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
554 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
571 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
608 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
627 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
668 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dzuncsd2by1.f284 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
381 ITAUP2 = ITAUP1 + MAX( 1, P )
382 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
536 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
548 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
591 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
608 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
645 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
664 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
705 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dsorcsd2by1.f259 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
341 ITAUP2 = ITAUP1 + MAX( 1, P )
342 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
499 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
511 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
554 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
571 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
608 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
627 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
668 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
/dports/math/lapack/lapack-3.10.0/SRC/
H A Ddorcsd2by1.f259 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
341 ITAUP2 = ITAUP1 + MAX( 1, P )
342 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
499 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
511 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
554 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
571 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
608 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
627 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
668 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dcuncsd2by1.f285 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
382 ITAUP2 = ITAUP1 + MAX( 1, P )
383 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
538 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
550 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
593 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
610 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
647 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
666 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
707 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dzuncsd2by1.f284 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
381 ITAUP2 = ITAUP1 + MAX( 1, P )
382 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
536 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
548 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
591 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
608 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
645 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
664 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
705 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dsorcsd2by1.f259 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
341 ITAUP2 = ITAUP1 + MAX( 1, P )
342 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
499 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
511 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
554 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
571 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
608 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
627 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
668 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/
H A Ddorcsd2by1.f262 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1, local
344 ITAUP2 = ITAUP1 + MAX( 1, P )
345 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
502 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
514 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
557 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
574 CALL DORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
611 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
630 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
671 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dcuncsd2by1.f286 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1, local
383 ITAUP2 = ITAUP1 + MAX( 1, P )
384 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
536 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
548 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
591 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
608 CALL CUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
645 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
664 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
705 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dzuncsd2by1.f285 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
382 ITAUP2 = ITAUP1 + MAX( 1, P )
383 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
534 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
546 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
589 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
606 CALL ZUNGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
643 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
662 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
703 $ RWORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
H A Dsorcsd2by1.f262 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1, local
344 ITAUP2 = ITAUP1 + MAX( 1, P )
345 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
502 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
514 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
557 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
574 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
611 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
630 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
671 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]
/dports/math/cblas/lapack-3.10.0/SRC/
H A Dsorcsd2by1.f259 $ IORGLQ, IORGQR, IPHI, ITAUP1, ITAUP2, ITAUQ1,
341 ITAUP2 = ITAUP1 + MAX( 1, P )
342 ITAUQ1 = ITAUP2 + MAX( 1, M-P )
499 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
511 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
554 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
571 CALL SORGQR( M-P, M-P, Q, U2, LDU2, WORK(ITAUP2),
608 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
627 $ WORK(ITAUP2), WORK(IORGQR), LORGQR, CHILDINFO )
668 $ WORK(IPHI), WORK(ITAUP1), WORK(ITAUP2),
[all …]

123