diff --git a/src/io/io.f90 b/src/io/io.f90 index 7756747bf..21c165e23 100644 --- a/src/io/io.f90 +++ b/src/io/io.f90 @@ -623,12 +623,10 @@ module subroutine io_param_reader(self, unit, iotype, v_list, iostat, iomsg) case("GMTOT_ORIG") read(param_value, *, err = 667, iomsg = iomsg) param%GMtot_orig case("LTOT_ORIG") - write(*,*) param_value read(param_value, *, err = 667, iomsg = iomsg) param%Ltot_orig(1) do i = 2, NDIM ifirst = ilast + 2 param_value = io_get_token(line, ifirst, ilast, iostat) - write(*,*) param_value read(param_value, *, err = 667, iomsg = iomsg) param%Ltot_orig(i) end do case("LORBIT_ORIG")