Loading...
Searching...
No Matches
hsavar.f90 File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine hsavar (vname, idim, dims, lname, unit, xtype)

Function/Subroutine Documentation

◆ hsavar()

subroutine hsavar ( character(len=*), intent(in) vname,
integer, intent(in) idim,
character(len=*), dimension(idim), intent(in) dims,
character(len=*), intent(in) lname,
character(len=*), intent(in) unit,
character(len=*), intent(in) xtype )

Definition at line 14 of file hsavar.f90.

15 !
16 !== 機能
17 !
18 ! 変数を定義する.
19 !
21 character(len=*),intent(in) :: vname ! 変数名
22 integer,intent(in) :: idim ! 定義する変数の次元の大きさ
23 character(len=*),dimension(idim),intent(in) :: dims ! 次元
24 character(len=*),intent(in) :: lname ! 長い名前
25 character(len=*),intent(in) :: unit ! 単位
26 character(len=*),intent(in) :: xtype ! 定義する変数のタイプ
27
28 call historyaddvariable(varname=vname, dims=dims, &
29 & longname=lname, units=unit, xtype=xtype)
30