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

Correction on collection file

Browse source 
The extension of the collection file has to be .pvd so that ParaView
properly reads it.
This commit is contained in:
Jorge Gonzalez 2023-02-04 08:54:36 +01:00
commit ceab516a5b
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/modules/mesh/inout/vtk/moduleMeshOutputVTK.f90
View file

@ -181,7 +181,7 @@ MODULE moduleMeshOutputVTK
WRITE(*, "(6X,A15,A)") "Creating file: ", fileName WRITE(*, "(6X,A15,A)") "Creating file: ", fileName
OPEN (fileID, file = path // folder // '/' // fileName) OPEN (fileID, file = path // folder // '/' // fileName)
fileNameCollection = 'OUTPUT_Collection_' // species(i)%obj%name // '.vtu' fileNameCollection = 'OUTPUT_Collection_' // species(i)%obj%name // '.pvd'
IF (t == tInitial) THEN IF (t == tInitial) THEN
!Create collection file !Create collection file
WRITE(*, "(6X,A15,A)") "Creating file: ", fileNameCollection WRITE(*, "(6X,A15,A)") "Creating file: ", fileNameCollection
@ -192,9 +192,11 @@ MODULE moduleMeshOutputVTK
END IF END IF
!Write iteration file in collection
OPEN (fileID + 1, file = path // folder // '/' // fileNameCollection, ACCESS='APPEND') OPEN (fileID + 1, file = path // folder // '/' // fileNameCollection, ACCESS='APPEND')
WRITE(fileID + 1, "(4X, A, ES20.6E3, A, A, A)"), '<DataSet timestep="', t*ti_ref,'" file="', fileName,'"/>' WRITE(fileID + 1, "(4X, A, ES20.6E3, A, A, A)"), '<DataSet timestep="', t*ti_ref,'" file="', fileName,'"/>'
!Close collection file
IF (t == tFinal) THEN IF (t == tFinal) THEN
WRITE (fileID + 1, "(2X, A)") '</Collection>' WRITE (fileID + 1, "(2X, A)") '</Collection>'
WRITE (fileID + 1, "(A)") '</VTKFile>' WRITE (fileID + 1, "(A)") '</VTKFile>'