gtvardimname2ord.f90 File Reference

次元相対名から次元順序番号の問い合わせ More...

Go to the source code of this file.

Functions/Subroutines
integer function	gtvardimname2ord (var, name)

Detailed Description

次元相対名から次元順序番号の問い合わせ

Author

Eizi TOYODA, Yasuhiro MORIKAWA

Copyright

Copyright (C) GFD Dennou Club, 2000-2026. All rights reserved.
License is BSD-2-Clause. See COPYRIGHT in detail

この関数は gtdata_generic から gtdata_generic#Dimname_to_Dimord として提供されます。

Definition in file gtvardimname2ord.f90.

Function/Subroutine Documentation

gtvardimname2ord()

integer function gtvardimname2ord	(	type(gt_variable), intent(in)	var,
		character(len = *), intent(in)	name )

次元相対名から次元順序番号を取得

変数には複数の次元が所属します。次元は順序番号で識別されますが、 変数における次元の順序は入れ替えることもできるため、 変数に相対的短い名前で識別することが便利な場合もあります。 たとえば変数 filename?var に対して filename?var,dim=1 のような コンマ記法 (gtool4 netCDF 規約の「5.4 コンマ記法」参照) で用いられるものです。(NetCDF 変数 filename?varname に対する次元名 dim は filename?dim を指示するでしょうが、 必ずしもそのような関係が成り立つとは限りません)

Dimname_to_Dimord 手続はこのような相対次元名から次元順序番号を与えます。 正当な番号は1以上であり、0以下の番号はエラーを示します。

Parameters

[in]	var	変数ハンドル
[in]	name	次元相対名

Returns

次元順序番号 (0以下はエラーを示す)

Definition at line 63 of file gtvardimname2ord.f90.

  use gtdata_types, only: gt_variable
  use dc_string, only: stoi
  use gtdata_netcdf_generic, only: search_dim
  use gtdata_netcdf_types, only: gd_nc_variable
  use gtdata_internal_map, only: var_class, vtb_class_netcdf
  implicit none
  type(gt_variable), intent(in):: var
  character(len = *), intent(in):: name
  integer:: class, cid
  result = -1
  if (name == ' ') return
  result = stoi(name)
  if (result /= 0) return
  ! 個別層に問い合わせて次元番号を得ようと試みる。
  call var_class(var, class, cid)
  if (class == vtb_class_netcdf) then
    result = search_dim(gd_nc_variable(cid), name)
  endif
  ! map 表から次元名を使って次元番号を得ようと試みる。

References gtdata_internal_map::var_class().

Here is the call graph for this function: