gtool4 netCDF data Output module directly called by GCM run program.
use dycore_type_mod, only : STRING
private public :: dycore_out_init, dycore_out_put, dycore_out_end ! subroutines
io_gt4_out_mod の初期化と、次元の設定および 時間発展する量の出力の初期化を行なう。
subroutine dycore_out_init(Dims) use dycore_type_mod, only: DYCORE_DIMS use io_gt4_out_mod , only: io_gt4_out_init, io_gt4_out_SetDims, & & io_gt4_out_SetVars use dc_trace , only: BeginSub, EndSub, DbgMessage
type(DYCORE_DIMS), intent(in):: Dims ! 次元データ全種
格子点データ群 Vars を出力する。
subroutine dycore_out_put(Vars)
use dycore_type_mod, only : DYCORE_VARS, DBKIND, REKIND use io_gt4_out_mod, only : io_gt4_out_Put use dc_trace, only : BeginSub, EndSub, DbgMessage, DataDump
type(DYCORE_VARS), intent(in):: Vars ! 格子点データ全種
io_gt4_out_mod の終了処理を行なう。
subroutine dycore_out_end
use io_gt4_out_mod, only : io_gt4_out_end use dc_trace, only : BeginSub, EndSub, DbgMessage