/dports/math/gap/gap-4.11.0/pkg/hap-1.25/tst/examples/ |
H A D | 2.1.6 | 10 Print(BoundaryMatrix(C,1)*BoundaryMatrix(C,2),"\n");
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/ |
H A D | AdvectionDiffusion.F90 | 1544 REAL(KIND=dp) :: BoundaryMatrix(:,:), Ratio local 1563 BoundaryMatrix = 0.0D0 1626 BoundaryMatrix(p,q) = BoundaryMatrix(p,q) + Ratio * & 1692 BoundaryMatrix = 0.0D0 1723 BoundaryMatrix(p,q) = BoundaryMatrix(p,q) + & 2242 REAL(KIND=dp) :: BoundaryMatrix(:,:), Ratio local 2262 BoundaryMatrix = 0.0D0 2333 BoundaryMatrix(p,q) = BoundaryMatrix(p,q) + Ratio * & 2375 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:) local 2401 BoundaryMatrix = 0.0D0 [all …]
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/modules/LevelSet/ |
H A D | LevelSetCurvature.F90 | 375 SUBROUTINE LocalBoundary( BoundaryMatrix, BoundaryVector, & 379 REAL(KIND=dp) :: BoundaryMatrix(:,:), BoundaryVector(:), Surf(:) local 397 BoundaryMatrix = 0.0d0 469 BoundaryMatrix(p,q) = BoundaryMatrix(p,q) + s * A
|
/dports/science/elmerfem/elmerfem-release-9.0/fem/src/ |
H A D | NavierStokes.F90 | 1483 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) = & 1484 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) + & 1489 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) = & 1490 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) + & 1577 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:), & local 1717 BoundaryMatrix(k1,k2) = BoundaryMatrix(k1,k2) - & 1720 BoundaryMatrix(k1,k2) = BoundaryMatrix(k1,k2) - & 1732 BoundaryMatrix(k1,k2) = BoundaryMatrix(k1,k2) + & 1784 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:), & local 1916 BoundaryMatrix(k1,k2) = BoundaryMatrix(k1,k2) + & [all …]
|
H A D | StressGeneral.F90 | 313 SUBROUTINE StressGeneralBoundary( BoundaryMatrix,BoundaryVector,LoadVector, & argument 316 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:) local 343 BoundaryMatrix = 0.0D0 405 BoundaryMatrix((p-1)*dim+i,(q-1)*dim+i) = & 406 BoundaryMatrix((p-1)*dim+i,(q-1)*dim+i) + &
|
H A D | Maxwell.F90 | 282 SUBROUTINE MaxwellBoundary( BoundaryMatrix,BoundaryVector,LoadVector, & argument 316 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:),LoadVector(:,:), & local 343 BoundaryMatrix = 0.0D0
|
H A D | DiffuseConvectiveGeneralAnisotropic.F90 | 527 SUBROUTINE DiffuseConvectiveGenBoundary( BoundaryMatrix,BoundaryVector, & argument 555 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:) local 581 BoundaryMatrix = 0.0D0 625 BoundaryMatrix(p,q) = BoundaryMatrix(p,q) + &
|
H A D | MaxwellAxiS.F90 | 296 SUBROUTINE MaxwellAxiSBoundary( BoundaryMatrix,BoundaryVector,LoadVector, & argument 330 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:),LoadVector(:,:), & local 357 BoundaryMatrix = 0.0D0
|
H A D | MaxwellGeneral.F90 | 348 SUBROUTINE MaxwellGeneralBoundary( BoundaryMatrix,BoundaryVector,LoadVector, & argument 382 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:),LoadVector(:,:), & local 411 BoundaryMatrix = 0.0D0
|
H A D | DiffuseConvectiveAnisotropic.F90 | 647 SUBROUTINE DiffuseConvectiveBoundary( BoundaryMatrix,BoundaryVector, & argument 675 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:), & local 699 BoundaryMatrix = 0.0D0 744 BoundaryMatrix(p,q) = BoundaryMatrix(p,q) + &
|
H A D | NavierStokesCylindrical.F90 | 902 SUBROUTINE NavierStokesCylindricalBoundary( BoundaryMatrix,BoundaryVector, & argument 939 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:),LoadVector(:,:), & local 976 BoundaryMatrix = 0.0_dp 1080 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) = & 1081 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) + & 1086 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) = & 1087 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) + &
|
H A D | NavierStokesGeneral.F90 | 646 SUBROUTINE NavierStokesGeneralBoundary( BoundaryMatrix,BoundaryVector, & argument 680 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:),LoadVector(:,:), & local 716 BoundaryMatrix = 0.0D0 793 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) = & 794 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) + s * SlipCoeff * Basis(q) * Basis(p)
|
/dports/science/elmerfem/elmerfem-release-9.0/elmerice/Solvers/ |
H A D | PorousSolve.F90 | 932 SUBROUTINE LocalMatrixBoundary( BoundaryMatrix, BoundaryVector, & 937 REAL(KIND=dp) :: BoundaryMatrix(:,:), BoundaryVector(:) local 964 BoundaryMatrix = 0.0D0 1028 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) = & 1029 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) + & 1034 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) = & 1035 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) + &
|
H A D | AIFlowSolve_nlD2.F90 | 1095 SUBROUTINE LocalMatrixBoundary( BoundaryMatrix, BoundaryVector, & 1101 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:) local 1130 BoundaryMatrix = 0.0D0 1209 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) = & 1210 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) + & 1215 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) = & 1216 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) + & 1229 BoundaryMatrix((p-1)*(dim+1)+i,(q-1)*(dim+1)+i) = & 1230 BoundaryMatrix((p-1)*(dim+1)+i,(q-1)*(dim+1)+i) + &
|
H A D | AIFlowSolve_nlS2.F90 | 1130 SUBROUTINE LocalMatrixBoundary( BoundaryMatrix, BoundaryVector, & 1136 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:) local 1165 BoundaryMatrix = 0.0D0 1244 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) = & 1245 BoundaryMatrix( (p-1)*c+j,(q-1)*c+k ) + & 1250 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) = & 1251 BoundaryMatrix( (p-1)*c+i,(q-1)*c+i ) + & 1264 BoundaryMatrix((p-1)*(dim+1)+i,(q-1)*(dim+1)+i) = & 1265 BoundaryMatrix((p-1)*(dim+1)+i,(q-1)*(dim+1)+i) + &
|
H A D | CaffeSolver.F90 | 1519 SUBROUTINE DiffuseConvectiveBoundaryCaffe( BoundaryMatrix,BoundaryVector, & 1553 REAL(KIND=dp) :: BoundaryMatrix(:,:),BoundaryVector(:), & local 1577 BoundaryMatrix = 0.0D0 1608 BoundaryMatrix(p,q) = BoundaryMatrix(p,q) + & 1937 SUBROUTINE FreeBoundaryCaffe( BoundaryMatrix, BoundaryVector, & 1940 … REAL(KIND=dp) :: BoundaryMatrix(:,:), BoundaryVector(:), LoadVector(:), Velo(:,:),MeshVelo(:,:) local 1956 BoundaryMatrix = 0.0d0 1994 BoundaryMatrix(p,q) = BoundaryMatrix(p,q) + s*Udotn*ParentBasis(q)*ParentBasis(p)
|
/dports/math/gap/gap-4.11.0/pkg/hap-1.25/lib/FpGmodules/ |
H A D | resfpgmod.gi | 21 BoundaryMatrix, 167 BoundaryMatrix:=function(k) #Returns the matrix of d_k:R_k->R_k-1 250 BndMat:=BoundaryMatrix(k); 323 BoundaryMatrices[i]:=TransposedMat(BoundaryMatrix(i)*one);
|
H A D | fpgbasics.gi | 13 BoundaryMatrix, 85 BoundaryMatrix:=function() #Returns the matrix of d_k:R_k->R_k-1 107 Mdule:=SemiEchelonMat(BoundaryMatrix()).vectors; 109 Mdule:=SemiEchelonMat(NullspaceMat(BoundaryMatrix())).vectors;
|
/dports/math/gap/gap-4.11.0/pkg/hap-1.25/lib/ResolutionsModP/ |
H A D | ranksPrimeGroup.gi | 20 BoundaryMatrix, 148 BoundaryMatrix:=function(k) #Returns the matrix of d_k:R_k->R_k-1 231 BndMat:=BoundaryMatrix(k);
|
H A D | resPrimeGroupSparse.gi | 21 BoundaryMatrix, 185 BoundaryMatrix:=function(k) #Returns the matrix of d_k:R_k->R_k-1 268 BndMat:=BoundaryMatrix(k); 346 BoundaryMatrices2[i]:=one*BoundaryMatrix(i);
|
H A D | resPrimeGroup.gi | 20 BoundaryMatrix, 185 BoundaryMatrix:=function(k) #Returns the matrix of d_k:R_k->R_k-1 268 BndMat:=BoundaryMatrix(k); 346 BoundaryMatrices2[i]:=one*BoundaryMatrix(i);
|
/dports/math/gap/gap-4.11.0/pkg/hap-1.25/lib/Functors/ |
H A D | homtint.new | 46 A:=BoundaryMatrix(C,n+1);
|
H A D | homtint.gi | 46 A:=BoundaryMatrix(C,n+1);
|
/dports/math/gap/gap-4.11.0/pkg/hap-1.25/lib/ArtinCoxeter/tuan/ |
H A D | crystGcomplex.gi | 540 Dimension,PairToTriple,BoundaryMatrix,Boundary, 599 BoundaryMatrix:=function(n,k) 619 Add(BoundaryRec[i],BoundaryMatrix(i,j)); 635 boundarymatrix:=BoundaryMatrix,
|
/dports/math/gap/gap-4.11.0/pkg/hap-1.25/lib/NonabelianTensor/ |
H A D | bogomolov.gi | 108 H2:=TransposedMat(BoundaryMatrix(ChQ,3)); 159 H2:=TransposedMat(BoundaryMatrix(ChG,3)); 211 HN:=TransposedMat(BoundaryMatrix(ChG,N+1)); 241 B:=TransposedMat(BoundaryMatrix(TensorWithIntegers(RA),N));
|