Searched refs:Invp (Results 1 – 7 of 7) sorted by relevance
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/hecmw1/src/solver/solver_direct/ |
H A D | hecmw_ordering_metis.F90 | 22 subroutine hecmw_ordering_metis_NodeND(Neqns,Xadj,Adj0,Perm,Invp) argument 29 integer(kind=kint), intent(out):: Invp(:) local 48 call METIS_NodeND(Neqns,Xadj,Adj0,vwght,options,Perm,Invp) 60 call METIS_NodeND(Neqns,Xadj,Adj0,numflag,options,Perm,Invp)
|
H A D | hecmw_ordering.F90 | 30 subroutine hecmw_ordering_gen(Neqns,Nttbr,Xadj,Adj0,Perm,Invp,opt,loglevel) argument 43 integer(kind=kint), intent(out):: Invp(:) local 60 call hecmw_ordering_GENQMD(Neqns,Nttbr,Xadj,Adj0,Perm,Invp) 63 call hecmw_ordering_METIS_NodeND(Neqns,Xadj,Adj0,Perm,Invp) 66 call hecmw_ordering_GENRCM(Neqns,Xadj,Adj0,Perm,Invp)
|
H A D | hecmw_ordering_rcm.f90 | 19 subroutine hecmw_ordering_GENRCM(Neqns,Xadj,Adj0,Perm,Invp) argument 26 integer(kind=kint), intent(out):: Invp(:) local
|
H A D | hecmw_ordering_qmd.f90 | 22 subroutine hecmw_ordering_GENQMD(Neqns,Nttbr,Xadj,Adj0,Perm,Invp) argument 30 integer(kind=kint), intent(out):: Invp(:) local 76 Invp(node) = node 113 np = Invp(nxnode) 116 Invp(ip) = np 118 Invp(nxnode) = num 134 search = Invp(inode)
|
H A D | _unused_code.f90 | 103 INTEGER :: Invp(*) local 110 READ (5,*) Invp(i) 111 IF ( Invp(i)==0 ) THEN 113 Invp(i) = i 117 ELSEIF ( Invp(i)<0 ) THEN 118 READ (11,*) (Invp(i),i=1,Neqns) 120 Iperm(Invp(i)) = i 128 Iperm(Invp(i)) = i
|
H A D | hecmw_solver_direct.f90 | 1092 ib0 = Invp(Izz) 1098 Invp(Izz) = ibp 1099 Invp(izzp) = ib0 1104 if ( Invp(Iperm(i))/=i .or. Iperm(Invp(i))/=i) then 1160 izzz = Invp(Izz) 1462 ii = Invp(I) 1463 jj = Invp(J) 1578 ii = Invp(I) 1579 jj = Invp(J) 1675 ii = Invp(I) [all …]
|
/dports/math/testu01/TestU01-1.2.3/testu01/ |
H A D | snpair.c | 108 double Invp; /* 1/p; ( = 1 if p = 0) */ member 279 dist = pow (distp, work->Invp); in snpair_DistanceCP() 706 work->dlim = pow (work->dlimp, work->Invp); in Setdlim() 1474 work->Invp = 1.0 / work->pLR; in snpair_ClosePairs() 2322 work->Invp = 1.0 / work->pLR; in snpair_BickelBreiman() 2551 work->Invp = work->pLR = work->pp = 1; in snpair_ClosePairsBitMatch()
|