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
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
!Create collection file
WRITE(*, "(6X,A15,A)") "Creating file: ", fileNameCollection
@ -192,9 +192,11 @@ MODULE moduleMeshOutputVTK
END IF
!Write iteration file in collection
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,'"/>'
!Close collection file
IF (t == tFinal) THEN
WRITE (fileID + 1, "(2X, A)") '</Collection>'
WRITE (fileID + 1, "(A)") '</VTKFile>'