Searched refs:PermIndexes (Results 1 – 3 of 3) sorted by relevance
490 INTEGER :: PermIndexes(Model % MaxElementNodes) local556 PermIndexes = Var % Perm( DofIndexes )558 PermIndexes = DofIndexes561 IF ( ANY(PermIndexes == 0 ) ) CYCLE 607 func = SUM( Var % Values(PermIndexes(1:n)) * Basis(1:n) )611 func = ABS( SUM( Var % Values(PermIndexes(1:n)) * Basis(1:n) ) )616 Grad(j) = SUM( dBasisdx(1:n,j) * Var % Values(PermIndexes(1:n) ) )621 func = SUM( Var % Values(PermIndexes(1:n)) * Basis(1:n) )624 func = SUM( Var % Values(PermIndexes(1:n)) * Basis(1:n) )629 func = SUM( Var % Values(NoDofs*(PermIndexes(1:n)-1)+j) * Basis(1:n) )[all …]
3457 INTEGER, POINTER CONTIG :: Indexes(:), PermIndexes(:)3535 PermIndexes => GetVecIndexStore()3539 PermIndexes(j) = Solver % Variable % Perm(Indexes(j))3543 x % DOFs, PermIndexes, &
2022 INTEGER, POINTER :: NodeIndexes(:), PermIndexes(:) local2059 PermIndexes => Element % DgIndexes2061 PermIndexes => Element % NodeIndexes2064 IF ( ANY(Var % Perm(PermIndexes) == 0 ) ) CYCLE 2300 INTEGER, POINTER :: ParentIndexes(:), PermIndexes(:) local2406 PermIndexes(1:n) = Var % Perm(NodeIndexes(1:n))2407 IF (ANY( PermIndexes(1:n) == 0)) CYCLE2409 PermIndexes(1:n) = NodeIndexes(1:n) 2958 PermIndexes(1:pn) = Var % Perm(ParentIndexes(1:pn))2959 IF (ANY( PermIndexes(1:pn) == 0)) CYCLE[all …]