ファイル出力. 長い時間ステップの値を出力.
use gt4_history use dc_trace, only: BeginSub, EndSub use gridset, only: FileXMin, FileXMax, FileZMin, FileZMax, & & DimXMin, DimXMax, DimZMin, DimZMax use average, only: ss_avr_fs, ss_avr_sf
real(8), intent(in) :: Time real(8), intent(in) :: fs_VelX_nl(DimXMin:DimXMax, DimZMin:DimZMax) real(8), intent(in) :: sf_VelZ_nl(DimXMin:DimXMax, DimZMin:DimZMax) real(8), intent(in) :: ss_Exner_nl(DimXMin:DimXMax, DimZMin:DimZMax) real(8), intent(in) :: ss_PotTemp_nl(DimXMin:DimXMax, DimZMin:DimZMax) real(8), intent(in) :: ss_Km_nl(DimXMin:DimXMax, DimZMin:DimZMax) real(8), intent(in) :: ss_Kh_nl(DimXMin:DimXMax, DimZMin:DimZMax)