JGonzalez/fpakc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Output ready

Browse source 
Output for Gmsh2 ready.

Unfortunatly, code repetition was required.
This commit is contained in:
Jorge Gonzalez 2022-12-14 18:30:14 +01:00
commit c5c4cbefbf
5 changed files with 106 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/modules/mesh/inout/gmsh2/moduleMeshInputGmsh2.f90
View file

@ -13,9 +13,10 @@ MODULE moduleMeshInputGmsh2
IF (ASSOCIATED(meshForMCC, self)) self%printColl => printCollGmsh2
SELECT TYPE(self)
TYPE IS(meshParticles)
self%printOutput => printOutputGmsh2
self%printEM => printEMGmsh2
self%readInitial => readInitialGmsh2
self%printOutput => printOutputGmsh2
self%printEM => printEMGmsh2
self%readInitial => readInitialGmsh2
self%printAverage => printAverageGmsh2
END SELECT
self%readMesh => readGmsh2