900 60 172800 3600 -0.01 0 0 1.073 900 60 864000 43200 -0.01 0 0 1.073 900 60 9000 1800 ! for 128x128 , U = 10 ! dt, ns, tend, tout ! gamma ! ievolve_basic_state ! imake_pert_ics ! (if ievolve_basic_state.eq.0) cx_phase