From 726d9bb0fc93833748fd9390ad8c2ef1bdf002e1 Mon Sep 17 00:00:00 2001 From: JGonzalez Date: Mon, 30 Sep 2024 10:13:22 +0200 Subject: [PATCH] Typo on header Speed header was written with s^-2 for the bc file. --- plasmaExpansion.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/plasmaExpansion.f90 b/plasmaExpansion.f90 index 1877a88..513d2d1 100644 --- a/plasmaExpansion.f90 +++ b/plasmaExpansion.f90 @@ -191,7 +191,7 @@ module output if (.not. res) then write (*, '(A, A)') 'Writing: ', filename open(unit=dataBC_id, file=pathOutput // filename, action='write', position='append') - write(dataBC_id, '(A,4(' // formatSep // ',A))') 't (s)', 'n (m^-3)', 'u (m s^-2)', 'T (eV)', 'Z' + write(dataBC_id, '(A,4(' // formatSep // ',A))') 't (s)', 'n (m^-3)', 'u (m s^-1)', 'T (eV)', 'Z' close(dataBC_id) end if