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

Add quotes to headers

Browse source
This commit is contained in:
Jorge Gonzalez 2026-03-10 12:32:46 +01:00
commit d7d0d6b47f
1 changed files with 16 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

32
src/modules/mesh/inout/text/moduleMeshOutputText.f90
View file

@ -137,10 +137,10 @@ module moduleMeshOutputText
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)
write(fileID, '(5(A,","),A)') 'Position (m)', & write(fileID, '(5(A,","),A)') '"Position (m)"', &
'Density (m^-3)', & '"Density (m^-3)"', &
'Velocity (m s^-1):0', 'Velocity (m s^-1):1', 'Velocity (m s^-1):2', & '"Velocity (m s^-1):0"', 'Velocity (m s^-1):1"', 'Velocity (m s^-1):2"', &
'Temperature (K)' '"Temperature (K)"'
call writeSpeciesOutput(self, fileID, s) call writeSpeciesOutput(self, fileID, s)
@ -206,10 +206,10 @@ module moduleMeshOutputText
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)
write(fileID, '(8(A,","),A)') 'Position (m)', & write(fileID, '(8(A,","),A)') '"Position (m)"', &
'Potential (V)', & '"Potential (V)"', &
'Electric Field (V m^-1):0', 'Electric Field (V m^-1):1', 'Electric Field (V m^-1):2', & '"Electric Field (V m^-1):0"', 'Electric Field (V m^-1):1"', 'Electric Field (V m^-1):2"', &
'Magnetic Field (T):0', 'Magnetic Field (T):1', 'Magnetic Field (T):2' '"Magnetic Field (T):0"', 'Magnetic Field (T):1"', 'Magnetic Field (T):2"'
call writeEMOutput(self, fileID) call writeEMOutput(self, fileID)
@ -238,19 +238,19 @@ module moduleMeshOutputText
write(*, "(6X,A15,A)") "Creating file: ", fileNameMean write(*, "(6X,A15,A)") "Creating file: ", fileNameMean
open (fileIDMean, file = path // folder // '/' // fileNameMean) open (fileIDMean, file = path // folder // '/' // fileNameMean)
write(fileIDMean, '(5(A,","),A)') 'Position (m)', & write(fileIDMean, '(5(A,","),A)') '"Position (m)"', &
'Density, mean (m^-3)', & '"Density, mean (m^-3)"', &
'Velocity, mean (m s^-1):0', 'Velocity (m s^-1):1', 'Velocity (m s^-1):2', & '"Velocity, mean (m s^-1):0"', '"Velocity (m s^-1):1"', '"Velocity (m s^-1):2"', &
'Temperature, mean (K)' '"Temperature, mean (K)"'
fileNameDeviation = formatFileName('Average_deviation', species(s)%obj%name, 'csv') fileNameDeviation = formatFileName('Average_deviation', species(s)%obj%name, 'csv')
write(*, "(6X,A15,A)") "Creating file: ", fileNameDeviation write(*, "(6X,A15,A)") "Creating file: ", fileNameDeviation
open (fileIDDeviation, file = path // folder // '/' // fileNameDeviation) open (fileIDDeviation, file = path // folder // '/' // fileNameDeviation)
write(fileIDDeviation, '(5(A,","),A)') 'Position (m)', & write(fileIDDeviation, '(5(A,","),A)') '"Position (m)"', &
'Density, deviation (m^-3)', & '"Density, deviation (m^-3)"', &
'Velocity, deviation (m s^-1):0', 'Velocity (m s^-1):1', 'Velocity (m s^-1):2', & '"Velocity, deviation (m s^-1):0"', 'Velocity (m s^-1):1"', 'Velocity (m s^-1):2"', &
'Temperature, deviation (K)' '"Temperature, deviation (K)"'
call writeAverage(self, fileIDMean, fileIDDeviation, s) call writeAverage(self, fileIDMean, fileIDDeviation, s)