historyaxiscreate.f90 File Reference

Constructor of GT_HISTORY_AXIS . More...

Go to the source code of this file.

Functions/Subroutines
subroutine	historyaxiscreate1 (axis, name, size, longname, units, xtype)
subroutine	historyaxiscreate2 (axis, name, size, longname, units, xtype)

Detailed Description

Constructor of GT_HISTORY_AXIS

.

Author

Yasuhiro MORIKAWA

Copyright

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

Definition in file historyaxiscreate.f90.

Function/Subroutine Documentation

historyaxiscreate1()

subroutine historyaxiscreate1	(	type(gt_history_axis), intent(out)	axis,
		character(*), intent(in)	name,
		integer, intent(in)	size,
		character(*), intent(in)	longname,
		character(*), intent(in)	units,
		character(*), intent(in)	xtype )

Create a GT_HISTORY_AXIS variable

Creates a GT_HISTORY_AXIS variable. After setting with this subroutine, pass it to the axes argument of HistoryCreate. To add attributes, use HistoryAxisAddAttr.

Parameters

[out]	axis	Axis information
[in]	name	Dimension variable name
[in]	size	Dimension length (array size)
[in]	longname	Descriptive name of dimension variable
[in]	units	Units of dimension variable
[in]	xtype	Type of dimension variable

Definition at line 47 of file historyaxiscreate.f90.

    !
    use dc_trace, only: beginsub, endsub
    use dc_string, only: cprintft
    use gtool_history_types, only: gt_history_axis
    implicit none
    type(GT_HISTORY_AXIS),intent(out) :: axis
    character(*) , intent(in):: name     ! 次元変数名
    integer, intent(in):: size     ! 次元長 (配列サイズ)
    character(*) , intent(in):: longname ! 次元変数の記述的名称
    character(*) , intent(in):: units    ! 次元変数の単位
    character(*) , intent(in):: xtype    ! 次元変数の型
    character(len = *), parameter:: subname = "HistoryAxisCreate1"
  continue
    call beginsub(subname)
    axis % name = cprintft('%c', c1=name)
    axis % length = size
    axis % longname = longname
    axis % units = units
    axis % xtype = cprintft('%c', c1=xtype)
    call endsub(subname)

References dc_trace::beginsub(), and dc_trace::endsub().

Here is the call graph for this function:

historyaxiscreate2()

subroutine historyaxiscreate2	(	type(gt_history_axis), intent(out)	axis,
		character(*), intent(in)	name,
		integer, intent(in)	size,
		character(*), intent(in)	longname,
		character(*), intent(in)	units,
		character(*), intent(in)	xtype )

Create a GT_HISTORY_AXIS variable (generic interface)

Usage is same as HistoryAxisCreate.

Definition at line 81 of file historyaxiscreate.f90.

    use dc_trace, only: beginsub, endsub
    use dc_string, only: cprintft
    use gtool_history_types, only: gt_history_axis
    implicit none
    type(GT_HISTORY_AXIS),intent(out) :: axis
    character(*) , intent(in):: name     ! 次元変数名
    integer, intent(in):: size     ! 次元長 (配列サイズ)
    character(*) , intent(in):: longname ! 次元変数の記述的名称
    character(*) , intent(in):: units    ! 次元変数の単位
    character(*) , intent(in):: xtype    ! 次元変数の型
    character(len = *), parameter:: subname = "HistoryAxisCreate2"
  continue
    call beginsub(subname)
    axis % name = cprintft('%c', c1=name)
    axis % length = size
    axis % longname = longname
    axis % units = units
    axis % xtype = cprintft('%c', c1=xtype)
    call endsub(subname)

References dc_trace::beginsub(), and dc_trace::endsub().

Here is the call graph for this function: