FE-Project
Loading...
Searching...
No Matches
scale_variableinfo.F90
Go to the documentation of this file.
1
9#include "scaleFElib.h"
11 !-----------------------------------------------------------------------------
12 !
13 !++ Used modules
14 !
15 use scale_precision
16 use scale_io
17
18 !-----------------------------------------------------------------------------
19 implicit none
20 private
21 !-----------------------------------------------------------------------------
22 !
23 !++ Public type & procedures
24 !
25 type, public :: variableinfo
26 integer :: keyid
27 character(len=H_SHORT) :: name
28 character(len=H_MID) :: desc
29 character(len=H_SHORT) :: unit
30 integer :: ndims
31 character(len=H_SHORT) :: dim_type
32 character(len=H_MID) :: stdname
33 end type variableinfo
34
35 !-----------------------------------------------------------------------------
36 !
37 !++ Public parameters & variables
38 !
39
40 !-----------------------------------------------------------------------------
41 !
42 !++ Private procedures & variables
43 !
44 !------------------
45
46end module scale_variableinfo
module FElib / Data / base