Searched refs:BoundaryPerm (Results 1 – 5 of 5) sorted by relevance
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/ |
H A D | PoissonBEM.F90 | 86 INTEGER, POINTER :: PotentialPerm(:), BoundaryPerm(:) local 98 PotentialKnown, PotentialPerm, BoundaryPerm, BoundaryNodes, Pot, Flx 126 BoundaryPerm(Solver % Mesh % NumberOfNodes), STAT=istat) 133 BoundaryPerm = 0 146 BoundaryPerm(BoundaryNodes) = k 256 ForceVector(i) = ForceVector(i) + VolumeForce(BoundaryPerm(i)) 317 k = Solver % Variable % Perm( BoundaryPerm(i) ) 325 k = Var % Perm( BoundaryPerm(i) ) 481 k = BoundaryPerm(p)
|
H A D | HelmholtzBEM.F90 | 77 INTEGER, POINTER :: PotentialPerm(:), BoundaryPerm(:) local 87 PotentialKnown, PotentialPerm, BoundaryPerm, BoundaryNodes, & 106 BoundaryPerm( Solver % Mesh % NumberOfNodes ), STAT=istat) 113 BoundaryPerm = 0 126 BoundaryPerm(BoundaryNodes) = k 292 Potential(BoundaryPerm(i)) = Pot(i) 324 k = BoundaryPerm(i) 408 k = BoundaryPerm(p)
|
H A D | DataToFieldSolver.F90 | 327 INTEGER, POINTER :: BoundaryPerm(:), Indexes(:) local 346 BoundaryPerm, BoundaryNodes, DataDiffusivity 381 ALLOCATE( BoundaryPerm(n) ) 382 BoundaryPerm = 0 387 .FALSE., BoundaryPerm, BoundaryNodes ) 446 IF( BoundaryPerm( Indexes(i) ) > 0 ) CYCLE
|
H A D | OpenFoam2ElmerIO.F90 | 556 INTEGER, POINTER :: BoundaryPerm(:), Indexes(:) local
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/ |
H A D | SolverUtils.F90 | 2553 INTEGER, POINTER :: BoundaryPerm(:), Indexes(:) local 2562 ALLOCATE( BoundaryPerm(Mesh % NumberOfNodes) ) 2563 BoundaryPerm = 0 2586 BoundaryPerm( Element % NodeIndexes ) = 1 2596 IF( BoundaryPerm(i) > 0 ) THEN 2598 BoundaryPerm(i) = j 16625 INTEGER, POINTER :: BoundaryPerm(:), Indexes(:) local 16646 ALLOCATE( BoundaryPerm(n) ) 16647 BoundaryPerm = 0 16651 .FALSE., BoundaryPerm, BoundaryNodes ) [all …]
|