Class gtool_history_generic
In: gtool/gtool_history/gtool_history_generic.f90

gtool_history より提供される手続の引用仕様宣言

Interfaces of procedures provided from "gtool_history"

Note that Japanese and English are described in parallel.

モジュールの概要や使用方法については, gtool_history を参照ください.

See "gtool_history" for brief and usage of this module.

Procedures List

【出力用】

HistoryCreate :gtool4 データ出力用初期設定
HistoryAddVariable :変数定義
HistoryCopyVariable :変数定義 (別ファイルの変数コピー)
HistoryPut :データ出力
HistoryAddAttr :変数に属性付加
HistoryClose :終了処理
HistorySetTime :時刻指定
HistoryPutAxisMPI :領域全体の座標データ指定 (MPI 使用時のみ有効)

【入力用】

HistoryGet :データ入力 (固定長配列用)
HistoryGetPointer :データ入力 (ポインタ配列用)
HistoryGetAttr :属性入力

【その他】

HistoryInquire :gtool_history_types#GT_HISTORY 型変数への問い合わせ
HistoryCopy :gtool_history_types#GT_HISTORY 型変数のコピー
HistoryPutLine :gtool_history_types#GT_HISTORY 型変数の印字
HistoryInitialized :gtool_history_types#GT_HISTORY 型変数の初期設定をチェック

Methods

Copy   Copy   Copy   Create   Create   HistoryAddAttr   HistoryAddAttr   HistoryAddAttr   HistoryAddAttr   HistoryAddAttr   HistoryAddAttr   HistoryAddAttr   HistoryAddAttr   HistoryAddVariable   HistoryAddVariable   HistoryAxisAddAttr   HistoryAxisAddAttr   HistoryAxisAddAttr   HistoryAxisAddAttr   HistoryAxisAddAttr   HistoryAxisAddAttr   HistoryAxisAddAttr   HistoryAxisAddAttr   HistoryAxisClear   HistoryAxisCopy   HistoryAxisCreate   HistoryAxisInquire   HistoryClose   HistoryCopy   HistoryCopyVariable   HistoryCreate   HistoryCreate   HistoryCreate   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGet   HistoryGetAttr   HistoryGetAttr   HistoryGetAttr   HistoryGetAttr   HistoryGetAttr   HistoryGetAttr   HistoryGetAttr   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryGetPointer   HistoryInitialized   HistoryInquire   HistoryInquire   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPut   HistoryPutAxisMPI   HistoryPutAxisMPI   HistoryPutAxisMPI   HistoryPutLine   HistorySetTime   HistoryVarinfoAddAttr   HistoryVarinfoAddAttr   HistoryVarinfoAddAttr   HistoryVarinfoAddAttr   HistoryVarinfoAddAttr   HistoryVarinfoAddAttr   HistoryVarinfoAddAttr   HistoryVarinfoAddAttr   HistoryVarinfoClear   HistoryVarinfoCopy   HistoryVarinfoCreate   HistoryVarinfoInitialized   HistoryVarinfoInquire   Inquire   Inquire   Inquire   Inquire   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Put_Attr   initialized  

Included Modules

gtdata_types dc_types dc_trace dc_date_types gtool_history_types

Public Instance methods

Copy( axis_dest, axis_src, [err], [name], [length], [longname], [units], [xtype] )
Subroutine :
axis_dest :type(GT_HISTORY_AXIS),intent(out)
: コピー先 GT_HISTORY_AXIS
axis_src :type(GT_HISTORY_AXIS),intent(in)
: コピー元 GT_HISTORY_AXIS
err :logical, intent(out), optional
name :character(*) , intent(in), optional
: 次元変数名
length :integer, intent(in), optional
: 次元長 (配列サイズ)
longname :character(*) , intent(in), optional
: 次元変数の記述的名称
units :character(*) , intent(in), optional
: 次元変数の単位
xtype :character(*) , intent(in), optional
: 次元変数の型

使用方法は HistoryAxisCopy と同様です.

Usage is same as "HistoryAxisCopy".

Original external subprogram is gtool/gtool_history/historyaxiscopy.f90#HistoryAxisCopy2

Copy( hist_dest, file, [hist_src], [title], [source], [institution], [origin], [interval], [conventions], [gt_version] )
Subroutine :
hist_dest :type(GT_HISTORY), intent(out), target
file :character(*), intent(in)
hist_src :type(GT_HISTORY), intent(in), optional, target
title :character(*), intent(in), optional
source :character(*), intent(in), optional
institution :character(*), intent(in), optional
origin :real, intent(in), optional
interval :real, intent(in), optional
conventions :character(*), intent(in), optional
gt_version :character(*), intent(in), optional

使用方法は HistoryCopy と同様です.

Usage is same as "HistoryCopy".

Original external subprogram is gtool/gtool_history/historycopy.F90#HistoryCopy2

Copy( varinfo_dest, varinfo_src, [err], [name], [dims], [longname], [units], [xtype] )
Subroutine :
varinfo_dest :type(GT_HISTORY_VARINFO),intent(out)
varinfo_src :type(GT_HISTORY_VARINFO),intent(in)
err :logical, intent(out), optional
name :character(*) , intent(in), optional
: 次元変数名
dims(:) :character(*) , intent(in), optional, target
: 依存する次元
longname :character(*) , intent(in), optional
: 次元変数の記述的名称
units :character(*) , intent(in), optional
: 次元変数の単位
xtype :character(*) , intent(in), optional
: 次元変数の型

使用方法は HistoryVarinfoCopy と同様です.

Usage is same as "HistoryVarinfoCopy".

Original external subprogram is gtool/gtool_history/historyvarinfocopy.f90#HistoryVarinfoCopy2

Create( axis, name, size, longname, units, xtype )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(out)
name :character(*) , intent(in)
: 次元変数名
size :integer, intent(in)
: 次元長 (配列サイズ)
longname :character(*) , intent(in)
: 次元変数の記述的名称
units :character(*) , intent(in)
: 次元変数の単位
xtype :character(*) , intent(in)
: 次元変数の型

使用方法は HistoryAxisCreate と同様です.

Usage is same as "HistoryAxisCreate".

Original external subprogram is gtool/gtool_history/historyaxiscreate.f90#HistoryAxisCreate2

Create( varinfo, name, dims, longname, units, [xtype], [time_average], [average], [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
name :character(*), intent(in)
: 変数名
dims(:) :character(*), intent(in)
: 依存する次元
longname :character(*), intent(in)
: 変数の記述的名称
units :character(*), intent(in)
: 変数の単位
xtype :character(*), intent(in), optional
: 変数の型
time_average :logical, intent(in), optional
: 時間平均
average :logical, intent(in), optional
: 時間平均 (後方互換用)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

使用方法は HistoryVarinfoCreate と同様です.

Usage is same as "HistoryVarinfoCreate".

Original external subprogram is gtool/gtool_history/historyvarinfocreate.f90#HistoryVarinfoCreate2

HistoryAddAttr( varname, attrname, value, [history], [err] )
Subroutine :
varname :character(*), intent(in)
: 変数の名前。

ここで指定するものは、 HistoryCreateの dims 、 または HistoryAddVariable の varname で既に指定されてい なければなりません。

attrname :character(*), intent(in)
: 変数またはファイル全体に付 加する属性の名前

"+" (プラ ス) を属性名の先頭につける 場合には、ファイル全体に属 性を付加します。 ファイル全体へ属性を付加 する場合でも、 HistoryCreate の dims 、または HistoryAddVariable の varname で既に指定されてい る変数を varname に指定する 必要があります。

value :character(*), intent(in)
: 属性の値
history :type(GT_HISTORY), intent(inout), target, optional
: 出力ファイルの設定に関する情報を 格納した構造体

ここに指定するものは、 HistoryCreate によって初期設定 されていなければなりません。

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

gtool4 データ内の変数への属性付加

gtool4 データおよびそのデータ内の変数に属性を付加します。 このサブルーチンを用いる前に、 HistoryCreate による初期設定が 必要です。

属性名 attrname の先頭にプラス "+" を付加する 場合は、gtool4 データ自体の属性 (大域属性) として属性が付加されます。 この場合、varname は無視されますが、 その場合でも varname へはデータ内に存在する変数名を与えてください。

HistoryAddAttr は複数のサブルーチンの総称名です。value には いくつかの型を与えることが可能です。 下記のサブルーチンを参照ください。

Original external subprogram is gtool/gtool_history/historyaddattr.F90#HistoryAddAttrChar0

HistoryAddAttr( varname, attrname, value, [history], [err] )
Subroutine :
varname :character(*), intent(in)
attrname :character(*), intent(in)
value :integer, intent(in)
history :type(GT_HISTORY), intent(inout), target, optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyaddattr.F90#HistoryAddAttrInt0

HistoryAddAttr( varname, attrname, value, [history], [err] )
Subroutine :
varname :character(*), intent(in)
attrname :character(*), intent(in)
value :logical, intent(in)
history :type(GT_HISTORY), intent(inout), target, optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyaddattr.F90#HistoryAddAttrLogical0

HistoryAddAttr( varname, attrname, value, [history], [err] )
Subroutine :
varname :character(*), intent(in)
attrname :character(*), intent(in)
value :real(DP), intent(in)
history :type(GT_HISTORY), intent(inout), target, optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyaddattr.F90#HistoryAddAttrDouble0

HistoryAddAttr( varname, attrname, value, [history], [err] )
Subroutine :
varname :character(*), intent(in)
attrname :character(*), intent(in)
value :real, intent(in)
history :type(GT_HISTORY), intent(inout), target, optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyaddattr.F90#HistoryAddAttrReal0

HistoryAddAttr( varname, attrname, value, [history], [err] )
Subroutine :
varname :character(*), intent(in)
attrname :character(*), intent(in)
value(:) :integer, intent(in)
history :type(GT_HISTORY), intent(inout), target, optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyaddattr.F90#HistoryAddAttrInt1

HistoryAddAttr( varname, attrname, value, [history], [err] )
Subroutine :
varname :character(*), intent(in)
attrname :character(*), intent(in)
value(:) :real(DP), intent(in)
history :type(GT_HISTORY), intent(inout), target, optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyaddattr.F90#HistoryAddAttrDouble1

HistoryAddAttr( varname, attrname, value, [history], [err] )
Subroutine :
varname :character(*), intent(in)
attrname :character(*), intent(in)
value(:) :real, intent(in)
history :type(GT_HISTORY), intent(inout), target, optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyaddattr.F90#HistoryAddAttrReal1

HistoryAddVariable( varinfo, [history], [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO), intent(in)
: 変数情報を格納した構造体

ここに指定するものは、 HistoryVarinfoCreate によって 初期設定されていなければなりません。

history :type(GT_HISTORY), intent(inout), optional
: 出力ファイルの設定に関する情報を 格納した構造体

ここに指定するものは、 HistoryCreate によって初期設定 されていなければなりません。

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

変数定義

gtool4 データ内の変数の定義を行います。このサブルーチンを 用いる前に、 HistoryCreate による初期設定が必要です。

既に gtool4 データが存在し、そのデータ内の変数と全く同じ 構造の変数を定義したい場合は HistoryCopyVariable を利用すると 便利です。

HistoryAddVariable というサブルーチン名は 2 つの別々の サブルーチンの総称名です。下記のサブルーチンも参照ください。

Original external subprogram is gtool/gtool_history/historyaddvariable.F90#HistoryAddVariable2

HistoryAddVariable( varname, dims, longname, units, [xtype], [time_average], [average], [history], [err] )
Subroutine :recursive
varname :character(len = *), intent(in)
: 定義する変数の名前

最大文字数は dc_type#TOKEN

dims(:) :character(len = *), intent(in)
: 変数が依存する次元の名前

時間の次元は配列の最後に指定 しなければならない。 ここで指定するものは、 HistoryCreate にて dims で指定 されていなければならない。

もしもスカラー変数を作成 する場合には, サイズが 1 で 中身が空の文字型配列, すなわち (/’’/) を与えること.

longname :character(len = *), intent(in)
: 変数の記述的名称

最大文字数は dc_types#STRING

units :character(len = *), intent(in)
: 変数の単位

最大文字数は dc_types#STRING

xtype :character(len = *), intent(in), optional
: 変数のデータ型

デフォルトはfloat (単精度実数型) である。 有効なのは、 double (倍精度実数型)、 int (整数型)、char (文字型)である。 指定しない場合や、無効な型を指定した 場合には、 float (単精度実数型) となる。

time_average :logical, intent(in), optional
: 出力データを時間平均する場合には .true. を与えます。 デフォルトは .false. です。

If output data is averaged in time direction, specify ".true.". Default is ".false.".

average :logical, intent(in), optional
: time_average の旧版. Old version of "time_average"
history :type(GT_HISTORY), intent(inout), optional, target
: 出力ファイルの設定に関する情報を 格納した構造体

ここに指定するものは、 HistoryCreate によって初期設定 されていなければなりません。

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

変数定義

gtool4 データ内の変数の定義を行います。このサブルーチンを 用いる前に、 HistoryCreate による初期設定が必要です。

既に gtool4 データが存在し、そのデータ内の変数と全く同じ 構造の変数を定義したい場合は HistoryCopyVariable を利用すると便利です。

HistoryAddVariable というサブルーチン名は 2 つの別々の サブルーチンの総称名です。上記のサブルーチンも参照ください。

時間平均について

gtool_history を用いた出力では、以下の条件を満たす場合に出力データを 時間方向に平均化して出力します。

HistoryPut に与えられたデータは gtool_history モジュール内部 にいったん保管され、HistoryCreate の引数 interval の間隔を おいて出力が行われます。平均化は出力時から次の出力時の間の データを用いて行われます。時間間隔が一定でない場合、 重み付けをして出力されます。重み付けは以下のように行われます。 

  sum( <data> * <weight> ) / sum ( <weight> )
<data> :array または value に与えられたデータ
<weight> :前回 HistoryPut が呼ばれた際の時刻と今回の時刻との差
sum :前回出力が行われた時刻から interval 経過するまでの値の和

Original external subprogram is gtool/gtool_history/historyaddvariable.F90#HistoryAddVariable1

HistoryAxisAddAttr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :character(*), intent(in)
: 属性に与えられる値

配列の場合でも、数値型以外 では配列の 1 つ目の要素のみ 値として付加されます。

GT_HISTORY_AXIS 型変数への属性付加

GT_HISTORY_AXIS 型の変数 axis へ属性を付加します。

HistoryAxisAddAttr は複数のサブルーチンの総称名です。 value には様々な型の引数を与えることが可能です。 下記のサブルーチンを参照ください。

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttrChar0

HistoryAxisAddAttr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :integer, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttrInt0

HistoryAxisAddAttr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :logical, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttrLogical0

HistoryAxisAddAttr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :real(DP), intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttrDouble0

HistoryAxisAddAttr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :real, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttrReal0

HistoryAxisAddAttr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :integer, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttrInt1

HistoryAxisAddAttr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :real(DP), intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttrDouble1

HistoryAxisAddAttr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :real, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttrReal1

HistoryAxisClear( axis )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)

GT_HISTORY_AXIS 型変数初期化

axis で与えられた変数を HistoryAxisCreate による初期設定よりも さらに前の状態に初期化します。

Destructor of GT_HISTORY_AXIS

Original external subprogram is gtool/gtool_history/historyaxisclear.f90#HistoryAxisClear

HistoryAxisCopy( axis_dest, axis_src, [err], [name], [length], [longname], [units], [xtype] )
Subroutine :
axis_dest :type(GT_HISTORY_AXIS),intent(out)
: コピー先 GT_HISTORY_AXIS
axis_src :type(GT_HISTORY_AXIS),intent(in)
: コピー元 GT_HISTORY_AXIS
err :logical, intent(out), optional
name :character(*) , intent(in), optional
: 次元変数名
length :integer, intent(in), optional
: 次元長 (配列サイズ)
longname :character(*) , intent(in), optional
: 次元変数の記述的名称
units :character(*) , intent(in), optional
: 次元変数の単位
xtype :character(*) , intent(in), optional
: 次元変数の型

GT_HISTORY_AXIS 型変数コピー

GT_HISTORY_AXIS 型の変数 axis_src を axis_dest にコピーします。 axis_src は HistoryAxisCreate によって初期設定されている必要が あります。 さらに属性を付加する場合には HistoryAxisAddAttr を用いてください。

err を与えておくと、コピーの際何らかの不具合が生じても 終了せずに err が真になって返ります。

err 以降の引数は、コピーの際に上書きする値です。

Original external subprogram is gtool/gtool_history/historyaxiscopy.f90#HistoryAxisCopy1

HistoryAxisCreate( axis, name, size, longname, units, xtype )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(out)
name :character(*) , intent(in)
: 次元変数名
size :integer, intent(in)
: 次元長 (配列サイズ)
longname :character(*) , intent(in)
: 次元変数の記述的名称
units :character(*) , intent(in)
: 次元変数の単位
xtype :character(*) , intent(in)
: 次元変数の型

GT_HISTORY_AXIS 型変数作成

GT_HISTORY_AXIS 型変数を作成します。 このサブルーチンによる設定の後、 HistoryCreate の axes に与えます。 さらに属性を付加する場合には HistoryAxisAddAttr を用いてください。

Constructor of GT_HISTORY_AXIS

Original external subprogram is gtool/gtool_history/historyaxiscreate.f90#HistoryAxisCreate1

HistoryAxisInquire( axis, [name], [size], [longname], [units], [xtype] )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(in)
name :character(*) , intent(out), optional
: 次元変数名
size :integer, intent(out), optional
: 次元長 (配列サイズ)
longname :character(*) , intent(out), optional
: 次元変数の記述的名称
units :character(*) , intent(out), optional
: 次元変数の単位
xtype :character(*) , intent(out), optional
: 次元変数の型

GT_HISTORY_AXIS 型変数への問い合わせ

GT_HISTORY_AXIS 型の変数内の各情報を参照します。

Original external subprogram is gtool/gtool_history/historyaxisinquire.f90#HistoryAxisInquire1

HistoryClose( [history], [quiet], [err] )
Subroutine :
history :type(GT_HISTORY), intent(inout), optional, target
: 出力ファイルの設定に関する情報を 格納した構造体

ここに指定するものは, HistoryCreate によって初期設定 されていなければなりません.

quiet :logical, intent(in), optional
: .true. を与えた場合, メッセージ出力が抑制されます.

If ".true." is given, messages are suppressed.

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

gtool4 データの終了処理

HistoryCreate で始まったデータ出力の終了処理をおこなうものです. プログラム内で HistoryCreate を用いた場合, プログラムを終了する 前に必ずこのサブルーチンを呼んで下さい.

Original external subprogram is gtool/gtool_history/historyclose.F90#HistoryClose

HistoryCopy( hist_dest, file, [hist_src], [title], [source], [institution], [origin], [interval], [conventions], [gt_version] )
Subroutine :
hist_dest :type(GT_HISTORY), intent(out), target
file :character(*), intent(in)
hist_src :type(GT_HISTORY), intent(in), optional, target
title :character(*), intent(in), optional
source :character(*), intent(in), optional
institution :character(*), intent(in), optional
origin :real, intent(in), optional
interval :real, intent(in), optional
conventions :character(*), intent(in), optional
gt_version :character(*), intent(in), optional

引数 hist_src の内容にコピーし, hist_dest へ返します. hist_src が与えられない場合は, 引数 history を与えずに呼び出した HistoryCreate の設定内容が参照されます. HistoryCreate と同様に, 出力の初期設定を行います. file は必ず与えなければならず, hist_src と同じファイルへ出力 しようとする場合はエラーを生じます. HistoryAddVariable で設定される内容に関してはコピーされません.

それ以降の引数を与えることで, hist_src の設定を 上書きすることが可能です.

Original external subprogram is gtool/gtool_history/historycopy.F90#HistoryCopy1

HistoryCopyVariable( file, varname, [history], [overwrite] )
Subroutine :
file :character(len = *), intent(in)
: コピーしようとする変数が格納された netCDF ファイル名
varname :character(len = *), intent(in)
: コピー元となる変数の名前

定義される変数名もこれと 同じになります。 最大文字数は dc_types#TOKEN 。

依存する次元が存在しない 場合は自動的にその次元に関する 変数情報も元のファイルから コピーします。 この場合に「同じ次元」と見 なされるのは、(1) 無制限次 元 (自動的に「時間」と認識 される)、 (2) サイズと単位が同じ次元、 です。

history :type(GT_HISTORY), intent(inout), optional, target
: 出力ファイルの設定に関する情報を 格納した構造体

ここに指定するものは、 HistoryCreate によって初期設定 されていなければなりません。

overwrite :logical, intent(in), optional
: 上書きの可否の設定

この引数に .false. を渡すと、 既存のファイルを上書きしません。 デフォルトは上書きします。

変数定義 (別ファイルの変数コピー)

gtool4 データ内の変数の定義を行います。 他の gtool4 データの ファイル名とその中の変数名を指定することで、 自動的のその変数の 構造や属性をコピーして変数定義します。このサブルーチンを 用いる前に、 HistoryCreate による初期設定が必要です。

構造や属性を手動で設定する場合には HistoryAddVariable を用いて下さい。

Original external subprogram is gtool/gtool_history/historycopyvariable.f90#HistoryCopyVariable1

HistoryCreate( file, title, source, institution, dims, dimsizes, longnames, units, [origin], [interval], [xtypes], [history], [origind], [intervald], [conventions], [gt_version], [overwrite], [quiet], [flag_mpi_gather], [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
: 出力するファイルの名前. Name of output file
title :character(*), intent(in)
: データ全体の表題. Title of entire data
source :character(*), intent(in)
: データを作成する際の手段. Source of data file
institution :character(*), intent(in)
: ファイルを最終的に変更した組織/個人. Institution or person that changes files for the last time
dims(:) :character(*), intent(in)
: 次元の名前.

配列の大きさに制限はありません. 個々の次元の文字数は dc_types#TOKEN まで. 配列内の文字数は 全て同じでなければなりません. 足りない文字分は空白で 補ってください.

Names of dimensions.

Length of array is unlimited. Limits of numbers of characters of each dimensions are "dc_types#TOKEN". Numbers of characters in this array must be same. Make up a deficit with blanks.

dimsizes(:) :integer, intent(in)
: dims で指定したそれぞれの次元大きさ.

配列の大きさは dims の大きさと等しい 必要があります. ‘0’ (数字のゼロ) を指定 するとその次元は 無制限次元 (unlimited dimension) となります. (gtool_history では時間の次元に対して無制限次元を 用いることを想定しています). ただし, 1 つの NetCDF ファイル (バージョン 3) は最大で 1 つの無制限次元しか持てないので, 2 ヶ所以上に ‘0’ を指定しないでください. その場合, 正しく gtool4 データが出力されません.

Lengths of dimensions specified with "dims".

Length of this array must be same as length of "dim". If ‘0’ (zero) is specified, the dimension is treated as unlimited dimension. (In "gtool_history", unlimited dimension is expected to be used as time). Note that one NetCDF file (version 3) can not have two or more unlimited dimensions, so that do not specify ‘0’ to two or more places. In that case, gtoo4 data is not output currently

longnames(:) :character(*), intent(in)
: dims で指定したそれぞれの次元の名前.

配列の大きさは dims の大きさ と等しい必要があります. 文字数 は dc_types#STRING まで. 配列内の文字数は 全て同じでなければなりません. 足りない文字分は空白で補います.

Names of dimensions specified with "dims".

Length of this array must be same as length of "dim". Limits of numbers of characters are "dc_types#STRING". Numbers of characters in this array must be same. Make up a deficit with blanks.

units(:) :character(*), intent(in)
: dims で指定したそれぞれの次元の単位.

配列の大きさは dims の大きさ と等しい必要があります. 文字数 は dc_types#STRING まで. 配列内の文字数は 全て同じでなければなりません. 足りない文字分は空白で補います.

Units of dimensions specified with "dims".

Length of this array must be same as length of "dim". Limits of numbers of characters are "dc_types#STRING". Numbers of characters in this array must be same. Make up a deficit with blanks.

origin :real, intent(in), optional
: 時間の原点.

これは HistoryPut により変数を最初に 出力するときの時間となります.

省略した場合, 時間の原点には 自動的に 0.0 が設定されます.

Origin of time.

This time is used as time when first output is done by "HistoryPut".

If this argument is omitted, 0.0 is specified automatically.

interval :real, intent(in), optional
: 出力時間間隔.

同じ変数に対して HistoryPut が複数回 呼ばれた時に, 自動的に時間変数がこの値 だけ増やされて出力されます. なお, 各々の出力ファイルにつき HistorySetTime を一度でも用いた場合, この値は無効に なるので注意してください.

省略した場合, 自動的に 1.0 が設定されます.

Interval of output time.

When "HistoryPut" is called two or more times for the same variable, time is increased as this value and output automatically. Note that this value becomes invalid when "HistorySetTime" is used for each output file even once.

If this argument is omitted, 1.0 is specified automatically.

xtypes(:) :character(*), intent(in), optional
: dims で指定したそれぞれの 次元のデータ型.

デフォルトは float (単精度実数型) です. 有効なのは, double (倍精度実数型), int (整数型) です. 指定しない 場合や, 無効な型を指定した場合には, float となります. なお, 配列の大きさ は dims の大きさと等しい必要が あります. 配列内の文字数は全て 同じでなければなりません. 足りない文字分は空白で補います.

Data types of dimensions specified with "dims".

Default value is "float" (single precision). Other valid values are "double" (double precision), "int" (integer). If no value or invalid value is specified, "float" is applied. Length of this array must be same as length of "dim". Numbers of characters in this array must be same. Make up a deficit with blanks.

history :type(GT_HISTORY), intent(out), optional, target
: 出力ファイルの設定に関する情報を 格納した構造体.

1 つのプログラムで複数のファイル に gtool データを出力する 場合に利用します. (単独のファイルに書き出す場合は 指定する必要はありません)

Derived type that stores information about output files.

If multiple gtool4 data files are output from one program, use this argument. (If onlye one file is output, this argument is not needed).

origind :real(DP), intent(in), optional
: 時間の原点. (倍精度実数)

time と同様です.

Origin of time. (Double precision)

This is same as time.

intervald :real(DP), intent(in), optional
: 出力時間間隔. (倍精度実数)

interval と同様です.

Interval of output time. (Double precision)

This is same as interval.

conventions :character(*), intent(in), optional
: 出力するファイルの netCDF 規約

省略した場合, もしくは空文字を与えた場合, 出力する netCDF 規約の Conventions 属性に値 gtool_history_internal#gtool4_netCDF_Conventions が自動的に与えられます.

NetCDF conventions of output file.

If this argument is omitted or, blanks are given, gtool_history_internal#gtool4_netCDF_Conventions is given to attribute "Conventions" of an output file automatically.

gt_version :character(*), intent(in), optional
: gtool4 netCDF 規約のバージョン

省略した場合, gt_version 属性に 規約の最新版のバージョンナンバー gtool4_netCDF_version が与えられます. (ただし, 引数 conventions に gtool_history_internal#gtool4_netCDF_Conventions 以外が与えられる場合は gt_version 属性を作成しません).

Version of gtool4 netCDF Conventions.

If this argument is omitted, latest version number of gtool4 netCDF Conventions is given to attribute "gt_version" of an output file (However, gtool_history_internal#gtool4_netCDF_Conventions is not given to an argument "conventions", attribute "gt_version" is not created).

overwrite :logical, intent(in), optional
: 上書き可否

この引数に .false. を渡すと, 既存のファイルを上書きしません. デフォルトは上書きします.

Whether or not to overwrite.

If .false. is specified to this argument, an existing file is not overwritten. By default, existing file is overwritten.

quiet :logical, intent(in), optional
: .true. を与えた場合, メッセージ出力が抑制されます. デフォルトは .false. です.

If ".true." is given, messages are suppressed. Default value is ".false.".

flag_mpi_gather :logical, intent(in), optional
: MPI 使用時に, 各ノードで HistoryPut に与えたデータを一つのファイルに統合して出力 する場合には .true. を与えてください. デフォルトは .false. です.

.true. を与えた場合, HistoryPutAxisMPI に全体の軸データを与えてください.

When MPI is used, if ".true." is given, data given to "HistoryPut" on each node is integrated and output to one file. Default value is ".false.".

If .true. is given, give data of axes in whole area to "HistoryPutAxisMPI"

flag_mpi_split :logical, intent(in), optional
: MPI 使用時にこの引数に .true. を与えると, 各ノードごとに file 引数に "_rankXXXXXX" (X は [0-9] の数値で, ノード番号を指す) を付加したファイルを出力します. 例えば, file に "output.nc" を与えた場合. ノード 0 では "output_rank000000.nc", ノード 12 では "output_rank000012.nc" を出力します. デフォルトは .false. です.

When MPI is used, if ".true." is given, files that have names with suffixes "_rankXXXXXX" (X is [0-9] that indicates node number) are output on each node. For example, "output.nc" is given to file, "output_rank000000.nc", "output_rank000012.nc" are output on node 0 and node 12. Default value is ".false.".

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

gtool4 データ出力用初期設定

このサブルーチンは、gtool4 データ出力の初期設定を行います。 HistoryAddVariable、 HistoryCopyVariable、 HistoryPut、 HistoryAddAttr、 HistoryClose、 HistorySetTime を用いるためには、HistoryCreate による初期設定が必要です。

なお、プログラム内で HistoryCreate を呼び出した場合、 プログラムを終了する前に必ず、 HistoryClose を呼び出して 終了処理を行なって下さい。

HistoryCreate というサブルーチン名は 2 つの別々の サブルーチンの総称名です。上記のサブルーチンも参照ください。

Two specific subroutines shares common part:

Both two ones initializes a dataset file. The result of type GT_HISTORY will be returned by history or managed internally if omitted. Mandatory global attributes are defined by arguments title, source, and institution; they are all declared as ((character(len = *))). Spatial axis definitions have two different forms: a primitive one uses several arrays of various types: dims, dimsizes, longnames, units, and xtypes. Another sophisticated one has only array of type GT_HISTORY_AXIS, axes. Temporal definition is done without origin, interval.

Original external subprogram is gtool/gtool_history/historycreate.F90#HistoryCreate1

HistoryCreate( file, title, source, institution, axes, [origin], [interval], [history], [origind], [intervald], [conventions], [gt_version], [overwrite], [quiet], [flag_mpi_gather], [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
: HistoryCreate 参照 (以下 axes を除く引数も同様)
title :character(*), intent(in)
source :character(*), intent(in)
institution :character(*), intent(in)
axes(:) :type(GT_HISTORY_AXIS), intent(in)
: 次元情報を格納した構造型変数

GT_HISTORY_AXIS 型変数の生成 (constructer) は HistoryAxisCreate にて行いま す。配列の大きさに制限は ありません。

origin :real, intent(in), optional
interval :real, intent(in), optional
history :type(GT_HISTORY), intent(out), optional, target
origind :real(DP), intent(in), optional
intervald :real(DP), intent(in), optional
conventions :character(*), intent(in), optional
gt_version :character(*), intent(in), optional
overwrite :logical, intent(in), optional
quiet :logical, intent(in), optional
: .true. を与えた場合, メッセージ出力が抑制されます. デフォルトは .false. です.

If ".true." is given, messages are suppressed. Default value is ".false.".

flag_mpi_gather :logical, intent(in), optional
: MPI 使用時に, 各ノードで HistoryPut に与えたデータを一つのファイルに統合して出力 する場合には .true. を与えてください. デフォルトは .false. です.

.true. を与えた場合, HistoryPutAxisMPI に全体の軸データを与えてください.

When MPI is used, if ".true." is given, data given to "HistoryPut" on each node is integrated and output to one file. Default value is ".false.".

If .true. is given, give data of axes in whole area to "HistoryPutAxisMPI"

flag_mpi_split :logical, intent(in), optional
: MPI 使用時にこの引数に .true. を与えると, 各ノードごとに file 引数に "_rankXXXXXX" (X は [0-9] の数値で, ノード番号を指す) を付加したファイルを出力します. 例えば, file に "output.nc" を与えた場合. ノード 0 では "output_rank000000.nc", ノード 12 では "output_rank000012.nc" を出力します. デフォルトは .false. です.

When MPI is used, if ".true." is given, files that have names with suffixes "_rankXXXXXX" (X is [0-9] that indicates node number) are output on each node. For example, "output.nc" is given to file, "output_rank000000.nc", "output_rank000012.nc" are output on node 0 and node 12. Default value is ".false.".

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

gtool4 データ出力用初期設定

HistoryCreate というサブルーチン名は 2 つの別々の サブルーチンの総称名です。まずは HistoryCreate を参照ください。

もう 1 つのサブルーチンと異なる点は、座標軸の情報を dims, dimsizes, longnames, units, and xtypes といった 個別の引数で与えるのではなく、構造体 GT_HISTORY_AXIS 型の 引数 axes で与える点にあります。

GT_HISTORY_AXIS 型変数の生成 (constructer) は HistoryAxisCreate にて行います。

Two specific subroutines shares common part:

Both two ones initializes a dataset file. The result of type GT_HISTORY will be returned by history or managed internally if omitted. Mandatory global attributes are defined by arguments title, source, and institution; they are all declared as ((character(len = *))). Spatial axis definitions have two different forms: a primitive one uses several arrays of various types: dims, dimsizes, longnames, units, and xtypes. Another sophisticated one has only array of type GT_HISTORY_AXIS, axes. Temporal definition is done without origin, interval.

Original external subprogram is gtool/gtool_history/historycreate.F90#HistoryCreate3

HistoryCreate( file, title, source, institution, dims, dimsizes, longnames, units, origin, [interval], [xtypes], [history], [conventions], [gt_version], [overwrite], [quiet], [flag_mpi_gather], [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
: 出力するファイルの名前. Name of output file
title :character(*), intent(in)
: データ全体の表題. Title of entire data
source :character(*), intent(in)
: データを作成する際の手段. Source of data file
institution :character(*), intent(in)
: ファイルを最終的に変更した組織/個人. Institution or person that changes files for the last time
dims(:) :character(*), intent(in)
: 次元の名前.

配列の大きさに制限はありません. 個々の次元の文字数は dc_types#TOKEN まで. 配列内の文字数は 全て同じでなければなりません. 足りない文字分は空白で 補ってください.

Names of dimensions.

Length of array is unlimited. Limits of numbers of characters of each dimensions are "dc_types#TOKEN". Numbers of characters in this array must be same. Make up a deficit with blanks.

dimsizes(:) :integer, intent(in)
: dims で指定したそれぞれの次元大きさ.

配列の大きさは dims の大きさと等しい 必要があります. ‘0’ (数字のゼロ) を指定 するとその次元は 無制限次元 (unlimited dimension) となります. (gtool_history では時間の次元に対して無制限次元を 用いることを想定しています). ただし, 1 つの NetCDF ファイル (バージョン 3) は最大で 1 つの無制限次元しか持てないので, 2 ヶ所以上に ‘0’ を指定しないでください. その場合, 正しく gtool4 データが出力されません.

Lengths of dimensions specified with "dims".

Length of this array must be same as length of "dim". If ‘0’ (zero) is specified, the dimension is treated as unlimited dimension. (In "gtool_history", unlimited dimension is expected to be used as time). Note that one NetCDF file (version 3) can not have two or more unlimited dimensions, so that do not specify ‘0’ to two or more places. In that case, gtoo4 data is not output currently

longnames(:) :character(*), intent(in)
: dims で指定したそれぞれの次元の名前.

配列の大きさは dims の大きさ と等しい必要があります. 文字数 は dc_types#STRING まで. 配列内の文字数は 全て同じでなければなりません. 足りない文字分は空白で補います.

Names of dimensions specified with "dims".

Length of this array must be same as length of "dim". Limits of numbers of characters are "dc_types#STRING". Numbers of characters in this array must be same. Make up a deficit with blanks.

units(:) :character(*), intent(in)
: dims で指定したそれぞれの次元の単位.

配列の大きさは dims の大きさ と等しい必要があります. 文字数 は dc_types#STRING まで. 配列内の文字数は 全て同じでなければなりません. 足りない文字分は空白で補います.

Units of dimensions specified with "dims".

Length of this array must be same as length of "dim". Limits of numbers of characters are "dc_types#STRING". Numbers of characters in this array must be same. Make up a deficit with blanks.

origin :type(DC_DIFFTIME), intent(in)
: 時間の原点.

これは HistoryPut により変数を最初に 出力するときの時間となります.

省略した場合, 時間の原点には 自動的に 0.0 が設定されます.

Origin of time.

This time is used as time when first output is done by "HistoryPut".

If this argument is omitted, 0.0 is specified automatically.

interval :type(DC_DIFFTIME), intent(in), optional
: 出力時間間隔.

同じ変数に対して HistoryPut が複数回 呼ばれた時に, 自動的に時間変数がこの値 だけ増やされて出力されます. なお, 各々の出力ファイルにつき HistorySetTime を一度でも用いた場合, この値は無効に なるので注意してください.

省略した場合, 自動的に 1.0 が設定されます.

Interval of output time.

When "HistoryPut" is called two or more times for the same variable, time is increased as this value and output automatically. Note that this value becomes invalid when "HistorySetTime" is used for each output file even once.

If this argument is omitted, 1.0 is specified automatically.

xtypes(:) :character(*), intent(in), optional
: dims で指定したそれぞれの 次元のデータ型.

デフォルトは float (単精度実数型) です. 有効なのは, double (倍精度実数型), int (整数型) です. 指定しない 場合や, 無効な型を指定した場合には, float となります. なお, 配列の大きさ は dims の大きさと等しい必要が あります. 配列内の文字数は全て 同じでなければなりません. 足りない文字分は空白で補います.

Data types of dimensions specified with "dims".

Default value is "float" (single precision). Other valid values are "double" (double precision), "int" (integer). If no value or invalid value is specified, "float" is applied. Length of this array must be same as length of "dim". Numbers of characters in this array must be same. Make up a deficit with blanks.

history :type(GT_HISTORY), intent(out), optional, target
: 出力ファイルの設定に関する情報を 格納した構造体.

1 つのプログラムで複数のファイル に gtool データを出力する 場合に利用します. (単独のファイルに書き出す場合は 指定する必要はありません)

Derived type that stores information about output files.

If multiple gtool4 data files are output from one program, use this argument. (If onlye one file is output, this argument is not needed).

conventions :character(*), intent(in), optional
: 出力するファイルの netCDF 規約

省略した場合, もしくは空文字を与えた場合, 出力する netCDF 規約の Conventions 属性に値 gtool4_netCDF_Conventions が自動的に与えられます.

NetCDF conventions of output file.

If this argument is omitted or, blanks are given, gtool4_netCDF_Conventions is given to attribute "Conventions" of an output file automatically.

gt_version :character(*), intent(in), optional
: gtool4 netCDF 規約のバージョン

省略した場合, gt_version 属性に 規約の最新版のバージョンナンバー gtool4_netCDF_version が与えられます. (ただし, 引数 conventions に gtool4_netCDF_Conventions 以外が与えられる場合は gt_version 属性を作成しません).

Version of gtool4 netCDF Conventions.

If this argument is omitted, latest version number of gtool4 netCDF Conventions is given to attribute "gt_version" of an output file (However, gtool4_netCDF_Conventions is not given to an argument "conventions", attribute "gt_version" is not created).

overwrite :logical, intent(in), optional
: 上書き可否

この引数に .false. を渡すと, 既存のファイルを上書きしません. デフォルトは上書きします.

Whether or not to overwrite.

If .false. is specified to this argument, an existing file is not overwritten. By default, existing file is overwritten.

quiet :logical, intent(in), optional
: .true. を与えた場合, メッセージ出力が抑制されます. デフォルトは .false. です.

If ".true." is given, messages are suppressed. Default value is ".false.".

flag_mpi_gather :logical, intent(in), optional
: MPI 使用時に, 各ノードで HistoryPut に与えたデータを一つのファイルに統合して出力 する場合には .true. を与えてください. デフォルトは .false. です.

.true. を与えた場合, HistoryPutAxisMPI に全体の軸データを与えてください.

When MPI is used, if ".true." is given, data given to "HistoryPut" on each node is integrated and output to one file. Default value is ".false.".

If .true. is given, give data of axes in whole area to "HistoryPutAxisMPI"

flag_mpi_split :logical, intent(in), optional
: MPI 使用時にこの引数に .true. を与えると, 各ノードごとに file 引数に "_rankXXXXXX" (X は [0-9] の数値で, ノード番号を指す) を付加したファイルを出力します. 例えば, file に "output.nc" を与えた場合. ノード 0 では "output_rank000000.nc", ノード 12 では "output_rank000012.nc" を出力します. デフォルトは .false. です.

When MPI is used, if ".true." is given, files that have names with suffixes "_rankXXXXXX" (X is [0-9] that indicates node number) are output on each node. For example, "output.nc" is given to file, "output_rank000000.nc", "output_rank000012.nc" are output on node 0 and node 12. Default value is ".false.".

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

gtool4 データ出力用初期設定

このサブルーチンは、gtool4 データ出力の初期設定を行います。 HistoryAddVariable、 HistoryCopyVariable、 HistoryPut、 HistoryAddAttr、 HistoryClose、 HistorySetTime を用いるためには、HistoryCreate による初期設定が必要です。

なお、プログラム内で HistoryCreate を呼び出した場合、 プログラムを終了する前に必ず、 HistoryClose を呼び出して 終了処理を行なって下さい。

HistoryCreate というサブルーチン名は 2 つの別々の サブルーチンの総称名です。上記のサブルーチンも参照ください。

Two specific subroutines shares common part:

Both two ones initializes a dataset file. The result of type GT_HISTORY will be returned by history or managed internally if omitted. Mandatory global attributes are defined by arguments title, source, and institution; they are all declared as ((character(len = *))). Spatial axis definitions have two different forms: a primitive one uses several arrays of various types: dims, dimsizes, longnames, units, and xtypes. Another sophisticated one has only array of type GT_HISTORY_AXIS, axes. Temporal definition is done without origin, interval.

Original external subprogram is gtool/gtool_history/historycreate.F90#HistoryCreate2

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
: netCDF ファイル名. NetCDF filename.
varname :character(*), intent(in)
: 変数名. Variable name
array :real(DP), intent(out)
: 取得するデータを格納する配列

型は整数型, 単精度実数型, 倍精度実数型 かのいづれかです. 取得するデータの空 間次元のサイズと配列のサイズとが一致し ている必要があります. 入力するデータ の型と array の型が異なる場合は, 自 動的に array の型に変換されます.

Array in which input data is store

Type is integer or single precision real or double precision. Size of array must be identical to input data size. When type of input data is different from type of array, data is converted to type of array automatically.

range :character(*), intent(in), optional
: 切り出し用オプション. gtool4 変数のコンマ記法で記述 {(例: time=100.0,x=10:20,y=^1:^5)}

詳しくは gtool4 netCDF 規約 の「5.4 コンマ記法」を参照して ください.

Option for clipping. Give gtool4 comma-graphy {(ex. time=100.0,x=10:20,y=^1:^5)}

For details, see "5.4 gtool4 comma-graphy" in gtool4 netCDF Convention

quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
: MPI 使用時にこの引数に .true. を与えると, file 引数に "_rankXXXXXX" (X は [0-9] の数値で, ノード番号を指す) を付加したファイル名を各ノードで読み込みます. 例えば, file に "input.nc" を与えた場合. ノード 0 では "input_rank000000.nc", ノード 12 では "input_rank000012.nc" を読み込みます. デフォルトは .false. です.

When MPI is used, if ".true." is given, a filename that "_rankXXXXXX" (X is [0-9] that indicates node number) is added to file argument is loaded on each node. For example, "input.nc" is given to file, "input_rank000000.nc", "input_rank000012.nc" are loaded on node 0 and node 12. Default value is ".false.".

returned_time :real(DP), intent(out), optional
: データの時刻 入力データが時刻に依存する場合は 入力したデータの正確な時刻が返ります. 時間に依存しない場合, 0 が返ります.

If input data depend on time, true time is returned. If input data do not depend on time, 0 is returned.

flag_time_exist :logical, intent(out), optional
: 入力データが時刻に依存する場合は .true. が, そうでない場合は .false. が返ります.

If input data depend on time, .true. is returned. Otherwise, .false. is returned.

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

Note that Japanese and English are described in parallel.

netCDF データを入力します. gtool4 netCDF 規約に基づくデータを想定 していますが, 大抵の netCDF データの入力は可能であると期待されます.

デフォルトでは, ファイル内の最新データ, すなわちデータを 時刻最大で切り出したものを入力します. 別の時刻または 別の次元で切り出したデータを 入力したい場合には, 下記の time オプションもしくは range オプションを利用してください.

file にファイル名を, varname に変数名を与えます. array にはファイルから入力されたデータが返ります. ポインタの配列へデータを入力を行う場合は, HistoryGetPointer を利用してください.

ある時刻のデータを明示したい場合には, その時刻を time に与えます. 整数型, 単精度実数型, 倍精度実数型の数値を与えることが可能です.

range には gtool4 のコンマ記法 (gtool4 netCDF 規約 の「5.4 コンマ記法」参照) を与えることで, 任意の次元で入力データを切り出すことが可能です. range に空文字を与えた場合は切り出しを行いません.

HistoryGet は複数のサブルーチンの総称名です. array には 0 〜 7 次元の整数型, 単精度実数型, 倍精度実数型の配列を与えることが可能です.

デフォルトでは, データの入力時にどのファイルのどの変数が どの次元で切り出されて入力されたのかを表示します. メッセージ出力が不要な場合は quiet に .true. を与えてください.

Input netCDF data. NetCDF data with gtool4 conventions is assumed, but most netCDF data is expected to be input.

Give filename to file, variable name to varname. Input data is returned to array. If you want to use pointer array, use "HistoryGetPointer".

By default, recent data, that is to say, data clipped with maximum time is input. In order to input data clipped with other time or other dimension, use time option or range option as follows.

In order to get data at certain time, specify the time to time. Type is integer or single precision real or double precision.

Give gtool4 comma-graphy (See "5.4 gtool4 comma-graphy" in gtool4 netCDF Convention) to range, then input data can be clipped by an arbitrary dimension. If null character is given to range, data is not clipped.

HistoryGet is generic name of multiple subroutines. Integer, single precision real, and double precision real 0 — 7 rank array can be given to array.

By default, when data is input, filename and variable name and clipping information is printed. The message is suppressed when .true. is given to quiet

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble0

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :integer, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt0

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal0

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :integer, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt1

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real(DP), intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble1

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal1

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :integer, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt2

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real(DP), intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble2

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal2

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :integer, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt3

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real(DP), intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble3

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal3

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :integer, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt4

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real(DP), intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble4

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal4

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :integer, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt5

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real(DP), intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble5

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal5

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :integer, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt6

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real(DP), intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble6

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal6

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :integer, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt7

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real(DP), intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble7

HistoryGet( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real, intent(out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGet を参照してください.

See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal7

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :integer, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt0TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :integer, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt0TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :integer, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt0TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real(DP), intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble0TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real(DP), intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble0TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real(DP), intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble0TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal0TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal0TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal0TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :integer, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt1TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :integer, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt1TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :integer, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt1TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real(DP), intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble1TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real(DP), intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble1TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real(DP), intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble1TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal1TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal1TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal1TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :integer, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt2TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :integer, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt2TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :integer, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt2TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real(DP), intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble2TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real(DP), intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble2TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real(DP), intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble2TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal2TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal2TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal2TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :integer, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt3TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :integer, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt3TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :integer, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt3TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real(DP), intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble3TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real(DP), intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble3TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real(DP), intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble3TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal3TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal3TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal3TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :integer, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt4TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :integer, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt4TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :integer, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt4TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real(DP), intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble4TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real(DP), intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble4TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real(DP), intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble4TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal4TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal4TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal4TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :integer, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt5TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :integer, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt5TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :integer, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt5TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real(DP), intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble5TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real(DP), intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble5TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real(DP), intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble5TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal5TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal5TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal5TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :integer, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt6TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :integer, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt6TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :integer, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt6TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real(DP), intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble6TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real(DP), intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble6TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real(DP), intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble6TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal6TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal6TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal6TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :integer, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt7TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :integer, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt7TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :integer, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt7TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real(DP), intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble7TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real(DP), intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble7TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real(DP), intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble7TimeR

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real, intent(out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal7TimeI

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real, intent(out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal7TimeD

HistoryGet( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real, intent(out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGetPointer です. 使用方法に関しては HistoryGetPointer を参照してください.

This is "HistoryGetPointer" with numerical argument time for specification of time. See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal7TimeR

HistoryGetAttr( file, varname, attrname, value, [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
: netCDF ファイル名.
varname :character(*), intent(in)
: 変数名.
attrname :character(*), intent(in)
: 属性の名称.

"+" (プラス) を属性名の先頭につける場合には, 大域属性を取得します.

value :character(*), intent(out)
: 属性の値.
flag_mpi_split :logical, intent(in), optional
: MPI 使用時にこの引数に .true. を与えると, file 引数に "_rankXXXXXX" (X は [0-9] の数値で, ノード番号を指す) を付加したファイル名を各ノードで読み込みます. 例えば, file に "input.nc" を与えた場合. ノード 0 では "input_rank000000.nc", ノード 12 では "input_rank000012.nc" を読み込みます. デフォルトは .false. です.

When MPI is used, if ".true." is given, a filename that "_rankXXXXXX" (X is [0-9] that indicates node number) is added to file argument is loaded on each node. For example, "input.nc" is given to file, "input_rank000000.nc", "input_rank000012.nc" are loaded on node 0 and node 12. Default value is ".false.".

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

gtool4 データ内の変数の属性の取得

gtool4 データおよびそのデータ内の変数に設定されている属性を取得します。

属性名 attrname の先頭にプラス "+" を付加する 場合は、gtool4 データ自体の属性 (大域属性) として属性が取得されます。 この場合、varname は無視されますが、 その場合でも varname へはデータ内に存在する変数名を与えてください。

取得する属性が存在しない場合、以下の値が返ります。

character :"" (空文字)
real :netcdf_f77#NF_FILL_REAL
real(DP) :netcdf_f77#NF_FILL_REAL
integer :netcdf_f77#NF_FILL_INT

HistoryGetAttr は複数のサブルーチンの総称名です。value には いくつかの型を与えることが可能です。 下記のサブルーチンを参照ください。

Original external subprogram is gtool/gtool_history/historygetattr.F90#HistoryGettAttrChar0

HistoryGetAttr( file, varname, attrname, value, [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
attrname :character(*), intent(in)
value :integer, intent(out)
flag_mpi_split :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historygetattr.F90#HistoryGettAttrInt0

HistoryGetAttr( file, varname, attrname, value, [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
attrname :character(*), intent(in)
value :real(DP), intent(out)
flag_mpi_split :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historygetattr.F90#HistoryGettAttrDouble0

HistoryGetAttr( file, varname, attrname, value, [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
attrname :character(*), intent(in)
value :real, intent(out)
flag_mpi_split :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historygetattr.F90#HistoryGettAttrReal0

HistoryGetAttr( file, varname, attrname, value, [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
attrname :character(*), intent(in)
value(:) :integer, intent(out)
flag_mpi_split :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historygetattr.F90#HistoryGettAttrInt1

HistoryGetAttr( file, varname, attrname, value, [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
attrname :character(*), intent(in)
value(:) :real(DP), intent(out)
flag_mpi_split :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historygetattr.F90#HistoryGettAttrDouble1

HistoryGetAttr( file, varname, attrname, value, [flag_mpi_split], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
attrname :character(*), intent(in)
value(:) :real, intent(out)
flag_mpi_split :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historygetattr.F90#HistoryGettAttrReal1

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :integer, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt0Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real(DP), pointer
: (out)

取得するデータを格納する ポインタ配列.

必ず空状態の配列を与えてください. すなわち与える配列に対し, 初期値 =>null() を設定するか nullify を用いて ください. 既に割り付けられている場合, もしくは不定状態の場合にはエラーを返し ます.

型は整数型, 単精度実数型, 倍精度実数型 かのいづれかです. 入力するデータ の型と array の型が異なる場合は, 自 動的に array の型に変換されます.

Array in which input data is store.

Give null array to array. More specifically, use ’=>null()’ as initial value or use ‘nullify’ to the array. If the array is allocated already, or undefined, error is occurred.

Type is integer or single precision real or double precision real. When type of input data is different from type of array, data is converted to type of array automatically.

range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
: MPI 使用時にこの引数に .true. を与えると, file 引数に "_rankXXXXXX" (X は [0-9] の数値で, ノード番号を指す) を付加したファイル名を各ノードで読み込みます. 例えば, file に "input.nc" を与えた場合. ノード 0 では "input_rank000000.nc", ノード 12 では "input_rank000012.nc" を読み込みます. デフォルトは .false. です.

When MPI is used, if ".true." is given, a filename that "_rankXXXXXX" (X is [0-9] that indicates node number) is added to file argument is loaded on each node. For example, "input.nc" is given to file, "input_rank000000.nc", "input_rank000012.nc" are loaded on node 0 and node 12. Default value is ".false.".

returned_time :real(DP), intent(out), optional
: データの時刻 入力データが時刻に依存する場合は 入力したデータの正確な時刻が返ります. 時間に依存しない場合, 0 が返ります.

If input data depend on time, true time is returned. If input data do not depend on time, 0 is returned.

flag_time_exist :logical, intent(out), optional
: 入力データが時刻に依存する場合は .true. が, そうでない場合は .false. が返ります.

If input data depend on time, .true. is returned. Otherwise, .false. is returned.

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

Note that Japanese and English are described in parallel.

netCDF データを入力します. gtool4 netCDF 規約に基づくデータを想定 していますが, 大抵の netCDF データの入力は可能であると期待されます.

基本的な使い方に関しては HistoryGet を参照してください. HistoryGet との違いは, array にポインタ配列を与えることです. array には必ず空状態の配列を与えてください. すなわち与える配列に対し, 初期値 =>null() を設定するか nullify を用いてください. 既に割り付けられている場合, もしくは不定状態の場合には エラーを返します.

Input netCDF data. NetCDF data with gtool4 conventions is assumed, but most netCDF data is expected to be input.

See "HistoryGet", for basic usage. Difference from "HistoryGet" is that array is pointer array. Give null array to array. More specifically, use ’=>null()’ as initial value or use ‘nullify’ to the array. If the array is allocated already, or undefined, error is occurred.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble0Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal0Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :integer, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt1Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real(DP), pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble1Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal1Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :integer, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt2Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real(DP), pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble2Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal2Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :integer, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt3Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real(DP), pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble3Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal3Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :integer, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt4Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real(DP), pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble4Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal4Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :integer, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt5Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real(DP), pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble5Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal5Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :integer, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt6Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real(DP), pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble6Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal6Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :integer, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt7Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real(DP), pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble7Pointer

HistoryGetPointer( file, varname, array, [range], [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real, pointer
: (out)
range :character(*), intent(in), optional
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
: データの時刻
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

使用方法に関しては HistoryGetPointer を参照してください.

See "HistoryGetPointer", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal7Pointer

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :integer, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt0PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :integer, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt0PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :integer, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt0PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real(DP), pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble0PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real(DP), pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble0PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real(DP), pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble0PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal0PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal0PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array :real, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal0PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :integer, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt1PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :integer, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt1PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :integer, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt1PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real(DP), pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble1PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real(DP), pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble1PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real(DP), pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble1PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal1PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal1PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:) :real, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal1PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :integer, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt2PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :integer, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt2PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :integer, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt2PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real(DP), pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble2PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real(DP), pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble2PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real(DP), pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble2PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal2PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal2PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:) :real, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal2PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :integer, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt3PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :integer, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt3PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :integer, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt3PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real(DP), pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble3PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real(DP), pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble3PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real(DP), pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble3PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal3PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal3PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:) :real, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal3PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :integer, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt4PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :integer, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt4PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :integer, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt4PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real(DP), pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble4PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real(DP), pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble4PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real(DP), pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble4PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal4PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal4PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:) :real, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal4PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :integer, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt5PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :integer, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt5PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :integer, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt5PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real(DP), pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble5PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real(DP), pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble5PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real(DP), pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble5PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal5PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal5PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:) :real, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal5PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :integer, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt6PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :integer, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt6PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :integer, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt6PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real(DP), pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble6PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real(DP), pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble6PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real(DP), pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble6PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal6PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal6PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal6PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :integer, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt7PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :integer, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt7PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :integer, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetInt7PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real(DP), pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble7PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real(DP), pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble7PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real(DP), pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetDouble7PointerTimeR

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real, pointer
: (out)
time :integer, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal7PointerTimeI

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real, pointer
: (out)
time :real(DP), intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal7PointerTimeD

HistoryGetPointer( file, varname, array, time, [quiet], [flag_mpi_split], [returned_time], [flag_time_exist], [err] )
Subroutine :
file :character(*), intent(in)
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real, pointer
: (out)
time :real, intent(in)
quiet :logical, intent(in), optional
flag_mpi_split :logical, intent(in), optional
returned_time :real(DP), intent(out), optional
flag_time_exist :logical, intent(out), optional
err :logical, intent(out), optional

Note that Japanese and English are described in parallel.

数値型引数 time で時刻指定可能な HistoryGet です. 使用方法に関しては HistoryGet を参照してください.

This is "HistoryGet" with numerical argument time for specification of time. See "HistoryGet", for basic usage.

Original external subprogram is gtool/gtool_history/historyget.F90#HistoryGetReal7PointerTimeR

HistoryInitialized( history ) result(result)
Function :
result :logical
history :type(GT_HISTORY), intent(in)

history が初期設定されている場合には .true. が, 初期設定されていない場合には .false. が返ります.

If history is initialized, .true. is returned. If history is not initialized, .false. is returned.

Original external subprogram is gtool/gtool_history/historyinitialized.f90#HistoryInitialized0

HistoryInquire( history, [err], [file], [title], [source], [dims], [dimsizes], [longnames], [units], [xtypes], [institution], [origin], [interval], [newest], [oldest], [conventions], [gt_version], [axes], [varinfo] )
Subroutine :
history :character(*), intent(in)
err :logical, intent(out), optional
file :character(*), intent(out), optional
title :character(*), intent(out), optional
source :character(*), intent(out), optional
dims(:) :character(*), pointer, optional
: (out)
dimsizes(:) :integer,pointer, optional
: (out)
longnames(:) :character(*), pointer, optional
: (out)
units(:) :character(*), pointer, optional
: (out)
xtypes(:) :character(*), pointer, optional
: (out)
institution :character(*), intent(out), optional
origin :real,intent(out), optional
interval :real,intent(out), optional
newest :real,intent(out), optional
oldest :real,intent(out), optional
conventions :character(*), intent(out), optional
gt_version :character(*), intent(out), optional
axes(:) :type(GT_HISTORY_AXIS), pointer, optional
: (out)
varinfo(:) :type(GT_HISTORY_VARINFO), pointer, optional
: (out)

GT_HISTORY 型変数への問い合わせ

HistoryCreate で history を指定しなかった場合はこちらの サブルーチンで問い合わせを行います。 history には必ず "default" という文字列を与えてください。

HistoryInquire は 2 つのサブルーチンの総称名です。 各引数の情報に関しては下記のサブルーチンを参照してください。

Original external subprogram is gtool/gtool_history/historyinquire.f90#HistoryInquire2

HistoryInquire( history, [err], [file], [title], [source], [dims], [dimsizes], [longnames], [units], [xtypes], [institution], [origin], [interval], [newest], [oldest], [conventions], [gt_version], [axes], [varinfo] )
Subroutine :
history :type(GT_HISTORY), intent(in)
err :logical, intent(out), optional
file :character(*), intent(out), optional
title :character(*), intent(out), optional
source :character(*), intent(out), optional
dims(:) :character(*), pointer, optional
: (out)
dimsizes(:) :integer,pointer, optional
: (out)
longnames(:) :character(*), pointer, optional
: (out)
units(:) :character(*), pointer, optional
: (out)
xtypes(:) :character(*), pointer, optional
: (out)
institution :character(*), intent(out), optional
origin :real,intent(out), optional
interval :real,intent(out), optional
newest :real,intent(out), optional
: 最新の時刻
oldest :real,intent(out), optional
: 最初の時刻
conventions :character(*), intent(out), optional
gt_version :character(*), intent(out), optional
axes(:) :type(GT_HISTORY_AXIS), pointer, optional
: (out)
varinfo(:) :type(GT_HISTORY_VARINFO), pointer, optional
: (out)

GT_HISTORY 型変数への問い合わせ

HistoryCreate や HistoryAddVariable などで設定した値の 参照を行います。

file, title, source, institution, origin, interval, conventions, gt_version, dims, dimsizes, longnames, units, xtypes に関しては HistoryCreate を参照してください。

title, source, institution, origin, interval, conventions, gt_version に関しては、値が得られなかった場合は "unknown" が返ります。

dims, dimsizes, longnames, units, xtypes に関してはポインタに 値を返すため、必ずポインタを空状態にしてから与えてください。

axes と varinfo にはそれぞれ座標軸情報と変数情報を返します。 将来的には全ての属性の値も一緒に返す予定ですが、現在は long_name, units, xtype のみが属性の値として返ります。

HistoryInquire は 2 つのサブルーチンの総称名です。 HistoryCreate で history を与えなかった場合の問い合わせに関しては 上記のサブルーチンを参照してください。

エラー

以下の場合に、このサブルーチンはエラーを生じプログラムを終了させます。 ただし、err 引数を与える場合、この引数に .true. を 返し、プログラムは続行します。

Original external subprogram is gtool/gtool_history/historyinquire.f90#HistoryInquire1

HistoryPut( varname, value, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
: 変数の名前

ただし、ここで指定するもの は、 HistoryCreateの dims または HistoryAddVariable や HistoryCopyVariable の varname で既に指定されてい なければなりません。

value :real(DP), intent(in)
: 変数が出力するデータ

型は単精度実数型でも 倍精度実数型でもよいですが、 HistoryAddVariable の xtype で指定した データ型と異なる 型を渡した場合、xtype で 指定した型に変換されます。

history :type(GT_HISTORY), intent(inout), optional, target
: 出力ファイルの設定に関する情報を 格納した構造体

ここに指定するものは、 HistoryCreate によって初期設定 されていなければなりません。

range :character(*), intent(in), optional
: gtool4 のコンマ記法による データの出力範囲指定

このオプションを用いる 際には、必ず HistorySetTime によって明示的に時刻の設定 を行ってください。 また、HistoryGet と異なり、 時刻に関する範囲指定は 行なえません。

書式に関する詳細は gtool4 netCDF 規約 の「5.4 コンマ記法」を参照して ください。

time :real, intent(in), optional
: 時刻. (単精度実数型)

この引数を与える場合, 出力するかどうかをプログラムが 自動的に判断します. time に与えられた数値が HistoryCreate に与えた interval で割り切れる場合には出力が行われます.

HistoryAddVariable で time_average (または average) に .true. を与えた場合には, time, difftime のどちらの引数も与えない場合に, プログラムはエラーを発生させます.

この引数と difftime, time_average_store が同時に与えられた場合, time_average_store が優先されます.

また, この引数と range は併用できません. 併用した場合には, プログラムはエラーを発生させます.

quiet :logical, intent(in), optional
: .true. を与えた場合, メッセージ出力が抑制されます.

If ".true." is given, messages are suppressed.

difftime :type(DC_DIFFTIME), intent(in), optional
: 時刻 (dc_date_types#DC_DIFFTIME 型)

効果は time と同様です.

timed :real(DP), intent(in), optional
: 時刻 (倍精度実数型)

効果は time と同様です.

time_average_store :logical, intent(in), optional
: 平均値の出力フラグ. この値に .true. を与えた場合には, 出力せずに与えられた値を一旦蓄えます. .false. を与えた場合には, time もしくは difftime と HistoryCreate に与えた interval に 関わらず出力を行います.

HistoryAddVariable で time_average (または average) に .true. を与えない場合は無効です.

time と difftime のどちらかを同時に与える必要があります.

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

データ出力

gtool4 データ内の変数へデータの出力を行います。 このサブルーチンを用いる前に、HistoryCreate による初期設定が必要です。

HistoryPut は複数のサブルーチンの総称名です。value に 変数 (整数型、単精度実数型、倍精度実数型、文字型) もしくは 1 〜 7 次元の配列 (整数型、単精度実数型、倍精度実数型) を与えることが可能です。 下記の同名のサブルーチンを参照ください。 ただし、多次元配列を与える際の引数キーワードには array を用いてください。

HistoryPut を最初に呼んだ時、時間次元の変数は HistoryCreate の origin の値に設定されます。

ある変数 varname に対して HistoryPut を複数回呼ぶと、 HistoryCreate の interval × HistoryPut を呼んだ回数、 の分だけ 時間次元の変数の値が増やされます。 ただし、時間平均値を出力する場合は例外です。 以下の時間平均に関する項目を参照ください。

これらの時間次元の変数の値を明示的に設定したい場合は HistorySetTime を用いるか、HistoryPut 自身で時間次元の変数へ値 を出力してください。

  • 時間平均について

    時間平均については HistoryAddVariable を参照ください。

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutDouble0

HistoryPut( varname, value, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
value :integer, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutInt0

HistoryPut( varname, value, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
value :real, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutReal0

HistoryPut( varname, value, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
value :character(*), intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutChar0

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:) :integer, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutInt1

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:) :real(DP), intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutDouble1

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:) :real, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutReal1

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:) :integer, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutInt2

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:) :real(DP), intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutDouble2

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:) :real, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutReal2

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:) :integer, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutInt3

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:) :real(DP), intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutDouble3

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:) :real, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutReal3

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:) :integer, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutInt4

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:) :real(DP), intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutDouble4

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:) :real, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutReal4

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:,:) :integer, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutInt5

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:,:) :real(DP), intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutDouble5

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:,:) :real, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutReal5

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:,:,:) :integer, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutInt6

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real(DP), intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutDouble6

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:,:,:) :real, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutReal6

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :integer, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutInt7

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real(DP), intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutDouble7

HistoryPut( varname, array, [history], [range], [time], [quiet], [difftime], [timed], [time_average_store], [err] )
Subroutine :
varname :character(*), intent(in)
array(:,:,:,:,:,:,:) :real, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
range :character(*), intent(in), optional
time :real, intent(in), optional
quiet :logical, intent(in), optional
difftime :type(DC_DIFFTIME), intent(in), optional
timed :real(DP), intent(in), optional
time_average_store :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutReal7

HistoryPutAxisMPI( varname, array, [history], [err] )
Subroutine :
varname :character(*), intent(in)
: 座標変数の名称.

ここで指定するものは, HistoryCreate の 引数 dims で既に指定されてい なければなりません.

Name of dimensional variable.

This name must be specified by an argument dims in "HistoryCreate".

array(:) :real(DP), intent(in)
: 座標データ.

Data of axes.

history :type(GT_HISTORY), intent(inout), optional, target
: 出力ファイルの設定に関する情報を 格納した GT_HISTORY 型変数

ここに指定するものは, HistoryCreate によって初期設定 されていなければなりません.

A "GT_HISTORY" type variable that stores information about configuration of an output file

This must be initialized by "HistoryCreate".

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

MPI 使用時に, 各々のノード上のデータを単一ファイルに 集約して出力する場合には, このサブルーチンに領域全体の座標データを与えてください. また, HistoryCreate のオプショナル論理型引数 flag_mpi_gather に .true. を与えてください.

HistoryPut よりも後に使用してください HistoryAddVariable, HistoryAddAttr よりも前に使用してください.

When MPI is used, if data on each node is integrated and output to one file, give data of axes in whole area to this subroutine. And give .true. to optional logical argument flag_mpi_gather in "HistoryCreate".

Use this subroutine after "HistoryPut", and before "HistoryAddVariable", "HistoryAddAttr".

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutAxisMPIDouble

HistoryPutAxisMPI( varname, array, [history], [err] )
Subroutine :
varname :character(*), intent(in)
array(:) :integer, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
err :logical, intent(out), optional

MPI 使用時に, 各々のノード上のデータを単一ファイルに 集約して出力する場合には, このサブルーチンに領域全体の座標データを与えてください. また, HistoryCreate のオプショナル論理型引数 flag_mpi_gather に .true. を与えてください.

HistoryPut よりも後に使用してください HistoryAddVariable, HistoryAddAttr よりも前に使用してください.

When MPI is used, if data on each node is integrated and output to one file, give data of axes in whole area to this subroutine. And give .true. to optional logical argument flag_mpi_gather in "HistoryCreate".

Use this subroutine after "HistoryPut", and before "HistoryAddVariable", "HistoryAddAttr".

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutAxisMPIInt

HistoryPutAxisMPI( varname, array, [history], [err] )
Subroutine :
varname :character(*), intent(in)
array(:) :real, intent(in)
history :type(GT_HISTORY), intent(inout), optional, target
err :logical, intent(out), optional

MPI 使用時に, 各々のノード上のデータを単一ファイルに 集約して出力する場合には, このサブルーチンに領域全体の座標データを与えてください. また, HistoryCreate のオプショナル論理型引数 flag_mpi_gather に .true. を与えてください.

HistoryPut よりも後に使用してください HistoryAddVariable, HistoryAddAttr よりも前に使用してください.

When MPI is used, if data on each node is integrated and output to one file, give data of axes in whole area to this subroutine. And give .true. to optional logical argument flag_mpi_gather in "HistoryCreate".

Use this subroutine after "HistoryPut", and before "HistoryAddVariable", "HistoryAddAttr".

Original external subprogram is gtool/gtool_history/historyput.F90#HistoryPutAxisMPIReal

HistoryPutLine( [history], [unit], [indent], [err] )
Subroutine :
history :type(GT_HISTORY), intent(in), target, optional
unit :integer, intent(in), optional
: 出力先の装置番号. デフォルトの出力先は標準出力.

Unit number for output. Default value is standard output.

indent :character(*), intent(in), optional
: 表示されるメッセージの字下げ.

Indent of displayed messages.

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

引数 history に設定されている情報を印字します. デフォルトではメッセージは標準出力に出力されます. unit に装置番号を指定することで, 出力先を変更することが可能です.

Print information of history. By default messages are output to standard output. Unit number for output can be changed by unit argument.

Original external subprogram is gtool/gtool_history/historyputline.f90#HistoryPutLine

HistorySetTime( [time], [history], [difftime], [timed] )
Subroutine :
time :real, intent(in), optional
: 時刻

ここで言う "時刻" とは、 HistoryCreate の dims で "0" と指定されたものです。 もしも時刻が定義されていな い場合は、 このサブルーチン は何の効果も及ぼしません。

history :type(GT_HISTORY), intent(inout), optional, target
: 出力ファイルの設定に関する情報を 格納した構造体

ここに指定するものは、 HistoryCreate によって初期設定 されていなければなりません。

difftime :type(DC_DIFFTIME), intent(in), optional
: 時刻 (dc_date_types#DC_DIFFTIME 型)

ここで言う "時刻" とは、 HistoryCreate の dims で "0" と指定されたものです。 もしも時刻が定義されていな い場合は、 このサブルーチン は何の効果も及ぼしません。

timed :real(DP), intent(in), optional
: 時刻 (倍精度実数型)

ここで言う "時刻" とは、 HistoryCreate の dims で "0" と指定されたものです。 もしも時刻が定義されていな い場合は、 このサブルーチン は何の効果も及ぼしません。

時刻指定

明示的に時刻指定を行なうためのサブルーチンです。 このサブルーチンを用いる前に、HistoryCreate による初期設定が必要です。 このサブルーチンを使用する事で HistoryCreate の interval が無効 になるので注意してください。

Original external subprogram is gtool/gtool_history/historysettime.F90#HistorySetTime

HistoryVarinfoAddAttr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :character(*), intent(in)
: 属性に与えられる値

配列の場合でも、数値型以外 では配列の 1 つ目の要素のみ 値として付加されます。

err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

GT_HISTORY_VARINFO 型変数への属性付加

GT_HISTORY_VARINFO 型の変数 varinfo へ属性を付加します。

HistoryVarinfoAddAttr は複数のサブルーチンの総称名です。 value には様々な型の引数を与えることが可能です。 下記のサブルーチンを参照ください。

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttrChar0

HistoryVarinfoAddAttr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :integer, intent(in)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttrInt0

HistoryVarinfoAddAttr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :logical, intent(in)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttrLogical0

HistoryVarinfoAddAttr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :real(DP), intent(in)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttrDouble0

HistoryVarinfoAddAttr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :real, intent(in)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttrReal0

HistoryVarinfoAddAttr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :integer, intent(in)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttrInt1

HistoryVarinfoAddAttr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :real(DP), intent(in)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttrDouble1

HistoryVarinfoAddAttr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :real, intent(in)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttrReal1

HistoryVarinfoClear( varinfo, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

GT_HISTORY_VARINFO 型変数初期化

varinfo で与えられた変数を HistoryVarinfoCreate による初期設定よりも さらに前の状態に初期化します。

Destructor of GT_HISTORY_VARINFO

Original external subprogram is gtool/gtool_history/historyvarinfoclear.f90#HistoryVarinfoClear0

HistoryVarinfoCopy( varinfo_dest, varinfo_src, [err], [name], [dims], [longname], [units], [xtype] )
Subroutine :
varinfo_dest :type(GT_HISTORY_VARINFO),intent(out)
varinfo_src :type(GT_HISTORY_VARINFO),intent(in)
err :logical, intent(out), optional
name :character(*) , intent(in), optional
: 次元変数名
dims(:) :character(*) , intent(in), optional, target
: 依存する次元
longname :character(*) , intent(in), optional
: 次元変数の記述的名称
units :character(*) , intent(in), optional
: 次元変数の単位
xtype :character(*) , intent(in), optional
: 次元変数の型

GT_HISTORY_VARINFO 型変数コピー

GT_HISTORY_VARINFO 型の変数 varinfo_src を varinfo_dest にコピーします。 varinfo_src は HistoryVarinfoCreate によって初期設定されている必要が あります。 さらに属性を付加する場合には HistoryVarinfoAddAttr を用いてください。

err を与えておくと、コピーの際何らかの不具合が生じても 終了せずに err が真になって返ります。

err 以降の引数は、コピーの際に上書きする値です。

Original external subprogram is gtool/gtool_history/historyvarinfocopy.f90#HistoryVarinfoCopy1

HistoryVarinfoCreate( varinfo, name, dims, longname, units, [xtype], [time_average], [average], [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
name :character(*), intent(in)
: 変数名
dims(:) :character(*), intent(in)
: 依存する次元
longname :character(*), intent(in)
: 変数の記述的名称
units :character(*), intent(in)
: 変数の単位
xtype :character(*), intent(in), optional
: 変数の型
time_average :logical, intent(in), optional
: 時間平均
average :logical, intent(in), optional
: 時間平均 (後方互換用)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

GT_HISTORY_VARINFO 型変数作成

GT_HISTORY_VARINFO 型変数を作成します。 このサブルーチンによる設定の後、 HistoryAddVariable の varinfo に与えます。 さらに属性を付加する場合には HistoryVarinfoAddAttr を用いてください。

Constructor of GT_HISTORY_VARINFO

Original external subprogram is gtool/gtool_history/historyvarinfocreate.f90#HistoryVarinfoCreate1

HistoryVarinfoInitialized( varinfo ) result(result)
Function :
result :logical
varinfo :type(GT_HISTORY_VARINFO),intent(in)

varinfo が初期設定されている場合には .true. が, 初期設定されていない場合には .false. が返ります.

If varinfo is initialized, .true. is returned. If varinfo is not initialized, .false. is returned.

Original external subprogram is gtool/gtool_history/historyvarinfoinitialized.f90#HistoryVarinfoInitialized0

HistoryVarinfoInquire( varinfo, [name], [dims], [longname], [units], [xtype], [time_average], [average], [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(in)
name :character(*), intent(out), optional
: 変数名
dims(:) :character(*), pointer, optional
: (out) 依存する次元
longname :character(*), intent(out), optional
: 変数の記述的名称
units :character(*), intent(out), optional
: 変数の単位
xtype :character(*), intent(out), optional
: 変数の型
time_average :logical, intent(out), optional
: 時間平均
average :logical, intent(out), optional
: 時間平均 (後方互換用)
err :logical, intent(out), optional
: 例外処理用フラグ. デフォルトでは, この手続き内でエラーが 生じた場合, プログラムは強制終了します. 引数 err が与えられる場合, プログラムは強制終了せず, 代わりに err に .true. が代入されます.

Exception handling flag. By default, when error occur in this procedure, the program aborts. If this err argument is given, .true. is substituted to err and the program does not abort.

GT_HISTORY_VARINFO 型変数への問い合わせ

GT_HISTORY_VARINFO 型の変数内の各情報を参照します。

dims はポインタ配列です。空状態にして与えてください。

Original external subprogram is gtool/gtool_history/historyvarinfoinquire.f90#HistoryVarinfoInquire1

Inquire( axis, [name], [size], [longname], [units], [xtype] )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(in)
name :character(*) , intent(out), optional
: 次元変数名
size :integer, intent(out), optional
: 次元長 (配列サイズ)
longname :character(*) , intent(out), optional
: 次元変数の記述的名称
units :character(*) , intent(out), optional
: 次元変数の単位
xtype :character(*) , intent(out), optional
: 次元変数の型

使用方法は HistoryAxisInquire と同様です.

Usage is same as "HistoryAxisInquire".

Original external subprogram is gtool/gtool_history/historyaxisinquire.f90#HistoryAxisInquire2

Inquire( history, [err], [file], [title], [source], [dims], [dimsizes], [longnames], [units], [xtypes], [institution], [origin], [interval], [newest], [oldest], [conventions], [gt_version], [axes], [varinfo] )
Subroutine :
history :character(*), intent(in)
err :logical, intent(out), optional
file :character(*), intent(out), optional
title :character(*), intent(out), optional
source :character(*), intent(out), optional
dims(:) :character(*), pointer, optional
: (out)
dimsizes(:) :integer,pointer, optional
: (out)
longnames(:) :character(*), pointer, optional
: (out)
units(:) :character(*), pointer, optional
: (out)
xtypes(:) :character(*), pointer, optional
: (out)
institution :character(*), intent(out), optional
origin :real,intent(out), optional
interval :real,intent(out), optional
newest :real,intent(out), optional
oldest :real,intent(out), optional
conventions :character(*), intent(out), optional
gt_version :character(*), intent(out), optional
axes(:) :type(GT_HISTORY_AXIS), pointer, optional
: (out)
varinfo(:) :type(GT_HISTORY_VARINFO), pointer, optional
: (out)

使用方法は HistoryInquire と同様です.

Usage is same as "HistoryInquire".

Original external subprogram is gtool/gtool_history/historyinquire.f90#HistoryInquire4

Inquire( history, [err], [file], [title], [source], [dims], [dimsizes], [longnames], [units], [xtypes], [institution], [origin], [interval], [newest], [oldest], [conventions], [gt_version], [axes], [varinfo] )
Subroutine :
history :type(GT_HISTORY), intent(in)
err :logical, intent(out), optional
file :character(*), intent(out), optional
title :character(*), intent(out), optional
source :character(*), intent(out), optional
dims(:) :character(*), pointer, optional
: (out)
dimsizes(:) :integer,pointer, optional
: (out)
longnames(:) :character(*), pointer, optional
: (out)
units(:) :character(*), pointer, optional
: (out)
xtypes(:) :character(*), pointer, optional
: (out)
institution :character(*), intent(out), optional
origin :real,intent(out), optional
interval :real,intent(out), optional
newest :real,intent(out), optional
: 最新の時刻
oldest :real,intent(out), optional
: 最初の時刻
conventions :character(*), intent(out), optional
gt_version :character(*), intent(out), optional
axes(:) :type(GT_HISTORY_AXIS), pointer, optional
: (out)
varinfo(:) :type(GT_HISTORY_VARINFO), pointer, optional
: (out)

使用方法は HistoryInquire と同様です.

Usage is same as "HistoryInquire".

Original external subprogram is gtool/gtool_history/historyinquire.f90#HistoryInquire3

Inquire( varinfo, [name], [dims], [longname], [units], [xtype], [time_average], [average], [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(in)
name :character(*), intent(out), optional
: 変数名
dims(:) :character(*), pointer, optional
: (out) 依存する次元
longname :character(*), intent(out), optional
: 変数の記述的名称
units :character(*), intent(out), optional
: 変数の単位
xtype :character(*), intent(out), optional
: 変数の型
time_average :logical, intent(out), optional
: 時間平均
average :logical, intent(out), optional
: 時間平均 (後方互換用)
err :logical, intent(out), optional

使用方法は HistoryVarinfoInquire と同様です.

Usage is same as "HistoryVarinfoInquire".

Original external subprogram is gtool/gtool_history/historyvarinfoinquire.f90#HistoryVarinfoInquire2

Put_Attr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :character(*), intent(in)

使用方法は HistoryAxisAddAttr と同様です.

Usage is same as "HistoryAxisAddAttr".

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttr2Char0

Put_Attr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :integer, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttr2Int0

Put_Attr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :logical, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttr2Logical0

Put_Attr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :real(DP), intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttr2Double0

Put_Attr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :real, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttr2Real0

Put_Attr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :integer, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttr2Int1

Put_Attr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :real(DP), intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttr2Double1

Put_Attr( axis, attrname, value )
Subroutine :
axis :type(GT_HISTORY_AXIS),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :real, intent(in)

Original external subprogram is gtool/gtool_history/historyaxisaddattr.f90#HistoryAxisAddAttr2Real1

Put_Attr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :character(*), intent(in)
err :logical, intent(out), optional

使用方法は HistoryVarinfoAddAttr と同様です.

Usage is same as "HistoryVarinfoAddAttr".

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttr2Char0

Put_Attr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :integer, intent(in)
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttr2Int0

Put_Attr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :logical, intent(in)
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttr2Logical0

Put_Attr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :real(DP), intent(in)
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttr2Double0

Put_Attr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value :real, intent(in)
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttr2Real0

Put_Attr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :integer, intent(in)
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttr2Int1

Put_Attr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :real(DP), intent(in)
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttr2Double1

Put_Attr( varinfo, attrname, value, [err] )
Subroutine :
varinfo :type(GT_HISTORY_VARINFO),intent(inout)
attrname :character(*), intent(in)
: 属性の名前
value(:) :real, intent(in)
err :logical, intent(out), optional

Original external subprogram is gtool/gtool_history/historyvarinfoaddattr.f90#HistoryVarinfoAddAttr2Real1

initialized( history ) result(result)
Function :
result :logical
history :type(GT_HISTORY), intent(in)

使用方法は HistoryInitialized と同様です.

Usage is same as "HistoryInitialized".

Original external subprogram is gtool/gtool_history/historyinitialized.f90#HistoryInitialized1