!Copyright (c) 2013 by https://git.em3d.cn/ under guide of Xiu Li(lixiu@chd.edu.cn) !written by Huaifeng Sun(sunhuaifeng@email.sdu.edu.cn) and Xushan Lu(luxushan@gmail.com) !Code distribution @ https://git.em3d.cn/ MODULE TIME_PARAMETER REAL(KIND=8), DIMENSION(:), ALLOCATABLE:: CTIME,DELT !Ctime is a Nstop length array which stores the value of time of each iteration step ! Delt is a Nstop length array which stores the value of iteration time step. REAL TIME_RAMP2WAVE_SUM,TIME_RAMP2WAVE_TEMP ! This is used in Time_series subroutine. ENDMODULE TIME_PARAMETER