diff --git a/src/Contrl/Output.f90 b/src/Contrl/Output.f90 index 288ffea..7cc511a 100644 --- a/src/Contrl/Output.f90 +++ b/src/Contrl/Output.f90 @@ -1840,8 +1840,8 @@ subroutine phase_Output(nfile,this,samplePeriod) MPI_COMM_WORLD,ierr) endif -100 format(9(1x,e14.7)) -101 format(6(1x,e14.7)) +100 format(9(1x,g0)) +101 format(6(1x,g0)) deallocate(nptlist) deallocate(recvbuf)