Class gtdata_netcdf_generic
In: gtdata/gtdata_netcdf/gtdata_netcdf_generic.f90

抽象 netCDF インターフェイスの総称宣言

Methods

Close   Create   Create   GDNcVarSync   GDNcXTypeName   Get   Get   Get   Inquire   Inquire   Inquire   InquirePlus   Open   Open   Put   Put   Put   Put_Attr   Put_Attr   Put_Attr   Put_Attr   Search_dim   attr_next   attr_rewind   copy_attr   del_attr   get_attr   get_attr   get_attr   get_attr   get_attr   toString   var_search   var_search  

Included Modules

gtdata_netcdf_types dc_types

Public Instance methods

Close( var, [err] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
err :logical, intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncvarclose.f90#GDNcVarClose

Create( var, url, xtype, dims, [overwrite], [err] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(out)
url :character(len = *), intent(in)
xtype :character(len = *), intent(in)
dims(:) :type(GD_NC_VARIABLE), intent(in)
overwrite :logical, intent(in), optional
err :logical, intent(out), optional

変数作成

変数 URL url に変数を作成します. 変数が依存する次元を dims に与えます. 返される引数 var には変数 ID などの情報が格納されます.

overwrite に .true. を設定すると上書き可能なモードになります. デフォルトは上書き不可です. err を与える場合, 次元変数生成時にエラーが生じても プログラムを終了せず, err に .false. が返ります.

Original external subprogram is gtdata/gtdata_netcdf/gdncvarcreate.f90#GDNcVarCreate

Create( var, url, xtype, length, [overwrite], [err] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(out)
url :character(len = *), intent(in)
xtype :character(len = *), intent(in)
length :integer, intent(in)
overwrite :logical, intent(in), optional
err :logical, intent(out), optional

次元変数作成

変数 URL url に次元変数を作成します. 次元変数の長さを length に与えます. 返される引数 var には変数 ID などの情報が格納されます.

overwrite に .true. を設定すると上書き可能なモードになります. デフォルトは上書き不可です. err を与える場合, 次元変数生成時にエラーが生じても プログラムを終了せず, err に .false. が返ります.

Original external subprogram is gtdata/gtdata_netcdf/gdncvarcreated.f90#GDNcVarCreateD

GDNcVarSync( [var], [stat] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in), optional
stat :integer, intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncvarsync.f90#GDNcVarSync

GDNcXTypeName( ixtype, xtype )
Subroutine :
ixtype :integer, intent(in)
xtype :character(*), intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncxtypename.f90#GDNcXTypeName

Get( var, start, cnt, stride, imap, siz, value, iostat )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
start(:) :integer, intent(in)
cnt(:) :integer, intent(in)
stride(:) :integer, intent(in)
imap(:) :integer, intent(in)
: NetCDF変数と内部データ配列のメモリ内構 造間のマッピングを指定する整数ベクトル. 詳しくは NetCDF マニュアル (NF_PUT_VARM_type 等 を参照のこと)
siz :integer, intent(in)
value(siz) :integer, intent(out)
iostat :integer, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncvargetnum.f90#GDNcVarGetInt

Get( var, start, cnt, stride, imap, siz, value, iostat )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
start(:) :integer, intent(in)
cnt(:) :integer, intent(in)
stride(:) :integer, intent(in)
imap(:) :integer, intent(in)
: NetCDF変数と内部データ配列のメモリ内構 造間のマッピングを指定する整数ベクトル. 詳しくは NetCDF マニュアル (NF_PUT_VARM_type 等 を参照のこと)
siz :integer, intent(in)
value(siz) :real(DP), intent(out)
iostat :integer, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncvargetnum.f90#GDNcVarGetDouble

Get( var, start, cnt, stride, imap, siz, value, iostat )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
start(:) :integer, intent(in)
cnt(:) :integer, intent(in)
stride(:) :integer, intent(in)
imap(:) :integer, intent(in)
: NetCDF変数と内部データ配列のメモリ内構 造間のマッピングを指定する整数ベクトル. 詳しくは NetCDF マニュアル (NF_PUT_VARM_type 等 を参照のこと)
siz :integer, intent(in)
value(siz) :real, intent(out)
iostat :integer, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncvargetnum.f90#GDNcVarGetReal

Inquire( var, [ndims], [dimlen], [growable], [name], [url], [xtype] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
ndims :integer, intent(out), optional
: 変数の次元数
dimlen :integer, intent(out), optional
: 変数が１次元である場合、次元長
growable :logical, intent(out), optional
: 変数が成長可能次元を持つか
name :character(*), intent(out), optional
: 文字型引数が短いと値の切り詰めが起こりうる。’?’ のあとの変数名
url :character(*), intent(out), optional
: 変数名、少なくともファイル名を含む、なるべく長い名前
xtype :character(*), intent(out), optional
: 変数の型名

Original external subprogram is gtdata/gtdata_netcdf/gdncvarinquire.f90#GDNcVarInquire

Inquire( var, attrname, [xtype] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
attrname :character(len=*), intent(in)
xtype :character(len=*), intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncattrinquire.f90#GDNcAttrInquire

Inquire( var, dimlen )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
dimlen(:) :integer, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncvarinquireia.f90#GDNcVarInquireIA

InquirePlus( var, attrname, varid, nf_attrname )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
attrname :character(len=*), intent(in)
varid :integer, intent(out)
nf_attrname :character(len=*), intent(out)

ﾀ�����A�N�Z�X�����������g�� varid, attrname ������. attrname �������� ’+’ —> ���������������wｦ. attrname �������� ’-’ —> ���������A������������������.

Original external subprogram is gtdata/gtdata_netcdf/gdncattrinquire.f90#GDNcAttrInquirePlus

Open( var, src_var, dimord, [err] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(out)
src_var :type(GD_NC_VARIABLE), intent(in)
dimord :integer, intent(in)
err :logical, intent(out), optional

既に開かれた変数 src_var の dimord 番目の次元にあたる変数を 開き var に格納します。

変数を開く際にエラーが生じた場合、メッセージを出力してプログラムは 強制終了します。err を与えてある場合にはこの引数に .true. が返り、プログラムは終了しません。

Original external subprogram is gtdata/gtdata_netcdf/gdncvaropenbydimord.f90#GDNcVarOpenByDimOrd

Open( var, url, [writable], [err] )
Subroutine :recursive
var :type(GD_NC_VARIABLE), intent(out)
url :character(len = *), intent(in)
writable :logical, intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncvaropen.f90#GDNcVarOpen

Put( var, start, count, stride, imap, siz, value, iostat )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
start(:) :integer, intent(in)
count(:) :integer, intent(in)
stride(:) :integer, intent(in)
imap(:) :integer, intent(in)
siz :integer, intent(in)
value(siz) :integer, intent(in)
iostat :integer, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncvarputnum.f90#GDNcVarPutInt

Put( var, start, count, stride, imap, siz, value, iostat )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
start(:) :integer, intent(in)
count(:) :integer, intent(in)
stride(:) :integer, intent(in)
imap(:) :integer, intent(in)
siz :integer, intent(in)
value(siz) :real(DP), intent(in)
iostat :integer, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncvarputnum.f90#GDNcVarPutDouble

Put( var, start, count, stride, imap, siz, value, iostat )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
start(:) :integer, intent(in)
count(:) :integer, intent(in)
stride(:) :integer, intent(in)
imap(:) :integer, intent(in)
siz :integer, intent(in)
value(siz) :real, intent(in)
iostat :integer, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncvarputnum.f90#GDNcVarPutReal

Put_Attr( var, name, value, [err] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
value(:) :double precision, intent(in)
err :logical, intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncvarputattrreal.f90#GDNcVarPutAttrDouble

Put_Attr( var, name, value, [err] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
value(:) :integer, intent(in)
err :logical, intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncvarputattrint.f90#GDNcVarPutAttrInt

Put_Attr( var, name, value, [err] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
value(:) :real, intent(in)
err :logical, intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncvarputattrreal.f90#GDNcVarPutAttrReal

Put_Attr( var, name, value, [xtype], [err] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
value :character(len = *), intent(in)
xtype :character(len = *), intent(in), optional
err :logical, intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncvarputattrchar.f90#GDNcVarPutAttrChar

Search_dim( var, dimname ) result(result)
Function :
result :integer
var :type(GD_NC_VARIABLE), intent(in)
dimname :character(*), intent(in)

次元変数 ID の取得

Original external subprogram is gtdata/gtdata_netcdf/gdncsearchdim.f90#GDNcSearchDim

attr_next( var, name, [end] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(out)
end :logical, intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncvarattr.f90#GDNcVarAttrNext

attr_rewind( var )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)

Original external subprogram is gtdata/gtdata_netcdf/gdncvarattr.f90#GDNcVarAttrRewind

copy_attr( to, attrname, from, stat )
Subroutine :
to :type(GD_NC_VARIABLE), intent(in)
attrname :character(len = *), intent(in)
from :type(GD_NC_VARIABLE), intent(in)
stat :integer, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncvarattrcopy.f90#GDNcVarAttrCopy

del_attr( var, name, [err] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
err :logical, intent(out), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncvardelattr.f90#GDNcVarDelAttr

get_attr( var, name, value, [default] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
value :logical, intent(out)
default :logical, intent(in), optional

真偽値の判定基準 … 偽の例を示す。例を lowercase にしたもの以外の値は全部真。 

  数値 0, 0.0
  文字列 "0", "0.0", ".0", "0.", "0.0D0", "FALSE", ".FALSE.", "F"

Original external subprogram is gtdata/gtdata_netcdf/gdncvarattrtrue.f90#GDNcVarGetAttrLogical

get_attr( var, name, value, default, stat )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
value :character(len = *), intent(out)
default :character(len = *), intent(in)
stat :integer, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncattrgetchar.f90#GDNcAttrGetChar

get_attr( var, name, value, stat, [default] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
value(:) :integer, intent(out)
stat :integer, intent(out)
default :integer, intent(in), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncattrgetnum.f90#GDNcAttrGetInt

get_attr( var, name, value, stat, [default] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
value(:) :real(DP), intent(out)
stat :integer, intent(out)
default :real(DP), intent(in), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncattrgetnum.f90#GDNcAttrGetDouble

get_attr( var, name, value, stat, [default] )
Subroutine :
var :type(GD_NC_VARIABLE), intent(in)
name :character(len = *), intent(in)
value(:) :real, intent(out)
stat :integer, intent(out)
default :real, intent(in), optional

Original external subprogram is gtdata/gtdata_netcdf/gdncattrgetnum.f90#GDNcAttrGetReal

toString( var ) result(result)
Function :
result :character(string)
var :type(GD_NC_VARIABLE), intent(in)

Original external subprogram is gtdata/gtdata_netcdf/gdncvartostring.f90#GDNcVarToString

var_search( iter, url, end )
Subroutine :
iter :type(GD_NC_VARIABLE_SEARCH), intent(inout)
url :character(len = *), intent(out)
end :logical, intent(out)

Original external subprogram is gtdata/gtdata_netcdf/gdncvarsearch.f90#GDNcVarSearchNext

var_search( iter, urlBase )
Subroutine :
iter :type(GD_NC_VARIABLE_SEARCH), intent(out)
urlBase :character(len = *), intent(in)

Original external subprogram is gtdata/gtdata_netcdf/gdncvarsearch.f90#GDNcVarSearchInit

[Validate]