/dports/math/scalapack/scalapack-2.1.0/SRC/ |
H A D | pzpbtrf.f | 647 IF ( MYCOL .EQ. 0 ) THEN 687 IF( MYCOL .GT. 0 ) THEN 720 INFO = MYCOL+1 838 IF( MYCOL.EQ.0 ) THEN 867 IF( (MOD( MYCOL+1, 2 ) .EQ. 0) .AND. ( MYCOL .GT. 0 ) ) THEN 890 $ MYCOL+1 ) 960 COMM_PROC = MYCOL + 1 1114 INFO = MYCOL+1 1226 IF( MYCOL.EQ.0 ) THEN 1255 IF( (MOD( MYCOL+1, 2 ) .EQ. 0) .AND. ( MYCOL .GT. 0 ) ) THEN [all …]
|
H A D | pcpttrsv.f | 670 IF ( MYCOL .LT. CSRC ) THEN 726 IF ( MYCOL .EQ. 0 ) THEN 734 IF ( MYCOL .LT. NP-1 ) THEN 771 IF ( MYCOL .NE. 0 ) THEN 788 IF( MYCOL .GT. 0) THEN 1067 IF( MYCOL .GT. 0) THEN 1081 IF ( MYCOL .NE. 0 ) THEN 1143 IF ( MYCOL .NE. 0 ) THEN 1160 IF( MYCOL .GT. 0) THEN 1439 IF( MYCOL .GT. 0) THEN [all …]
|
H A D | pzdttrsv.f | 676 IF ( MYCOL .LT. CSRC ) THEN 732 IF ( MYCOL .EQ. 0 ) THEN 740 IF ( MYCOL .LT. NP-1 ) THEN 781 IF ( MYCOL .NE. 0 ) THEN 798 IF( MYCOL .GT. 0) THEN 1079 IF( MYCOL .GT. 0) THEN 1093 IF ( MYCOL .NE. 0 ) THEN 1155 IF ( MYCOL .NE. 0 ) THEN 1173 IF( MYCOL .GT. 0) THEN 1454 IF( MYCOL .GT. 0) THEN [all …]
|
H A D | pzpttrsv.f | 667 IF ( MYCOL .LT. CSRC ) THEN 723 IF ( MYCOL .EQ. 0 ) THEN 731 IF ( MYCOL .LT. NP-1 ) THEN 768 IF ( MYCOL .NE. 0 ) THEN 785 IF( MYCOL .GT. 0) THEN 1064 IF( MYCOL .GT. 0) THEN 1078 IF ( MYCOL .NE. 0 ) THEN 1140 IF ( MYCOL .NE. 0 ) THEN 1157 IF( MYCOL .GT. 0) THEN 1436 IF( MYCOL .GT. 0) THEN [all …]
|
H A D | pcpbtrf.f | 647 IF ( MYCOL .EQ. 0 ) THEN 687 IF( MYCOL .GT. 0 ) THEN 720 INFO = MYCOL+1 838 IF( MYCOL.EQ.0 ) THEN 867 IF( (MOD( MYCOL+1, 2 ) .EQ. 0) .AND. ( MYCOL .GT. 0 ) ) THEN 890 $ MYCOL+1 ) 960 COMM_PROC = MYCOL + 1 1114 INFO = MYCOL+1 1226 IF( MYCOL.EQ.0 ) THEN 1255 IF( (MOD( MYCOL+1, 2 ) .EQ. 0) .AND. ( MYCOL .GT. 0 ) ) THEN [all …]
|
H A D | pspbtrf.f | 581 IF( MYCOL.LT.CSRC ) THEN 636 IF( MYCOL.EQ.0 ) THEN 648 IF( MYCOL.LT.NP-1 ) THEN 676 IF( MYCOL.GT.0 ) THEN 708 INFO = MYCOL + 1 755 IF( MYCOL.NE.0 ) THEN 826 IF( MYCOL.EQ.0 ) THEN 855 IF( ( MOD( MYCOL+1, 2 ).EQ.0 ) .AND. ( MYCOL.GT.0 ) ) THEN 1092 INFO = MYCOL + 1 1231 IF( ( MOD( MYCOL+1, 2 ).EQ.0 ) .AND. ( MYCOL.GT.0 ) ) THEN [all …]
|
H A D | pdpbtrf.f | 581 IF( MYCOL.LT.CSRC ) THEN 636 IF( MYCOL.EQ.0 ) THEN 648 IF( MYCOL.LT.NP-1 ) THEN 676 IF( MYCOL.GT.0 ) THEN 708 INFO = MYCOL + 1 755 IF( MYCOL.NE.0 ) THEN 826 IF( MYCOL.EQ.0 ) THEN 855 IF( ( MOD( MYCOL+1, 2 ).EQ.0 ) .AND. ( MYCOL.GT.0 ) ) THEN 1092 INFO = MYCOL + 1 1231 IF( ( MOD( MYCOL+1, 2 ).EQ.0 ) .AND. ( MYCOL.GT.0 ) ) THEN [all …]
|
H A D | pcdttrsv.f | 676 IF ( MYCOL .LT. CSRC ) THEN 732 IF ( MYCOL .EQ. 0 ) THEN 740 IF ( MYCOL .LT. NP-1 ) THEN 781 IF ( MYCOL .NE. 0 ) THEN 798 IF( MYCOL .GT. 0) THEN 1079 IF( MYCOL .GT. 0) THEN 1093 IF ( MYCOL .NE. 0 ) THEN 1155 IF ( MYCOL .NE. 0 ) THEN 1173 IF( MYCOL .GT. 0) THEN 1454 IF( MYCOL .GT. 0) THEN [all …]
|
H A D | pcpbtrsv.f | 669 IF ( MYCOL .LT. CSRC ) THEN 725 IF ( MYCOL .EQ. 0 ) THEN 737 IF ( MYCOL .LT. NP-1 ) THEN 786 IF ( MYCOL .NE. 0 ) THEN 803 IF( MYCOL .GT. 0) THEN 1082 IF( MYCOL .GT. 0) THEN 1096 IF ( MYCOL .NE. 0 ) THEN 1182 IF ( MYCOL .NE. 0 ) THEN 1199 IF( MYCOL .GT. 0) THEN 1478 IF( MYCOL .GT. 0) THEN [all …]
|
H A D | pddttrsv.f | 669 IF( MYCOL.LT.CSRC ) THEN 725 IF( MYCOL.EQ.0 ) THEN 733 IF( MYCOL.LT.NP-1 ) THEN 775 IF( MYCOL.NE.0 ) THEN 792 IF( MYCOL.GT.0 ) THEN 1057 IF( MYCOL.GT.0 ) THEN 1070 IF( MYCOL.NE.0 ) THEN 1134 IF( MYCOL.NE.0 ) THEN 1152 IF( MYCOL.GT.0 ) THEN 1417 IF( MYCOL.GT.0 ) THEN [all …]
|
H A D | pdpbtrsv.f | 662 IF( MYCOL.LT.CSRC ) THEN 718 IF( MYCOL.EQ.0 ) THEN 730 IF( MYCOL.LT.NP-1 ) THEN 778 IF( MYCOL.NE.0 ) THEN 795 IF( MYCOL.GT.0 ) THEN 1056 IF( MYCOL.GT.0 ) THEN 1069 IF( MYCOL.NE.0 ) THEN 1152 IF( MYCOL.NE.0 ) THEN 1169 IF( MYCOL.GT.0 ) THEN 1430 IF( MYCOL.GT.0 ) THEN [all …]
|
H A D | pspbtrsv.f | 661 IF( MYCOL.LT.CSRC ) THEN 717 IF( MYCOL.EQ.0 ) THEN 729 IF( MYCOL.LT.NP-1 ) THEN 777 IF( MYCOL.NE.0 ) THEN 794 IF( MYCOL.GT.0 ) THEN 1055 IF( MYCOL.GT.0 ) THEN 1068 IF( MYCOL.NE.0 ) THEN 1151 IF( MYCOL.NE.0 ) THEN 1168 IF( MYCOL.GT.0 ) THEN 1429 IF( MYCOL.GT.0 ) THEN [all …]
|
H A D | pzpbtrsv.f | 669 IF ( MYCOL .LT. CSRC ) THEN 725 IF ( MYCOL .EQ. 0 ) THEN 737 IF ( MYCOL .LT. NP-1 ) THEN 786 IF ( MYCOL .NE. 0 ) THEN 803 IF( MYCOL .GT. 0) THEN 1082 IF( MYCOL .GT. 0) THEN 1096 IF ( MYCOL .NE. 0 ) THEN 1182 IF ( MYCOL .NE. 0 ) THEN 1199 IF( MYCOL .GT. 0) THEN 1478 IF( MYCOL .GT. 0) THEN [all …]
|
H A D | psdttrsv.f | 669 IF( MYCOL.LT.CSRC ) THEN 725 IF( MYCOL.EQ.0 ) THEN 733 IF( MYCOL.LT.NP-1 ) THEN 775 IF( MYCOL.NE.0 ) THEN 792 IF( MYCOL.GT.0 ) THEN 1057 IF( MYCOL.GT.0 ) THEN 1070 IF( MYCOL.NE.0 ) THEN 1134 IF( MYCOL.NE.0 ) THEN 1152 IF( MYCOL.GT.0 ) THEN 1417 IF( MYCOL.GT.0 ) THEN [all …]
|
H A D | psdbtrsv.f | 673 IF( MYCOL.LT.CSRC ) THEN 729 IF( MYCOL.EQ.0 ) THEN 741 IF( MYCOL.LT.NP-1 ) THEN 799 IF( MYCOL.NE.0 ) THEN 818 IF( MYCOL.GT.0 ) THEN 1081 IF( MYCOL.GT.0 ) THEN 1094 IF( MYCOL.NE.0 ) THEN 1185 IF( MYCOL.NE.0 ) THEN 1202 IF( MYCOL.GT.0 ) THEN 1467 IF( MYCOL.GT.0 ) THEN [all …]
|
H A D | pddbtrsv.f | 673 IF( MYCOL.LT.CSRC ) THEN 729 IF( MYCOL.EQ.0 ) THEN 741 IF( MYCOL.LT.NP-1 ) THEN 799 IF( MYCOL.NE.0 ) THEN 818 IF( MYCOL.GT.0 ) THEN 1081 IF( MYCOL.GT.0 ) THEN 1094 IF( MYCOL.NE.0 ) THEN 1185 IF( MYCOL.NE.0 ) THEN 1202 IF( MYCOL.GT.0 ) THEN 1467 IF( MYCOL.GT.0 ) THEN [all …]
|
H A D | pcdbtrsv.f | 680 IF ( MYCOL .LT. CSRC ) THEN 736 IF ( MYCOL .EQ. 0 ) THEN 748 IF ( MYCOL .LT. NP-1 ) THEN 807 IF ( MYCOL .NE. 0 ) THEN 824 IF( MYCOL .GT. 0) THEN 1105 IF( MYCOL .GT. 0) THEN 1119 IF ( MYCOL .NE. 0 ) THEN 1211 IF ( MYCOL .NE. 0 ) THEN 1228 IF( MYCOL .GT. 0) THEN 1511 IF( MYCOL .GT. 0) THEN [all …]
|
H A D | pzdbtrsv.f | 680 IF ( MYCOL .LT. CSRC ) THEN 736 IF ( MYCOL .EQ. 0 ) THEN 748 IF ( MYCOL .LT. NP-1 ) THEN 807 IF ( MYCOL .NE. 0 ) THEN 824 IF( MYCOL .GT. 0) THEN 1105 IF( MYCOL .GT. 0) THEN 1119 IF ( MYCOL .NE. 0 ) THEN 1211 IF ( MYCOL .NE. 0 ) THEN 1228 IF( MYCOL .GT. 0) THEN 1511 IF( MYCOL .GT. 0) THEN [all …]
|
H A D | pddttrf.f | 564 IF( MYCOL.LT.CSRC ) THEN 619 IF( MYCOL.EQ.0 ) THEN 627 IF( MYCOL.LT.NP-1 ) THEN 650 IF( MYCOL.LT.NP-1 ) THEN 669 INFO = MYCOL + 1 674 IF( MYCOL.LT.NP-1 ) THEN 702 IF( MYCOL.NE.0 ) THEN 768 IF( MYCOL.EQ.0 ) THEN 797 IF( ( MOD( MYCOL+1, 2 ).EQ.0 ) .AND. ( MYCOL.GT.0 ) ) THEN 869 INFO = NPCOL + MYCOL [all …]
|
H A D | psdttrf.f | 564 IF( MYCOL.LT.CSRC ) THEN 619 IF( MYCOL.EQ.0 ) THEN 627 IF( MYCOL.LT.NP-1 ) THEN 650 IF( MYCOL.LT.NP-1 ) THEN 669 INFO = MYCOL + 1 674 IF( MYCOL.LT.NP-1 ) THEN 702 IF( MYCOL.NE.0 ) THEN 768 IF( MYCOL.EQ.0 ) THEN 797 IF( ( MOD( MYCOL+1, 2 ).EQ.0 ) .AND. ( MYCOL.GT.0 ) ) THEN 869 INFO = NPCOL + MYCOL [all …]
|
/dports/math/scalapack/scalapack-2.1.0/TESTING/LIN/ |
H A D | pcdbmv1.f | 537 IF ( MYCOL .LT. CSRC ) THEN 591 IF ( MYCOL .EQ. 0 ) THEN 603 IF ( MYCOL .LT. NP-1 ) THEN 633 IF( MYCOL .GT. 0 ) THEN 646 IF( MYCOL .LT. NPCOL-1 ) THEN 695 IF ( MYCOL .GT. 0 ) THEN 769 IF( MYCOL .GT. 0 ) THEN 782 IF( MYCOL .LT. NPCOL-1 ) THEN 796 IF( MYCOL .GT. 0 ) THEN 813 IF( MYCOL .LT. NPCOL-1 ) THEN [all …]
|
H A D | pddbmv1.f | 536 IF ( MYCOL .LT. CSRC ) THEN 590 IF ( MYCOL .EQ. 0 ) THEN 602 IF ( MYCOL .LT. NP-1 ) THEN 632 IF( MYCOL .GT. 0 ) THEN 645 IF( MYCOL .LT. NPCOL-1 ) THEN 694 IF ( MYCOL .GT. 0 ) THEN 768 IF( MYCOL .GT. 0 ) THEN 781 IF( MYCOL .LT. NPCOL-1 ) THEN 795 IF( MYCOL .GT. 0 ) THEN 812 IF( MYCOL .LT. NPCOL-1 ) THEN [all …]
|
H A D | pdgbmv1.f | 536 IF ( MYCOL .LT. CSRC ) THEN 590 IF ( MYCOL .EQ. 0 ) THEN 602 IF ( MYCOL .LT. NP-1 ) THEN 632 IF( MYCOL .GT. 0 ) THEN 645 IF( MYCOL .LT. NPCOL-1 ) THEN 694 IF ( MYCOL .GT. 0 ) THEN 768 IF( MYCOL .GT. 0 ) THEN 781 IF( MYCOL .LT. NPCOL-1 ) THEN 795 IF( MYCOL .GT. 0 ) THEN 812 IF( MYCOL .LT. NPCOL-1 ) THEN [all …]
|
H A D | pzdbmv1.f | 537 IF ( MYCOL .LT. CSRC ) THEN 591 IF ( MYCOL .EQ. 0 ) THEN 603 IF ( MYCOL .LT. NP-1 ) THEN 633 IF( MYCOL .GT. 0 ) THEN 646 IF( MYCOL .LT. NPCOL-1 ) THEN 695 IF ( MYCOL .GT. 0 ) THEN 769 IF( MYCOL .GT. 0 ) THEN 782 IF( MYCOL .LT. NPCOL-1 ) THEN 796 IF( MYCOL .GT. 0 ) THEN 813 IF( MYCOL .LT. NPCOL-1 ) THEN [all …]
|
H A D | pcgbmv1.f | 537 IF ( MYCOL .LT. CSRC ) THEN 591 IF ( MYCOL .EQ. 0 ) THEN 603 IF ( MYCOL .LT. NP-1 ) THEN 633 IF( MYCOL .GT. 0 ) THEN 646 IF( MYCOL .LT. NPCOL-1 ) THEN 695 IF ( MYCOL .GT. 0 ) THEN 769 IF( MYCOL .GT. 0 ) THEN 782 IF( MYCOL .LT. NPCOL-1 ) THEN 796 IF( MYCOL .GT. 0 ) THEN 813 IF( MYCOL .LT. NPCOL-1 ) THEN [all …]
|