diff --git a/process/physics.py b/process/physics.py index 9add436756..0bfc45a4f6 100644 --- a/process/physics.py +++ b/process/physics.py @@ -4236,7 +4236,7 @@ def outplas(self): po.ocmmnt( self.outfile, - f"Confinement scaling law: { physics_variables.tauscl[physics_variables.isc-1]}", + f"Confinement scaling law: {f2py_compatible_to_string(physics_variables.tauscl[physics_variables.isc-1])}", ) po.ovarrf( diff --git a/source/fortran/physics_variables.f90 b/source/fortran/physics_variables.f90 index 0cb54664fb..00ef13fcd8 100644 --- a/source/fortran/physics_variables.f90 +++ b/source/fortran/physics_variables.f90 @@ -394,7 +394,7 @@ module physics_variables integer :: isc !! switch for energy confinement time scaling law (see description in `tauscl`) - character(len=24), parameter, dimension(ipnlaws) :: tauscl = (/ & + character*24, parameter, dimension(ipnlaws) :: tauscl = (/ & 'Neo-Alcator (ohmic)', & 'Mirnov (H)', & 'Merezkhin-Muhkovatov (L)', &