Home
last modified time | relevance | path

Searched refs:VALPIV (Results 1 – 25 of 36) sorted by relevance

12

/dports/math/mumps/mumps-5.1.2/src/
H A Dcfac_front_aux.F252 COMPLEX VALPIV local
286 VALPIV = ONE/A(APOS)
309 COMPLEX ALPHA,VALPIV local
332 VALPIV = ONE/A(APOS)
357 A(LPOS) = A(LPOS)*VALPIV
380 A(LPOS) = A(LPOS)*VALPIV
546 COMPLEX :: VALPIV local
565 VALPIV = ONE/A(APOS)
1391 COMPLEX VALPIV local
1425 VALPIV = ONE/A(APOS)
[all …]
H A Dsfac_front_aux.F252 REAL VALPIV local
286 VALPIV = ONE/A(APOS)
309 REAL ALPHA,VALPIV local
332 VALPIV = ONE/A(APOS)
357 A(LPOS) = A(LPOS)*VALPIV
380 A(LPOS) = A(LPOS)*VALPIV
546 REAL :: VALPIV local
565 VALPIV = ONE/A(APOS)
1400 REAL VALPIV local
1434 VALPIV = ONE/A(APOS)
[all …]
H A Ddfac_front_aux.F252 DOUBLE PRECISION VALPIV local
286 VALPIV = ONE/A(APOS)
289 A(LPOS) = A(LPOS)*VALPIV
309 DOUBLE PRECISION ALPHA,VALPIV local
332 VALPIV = ONE/A(APOS)
357 A(LPOS) = A(LPOS)*VALPIV
380 A(LPOS) = A(LPOS)*VALPIV
546 DOUBLE PRECISION :: VALPIV local
565 VALPIV = ONE/A(APOS)
1400 DOUBLE PRECISION VALPIV local
[all …]
H A Dzfac_front_aux.F252 COMPLEX(kind=8) VALPIV local
286 VALPIV = ONE/A(APOS)
289 A(LPOS) = A(LPOS)*VALPIV
309 COMPLEX(kind=8) ALPHA,VALPIV local
332 VALPIV = ONE/A(APOS)
357 A(LPOS) = A(LPOS)*VALPIV
380 A(LPOS) = A(LPOS)*VALPIV
546 COMPLEX(kind=8) :: VALPIV local
565 VALPIV = ONE/A(APOS)
1391 COMPLEX(kind=8) VALPIV local
[all …]
H A Dzfac_front_type2_aux.F472 COMPLEX(kind=8) VALPIV local
502 VALPIV = ONE/A(APOS)
507 A(K1POS) = A(K1POS) * VALPIV
521 A(K1POS) = A(K1POS) * VALPIV
529 A(APOSMAX) = A(APOSMAX) * abs(VALPIV)
H A Dcfac_front_type2_aux.F472 COMPLEX VALPIV local
502 VALPIV = ONE/A(APOS)
507 A(K1POS) = A(K1POS) * VALPIV
521 A(K1POS) = A(K1POS) * VALPIV
529 A(APOSMAX) = A(APOSMAX) * abs(VALPIV)
H A Ddfac_front_type2_aux.F480 DOUBLE PRECISION VALPIV local
510 VALPIV = ONE/A(APOS)
515 A(K1POS) = A(K1POS) * VALPIV
529 A(K1POS) = A(K1POS) * VALPIV
537 A(APOSMAX) = A(APOSMAX) * abs(VALPIV)
H A Dsfac_front_type2_aux.F480 REAL VALPIV local
510 VALPIV = ONE/A(APOS)
515 A(K1POS) = A(K1POS) * VALPIV
529 A(K1POS) = A(K1POS) * VALPIV
537 A(APOSMAX) = A(APOSMAX) * abs(VALPIV)
H A Dcsol_fwd_aux.F402 COMPLEX VALPIV, A11, A22, A12, DETPIV local
945 VALPIV = ONE/A( APOS1 )
949 & WCB( IFR8+(K-JBDEB)*LD_WCBPIV ) * VALPIV
952 & WCB( IFR8+(K-JBDEB)*LD_WCBPIV ) * VALPIV
1030 VALPIV = ONE/A( APOS1 )
1033 & WCB( IFR8 ) * VALPIV
1036 & WCB( IFR8 ) * VALPIV
H A Ddsol_fwd_aux.F402 DOUBLE PRECISION VALPIV, A11, A22, A12, DETPIV local
943 VALPIV = ONE/A( APOS1 )
947 & WCB( IFR8+(K-JBDEB)*LD_WCBPIV ) * VALPIV
950 & WCB( IFR8+(K-JBDEB)*LD_WCBPIV ) * VALPIV
1028 VALPIV = ONE/A( APOS1 )
1031 & WCB( IFR8 ) * VALPIV
1034 & WCB( IFR8 ) * VALPIV
H A Dssol_fwd_aux.F402 REAL VALPIV, A11, A22, A12, DETPIV local
943 VALPIV = ONE/A( APOS1 )
947 & WCB( IFR8+(K-JBDEB)*LD_WCBPIV ) * VALPIV
950 & WCB( IFR8+(K-JBDEB)*LD_WCBPIV ) * VALPIV
1028 VALPIV = ONE/A( APOS1 )
1031 & WCB( IFR8 ) * VALPIV
1034 & WCB( IFR8 ) * VALPIV
H A Dzsol_fwd_aux.F402 COMPLEX(kind=8) VALPIV, A11, A22, A12, DETPIV local
945 VALPIV = ONE/A( APOS1 )
949 & WCB( IFR8+(K-JBDEB)*LD_WCBPIV ) * VALPIV
952 & WCB( IFR8+(K-JBDEB)*LD_WCBPIV ) * VALPIV
1030 VALPIV = ONE/A( APOS1 )
1033 & WCB( IFR8 ) * VALPIV
1036 & WCB( IFR8 ) * VALPIV
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/
H A Dzmumps_part6.F770 COMPLEX(kind=8) VALPIV
812 VALPIV = ONE/A(APOS)
813 A(APOS) = VALPIV
849 A(K1POS) = A(K1POS) * VALPIV
943 COMPLEX(kind=8) VALPIV
949 VALPIV = ONE/A(APOS)
950 A(APOS) = VALPIV
958 A(LPOS) = VALPIV*A(LPOS)
2783 COMPLEX(kind=8) VALPIV
2824 VALPIV = ONE/A(APOS)
[all …]
H A Dsmumps_part6.F780 REAL VALPIV
822 VALPIV = ONE/A(APOS)
823 A(APOS) = VALPIV
859 A(K1POS) = A(K1POS) * VALPIV
953 REAL VALPIV
959 VALPIV = ONE/A(APOS)
960 A(APOS) = VALPIV
968 A(LPOS) = VALPIV*A(LPOS)
2801 REAL VALPIV
2842 VALPIV = ONE/A(APOS)
[all …]
H A Dcmumps_part6.F770 COMPLEX VALPIV
812 VALPIV = ONE/A(APOS)
813 A(APOS) = VALPIV
849 A(K1POS) = A(K1POS) * VALPIV
943 COMPLEX VALPIV
949 VALPIV = ONE/A(APOS)
950 A(APOS) = VALPIV
958 A(LPOS) = VALPIV*A(LPOS)
2783 COMPLEX VALPIV
2824 VALPIV = ONE/A(APOS)
[all …]
H A Ddmumps_part6.F780 DOUBLE PRECISION VALPIV
822 VALPIV = ONE/A(APOS)
823 A(APOS) = VALPIV
859 A(K1POS) = A(K1POS) * VALPIV
953 DOUBLE PRECISION VALPIV
959 VALPIV = ONE/A(APOS)
960 A(APOS) = VALPIV
968 A(LPOS) = VALPIV*A(LPOS)
2801 DOUBLE PRECISION VALPIV
2842 VALPIV = ONE/A(APOS)
[all …]
H A Dcmumps_part4.F1583 COMPLEX VALPIV
1617 VALPIV = ONE/A(APOS)
1620 A(LPOS) = A(LPOS)*VALPIV
1637 COMPLEX ALPHA,VALPIV
1649 VALPIV = ONE/A(APOS)
1652 A(LPOS) = VALPIV*A(LPOS)
1673 COMPLEX ALPHA,VALPIV
1688 VALPIV = ONE/A(APOS)
1691 A(LPOS) = A(LPOS)*VALPIV
/dports/math/coinmumps/MUMPS_4.10.0/src/
H A Ddmumps_part6.F780 DOUBLE PRECISION VALPIV
822 VALPIV = ONE/A(APOS)
823 A(APOS) = VALPIV
859 A(K1POS) = A(K1POS) * VALPIV
953 DOUBLE PRECISION VALPIV
959 VALPIV = ONE/A(APOS)
960 A(APOS) = VALPIV
968 A(LPOS) = VALPIV*A(LPOS)
2801 DOUBLE PRECISION VALPIV
2842 VALPIV = ONE/A(APOS)
[all …]
H A Dzmumps_part6.F770 COMPLEX(kind=8) VALPIV
812 VALPIV = ONE/A(APOS)
813 A(APOS) = VALPIV
849 A(K1POS) = A(K1POS) * VALPIV
943 COMPLEX(kind=8) VALPIV
949 VALPIV = ONE/A(APOS)
950 A(APOS) = VALPIV
958 A(LPOS) = VALPIV*A(LPOS)
2783 COMPLEX(kind=8) VALPIV
2824 VALPIV = ONE/A(APOS)
[all …]
H A Dcmumps_part6.F770 COMPLEX VALPIV
812 VALPIV = ONE/A(APOS)
813 A(APOS) = VALPIV
849 A(K1POS) = A(K1POS) * VALPIV
943 COMPLEX VALPIV
949 VALPIV = ONE/A(APOS)
950 A(APOS) = VALPIV
958 A(LPOS) = VALPIV*A(LPOS)
2783 COMPLEX VALPIV
2824 VALPIV = ONE/A(APOS)
[all …]
H A Dsmumps_part6.F780 REAL VALPIV
822 VALPIV = ONE/A(APOS)
823 A(APOS) = VALPIV
859 A(K1POS) = A(K1POS) * VALPIV
953 REAL VALPIV
959 VALPIV = ONE/A(APOS)
960 A(APOS) = VALPIV
968 A(LPOS) = VALPIV*A(LPOS)
2801 REAL VALPIV
2842 VALPIV = ONE/A(APOS)
[all …]
/dports/math/mumps4/MUMPS_4.10.0/src/
H A Ddmumps_part6.F780 DOUBLE PRECISION VALPIV local
822 VALPIV = ONE/A(APOS)
823 A(APOS) = VALPIV
859 A(K1POS) = A(K1POS) * VALPIV
953 DOUBLE PRECISION VALPIV local
959 VALPIV = ONE/A(APOS)
960 A(APOS) = VALPIV
968 A(LPOS) = VALPIV*A(LPOS)
2801 DOUBLE PRECISION VALPIV local
2842 VALPIV = ONE/A(APOS)
[all …]
H A Dzmumps_part6.F770 COMPLEX(kind=8) VALPIV local
812 VALPIV = ONE/A(APOS)
813 A(APOS) = VALPIV
849 A(K1POS) = A(K1POS) * VALPIV
943 COMPLEX(kind=8) VALPIV local
949 VALPIV = ONE/A(APOS)
950 A(APOS) = VALPIV
958 A(LPOS) = VALPIV*A(LPOS)
2783 COMPLEX(kind=8) VALPIV local
2824 VALPIV = ONE/A(APOS)
[all …]
H A Dcmumps_part6.F770 COMPLEX VALPIV local
812 VALPIV = ONE/A(APOS)
813 A(APOS) = VALPIV
849 A(K1POS) = A(K1POS) * VALPIV
943 COMPLEX VALPIV local
949 VALPIV = ONE/A(APOS)
950 A(APOS) = VALPIV
958 A(LPOS) = VALPIV*A(LPOS)
2783 COMPLEX VALPIV local
2824 VALPIV = ONE/A(APOS)
[all …]
H A Dsmumps_part6.F780 REAL VALPIV local
822 VALPIV = ONE/A(APOS)
823 A(APOS) = VALPIV
859 A(K1POS) = A(K1POS) * VALPIV
953 REAL VALPIV local
959 VALPIV = ONE/A(APOS)
960 A(APOS) = VALPIV
968 A(LPOS) = VALPIV*A(LPOS)
2801 REAL VALPIV local
2842 VALPIV = ONE/A(APOS)
[all …]

12