FE-Project
Loading...
Searching...
No Matches
scale_file_base_meshfield::file_base_meshfield Type Reference

Derived type to manage file output with MeshField data. More...

Public Member Functions

procedure init (this, var_num, comp_name, dim_name_postfix, mesh1d, mesh2d, meshcubedsphere2d, mesh3d, meshcubedsphere3d, force_uniform_grid)
 Initialize an object to manage file output with MeshField data. The given component is registered as the main component.
procedure register_comp (this, registered_comp_id, comp_name, var_num, dim_name_postfix, mesh1d, mesh2d, meshcubedsphere2d, mesh3d, meshcubedsphere3d, force_uniform_grid)
 Register mesh and output information with each model component.
procedure open (this, basename, myrank)
 Open file.
procedure create (this, basename, title, dtype, fileexisted, myrank, tunits, calendar)
 Create file.
procedure file_base_meshfield_def_var1 (this, field, desc, vid, dim_type_id, datatype, standard_name, timeinv, nsteps, comp_id)
 Define a variable in the file with MeshField data.
procedure file_base_meshfield_def_var2 (this, varname, units, desc, vid, dim_type_id, datatype, standard_name, timeinv, nsteps, comp_id)
 Define a variable in the file with MeshField data.
generic def_var (this, field, desc, vid, dim_type_id, datatype, standard_name, timeinv, nsteps, comp_id)
 Define a variable in the file with MeshField data.
generic def_var (this, varname, units, desc, vid, dim_type_id, datatype, standard_name, timeinv, nsteps, comp_id)
 Define a variable in the file with MeshField data.
procedure end_def (this)
 End definition of variables in the file with MeshField data.
procedure file_base_meshfield_write_var1d (this, vid, field1d, sec_str, sec_end, comp_id)
 Write a 1D variable in the file with MeshField data.
generic write_var1d (this, vid, field1d, sec_str, sec_end, comp_id)
 Write a 1D variable in the file with MeshField data.
procedure file_base_meshfield_write_var2d (this, vid, field2d, sec_str, sec_end, comp_id)
 Write a 2D variable in the file with MeshField data.
generic write_var2d (this, vid, field2d, sec_str, sec_end, comp_id)
 Write a 2D variable in the file with MeshField data.
procedure file_base_meshfield_write_var3d (this, vid, field3d, sec_str, sec_end, comp_id)
 Write a 3D variable in the file with MeshField data.
generic write_var3d (this, vid, field3d, sec_str, sec_end, comp_id)
 Write a 3D variable in the file with MeshField data.
procedure put_globalattribute_time (this, date, subsec)
 Put global attributes related to time in the file with MeshField data.
procedure file_base_meshfield_read_var1d (this, dim_typeid, varname, field1d, step, allow_missing, comp_id)
 Read a 1D variable in the file with MeshField data.
procedure file_base_meshfield_read_var1d_local (this, dim_typeid, varname, lcmesh, i0_s, val, step, allow_missing, comp_id)
 Read a 1D variable with local mesh in the file.
procedure file_base_meshfield_read_var2d (this, dim_typeid, varname, field2d, step, allow_missing, comp_id)
 Read a 2D variable in the file with MeshField data.
procedure file_base_meshfield_read_var2d_local (this, dim_typeid, varname, lcmesh, i0_s, j0_s, val, step, allow_missing, comp_id)
 Read a 2D variable with local mesh in the file.
procedure file_base_meshfield_read_var3d (this, dim_typeid, varname, field3d, step, allow_missing, comp_id)
 Read a 3D variable in the file with MeshField data.
procedure file_base_meshfield_read_var3d_local (this, dim_typeid, varname, lcmesh, i0_s, j0_s, k0_s, val, step, allow_missing, comp_id)
 Read a 3D variable with local mesh in the file.
generic read_var (this, dim_typeid, varname, field1d, step, allow_missing, comp_id)
 Read a 1D variable in the file with MeshField data.
generic read_var (this, dim_typeid, varname, lcmesh, i0_s, val, step, allow_missing, comp_id)
 Read a 1D variable with local mesh in the file.
generic read_var (this, dim_typeid, varname, field2d, step, allow_missing, comp_id)
 Read a 2D variable in the file with MeshField data.
generic read_var (this, dim_typeid, varname, lcmesh, i0_s, j0_s, val, step, allow_missing, comp_id)
 Read a 2D variable with local mesh in the file.
generic read_var (this, dim_typeid, varname, field3d, step, allow_missing, comp_id)
 Read a 3D variable in the file with MeshField data.
generic read_var (this, dim_typeid, varname, lcmesh, i0_s, j0_s, k0_s, val, step, allow_missing, comp_id)
 Read a 3D variable with local mesh in the file.
procedure get_commoninfo (this, title, source, institution)
 Get common information of the file with MeshField data.
procedure get_datainfo (this, varname, istep, description, units, standard_name, time_start, time_end, time_units, calendar)
 Get information of the variable in the file with MeshField data.
procedure get_varstepsize (this, varname, len)
 Get the number of time steps associated with the variable in the file.
procedure close (this)
 Close the file with MeshField data.
procedure final (this)
 Finalize an object to manage file output of meshfield data.

Public Attributes

integer fid
integer comp_num
 Number of registered components.
type(filebasemeshfieldcomp), dimension(component_num_max) comp
 Array of registered components.
integer main_comp_id
 Registered component ID of main component.
logical file_axes_written
 Flag to check whether axes are written or not.

Detailed Description

Derived type to manage file output with MeshField data.

Definition at line 86 of file scale_file_base_meshfield.F90.

Member Function/Subroutine Documentation

◆ init()

procedure scale_file_base_meshfield::file_base_meshfield::init ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) var_num,
character(len=*), intent(in), optional comp_name,
character(len=*), intent(in), optional dim_name_postfix,
class(meshbase1d), intent(in), optional, target mesh1d,
class(meshrectdom2d), intent(in), optional, target mesh2d,
class(meshcubedspheredom2d), intent(in), optional, target meshcubedsphere2d,
class(meshcubedom3d), intent(in), optional, target mesh3d,
class(meshcubedspheredom3d), intent(in), optional, target meshcubedsphere3d,
logical, intent(in), optional force_uniform_grid )

Initialize an object to manage file output with MeshField data. The given component is registered as the main component.

Parameters
[in]var_numNumber of output variables
[in]comp_nameName of the main component
[in]dim_name_postfixPostfix of dimension name for each component
[in]mesh1d1D mesh object
[in]mesh2d2D rectangular mesh object
[in]meshcubedsphere2d2D cubed-sphere mesh object
[in]mesh3d3D cube mesh object
[in]meshcubedsphere3d3D cubed-sphere mesh object
[in]force_uniform_gridFlag to output data on uniform grid

Definition at line 96 of file scale_file_base_meshfield.F90.

◆ register_comp()

procedure scale_file_base_meshfield::file_base_meshfield::register_comp ( class(file_base_meshfield), intent(inout), target this,
integer, intent(out) registered_comp_id,
character(len=*), intent(in) comp_name,
integer, intent(in) var_num,
character(len=*), intent(in) dim_name_postfix,
class(meshbase1d), intent(in), optional, target mesh1d,
class(meshrectdom2d), intent(in), optional, target mesh2d,
class(meshcubedspheredom2d), intent(in), optional, target meshcubedsphere2d,
class(meshcubedom3d), intent(in), optional, target mesh3d,
class(meshcubedspheredom3d), intent(in), optional, target meshcubedsphere3d,
logical, intent(in), optional force_uniform_grid )

Register mesh and output information with each model component.

Parameters
[out]registered_comp_idRegistered component ID
[in]var_numNumber of variables to be registered
[in]comp_nameName of the component to be registered
[in]dim_name_postfixPostfix of dimension name for each component
[in]mesh1d1D mesh object
[in]mesh2d2D rectangular mesh object
[in]meshcubedsphere2d2D cubed-sphere mesh object
[in]mesh3d3D cube mesh object
[in]meshcubedsphere3d3D cubed-sphere mesh object
[in]force_uniform_gridFlag to output data on uniform grid

Definition at line 97 of file scale_file_base_meshfield.F90.

◆ open()

procedure scale_file_base_meshfield::file_base_meshfield::open ( class(file_base_meshfield), intent(inout) this,
character(*), intent(in) basename,
integer, intent(in), optional myrank )

Open file.

Definition at line 98 of file scale_file_base_meshfield.F90.

◆ create()

procedure scale_file_base_meshfield::file_base_meshfield::create ( class(file_base_meshfield), intent(inout) this,
character(*), intent(in) basename,
character(*), intent(in) title,
character(*), intent(in) dtype,
logical, intent(out) fileexisted,
integer, intent(in), optional myrank,
character(*), intent(in), optional tunits,
character(*), intent(in), optional calendar )

Create file.

Definition at line 99 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_def_var1()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_def_var1 ( class(file_base_meshfield), intent(inout) this,
class(meshfieldbase), intent(in) field,
character(len=*), intent(in) desc,
integer, intent(in) vid,
integer, intent(in) dim_type_id,
character(len=*), intent(in) datatype,
character(len=*), intent(in), optional standard_name,
real(dp), intent(in), optional timeinv,
integer, intent(in), optional nsteps,
integer, intent(in), optional comp_id )

Define a variable in the file with MeshField data.

Definition at line 102 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_def_var2()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_def_var2 ( class(file_base_meshfield), intent(inout) this,
character(len=*), intent(in) varname,
character(len=*), intent(in) units,
character(len=*), intent(in) desc,
integer, intent(in) vid,
integer, intent(in) dim_type_id,
character(len=*), intent(in) datatype,
character(len=*), intent(in), optional standard_name,
real(dp), intent(in), optional timeinv,
integer, intent(in), optional nsteps,
integer, intent(in), optional comp_id )

Define a variable in the file with MeshField data.

Definition at line 103 of file scale_file_base_meshfield.F90.

◆ def_var() [1/2]

generic scale_file_base_meshfield::file_base_meshfield::def_var ( class(file_base_meshfield), intent(inout) this,
class(meshfieldbase), intent(in) field,
character(len=*), intent(in) desc,
integer, intent(in) vid,
integer, intent(in) dim_type_id,
character(len=*), intent(in) datatype,
character(len=*), intent(in), optional standard_name,
real(dp), intent(in), optional timeinv,
integer, intent(in), optional nsteps,
integer, intent(in), optional comp_id )

Define a variable in the file with MeshField data.

Definition at line 104 of file scale_file_base_meshfield.F90.

◆ def_var() [2/2]

generic scale_file_base_meshfield::file_base_meshfield::def_var ( class(file_base_meshfield), intent(inout) this,
character(len=*), intent(in) varname,
character(len=*), intent(in) units,
character(len=*), intent(in) desc,
integer, intent(in) vid,
integer, intent(in) dim_type_id,
character(len=*), intent(in) datatype,
character(len=*), intent(in), optional standard_name,
real(dp), intent(in), optional timeinv,
integer, intent(in), optional nsteps,
integer, intent(in), optional comp_id )

Define a variable in the file with MeshField data.

Definition at line 104 of file scale_file_base_meshfield.F90.

◆ end_def()

procedure scale_file_base_meshfield::file_base_meshfield::end_def ( class(file_base_meshfield), intent(inout) this)

End definition of variables in the file with MeshField data.

Definition at line 105 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_write_var1d()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_write_var1d ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) vid,
class(meshfield1d), intent(in) field1d,
real(dp), intent(in) sec_str,
real(dp), intent(in) sec_end,
integer, intent(in), optional comp_id )

Write a 1D variable in the file with MeshField data.

Definition at line 107 of file scale_file_base_meshfield.F90.

◆ write_var1d()

generic scale_file_base_meshfield::file_base_meshfield::write_var1d ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) vid,
class(meshfield1d), intent(in) field1d,
real(dp), intent(in) sec_str,
real(dp), intent(in) sec_end,
integer, intent(in), optional comp_id )

Write a 1D variable in the file with MeshField data.

Definition at line 108 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_write_var2d()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_write_var2d ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) vid,
class(meshfield2d), intent(in) field2d,
real(dp), intent(in) sec_str,
real(dp), intent(in) sec_end,
integer, intent(in), optional comp_id )

Write a 2D variable in the file with MeshField data.

Definition at line 109 of file scale_file_base_meshfield.F90.

◆ write_var2d()

generic scale_file_base_meshfield::file_base_meshfield::write_var2d ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) vid,
class(meshfield2d), intent(in) field2d,
real(dp), intent(in) sec_str,
real(dp), intent(in) sec_end,
integer, intent(in), optional comp_id )

Write a 2D variable in the file with MeshField data.

Definition at line 110 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_write_var3d()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_write_var3d ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) vid,
class(meshfield3d), intent(in) field3d,
real(dp), intent(in) sec_str,
real(dp), intent(in) sec_end,
integer, intent(in), optional comp_id )

Write a 3D variable in the file with MeshField data.

Definition at line 111 of file scale_file_base_meshfield.F90.

◆ write_var3d()

generic scale_file_base_meshfield::file_base_meshfield::write_var3d ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) vid,
class(meshfield3d), intent(in) field3d,
real(dp), intent(in) sec_str,
real(dp), intent(in) sec_end,
integer, intent(in), optional comp_id )

Write a 3D variable in the file with MeshField data.

Definition at line 112 of file scale_file_base_meshfield.F90.

◆ put_globalattribute_time()

procedure scale_file_base_meshfield::file_base_meshfield::put_globalattribute_time ( class(file_base_meshfield), intent(inout) this,
integer, dimension(6), intent(in) date,
real(dp), intent(in) subsec )

Put global attributes related to time in the file with MeshField data.

Definition at line 114 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_read_var1d()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_read_var1d ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(meshfield1d), intent(inout) field1d,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 1D variable in the file with MeshField data.

Definition at line 116 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_read_var1d_local()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_read_var1d_local ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(localmesh1d), intent(in) lcmesh,
integer, intent(in) i0_s,
real(rp), dimension(lcmesh%refelem1d%np,lcmesh%nea), intent(out) val,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 1D variable with local mesh in the file.

Definition at line 117 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_read_var2d()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_read_var2d ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(meshfield2d), intent(inout) field2d,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 2D variable in the file with MeshField data.

Definition at line 118 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_read_var2d_local()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_read_var2d_local ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(localmesh2d), intent(in) lcmesh,
integer, intent(in) i0_s,
integer, intent(in) j0_s,
real(rp), dimension(lcmesh%refelem2d%np,lcmesh%nea), intent(out) val,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 2D variable with local mesh in the file.

Definition at line 119 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_read_var3d()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_read_var3d ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(meshfield3d), intent(inout) field3d,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 3D variable in the file with MeshField data.

Definition at line 120 of file scale_file_base_meshfield.F90.

◆ file_base_meshfield_read_var3d_local()

procedure scale_file_base_meshfield::file_base_meshfield::file_base_meshfield_read_var3d_local ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(localmesh3d), intent(in) lcmesh,
integer, intent(in) i0_s,
integer, intent(in) j0_s,
integer, intent(in) k0_s,
real(rp), dimension(lcmesh%refelem3d%np,lcmesh%nea), intent(out) val,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 3D variable with local mesh in the file.

Definition at line 121 of file scale_file_base_meshfield.F90.

◆ read_var() [1/6]

generic scale_file_base_meshfield::file_base_meshfield::read_var ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(meshfield1d), intent(inout) field1d,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 1D variable in the file with MeshField data.

Definition at line 122 of file scale_file_base_meshfield.F90.

◆ read_var() [2/6]

generic scale_file_base_meshfield::file_base_meshfield::read_var ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(localmesh1d), intent(in) lcmesh,
integer, intent(in) i0_s,
real(rp), dimension(lcmesh%refelem1d%np,lcmesh%nea), intent(out) val,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 1D variable with local mesh in the file.

Definition at line 122 of file scale_file_base_meshfield.F90.

◆ read_var() [3/6]

generic scale_file_base_meshfield::file_base_meshfield::read_var ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(meshfield2d), intent(inout) field2d,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 2D variable in the file with MeshField data.

Definition at line 122 of file scale_file_base_meshfield.F90.

◆ read_var() [4/6]

generic scale_file_base_meshfield::file_base_meshfield::read_var ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(localmesh2d), intent(in) lcmesh,
integer, intent(in) i0_s,
integer, intent(in) j0_s,
real(rp), dimension(lcmesh%refelem2d%np,lcmesh%nea), intent(out) val,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 2D variable with local mesh in the file.

Definition at line 122 of file scale_file_base_meshfield.F90.

◆ read_var() [5/6]

generic scale_file_base_meshfield::file_base_meshfield::read_var ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(meshfield3d), intent(inout) field3d,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 3D variable in the file with MeshField data.

Definition at line 122 of file scale_file_base_meshfield.F90.

◆ read_var() [6/6]

generic scale_file_base_meshfield::file_base_meshfield::read_var ( class(file_base_meshfield), intent(inout) this,
integer, intent(in) dim_typeid,
character(*), intent(in) varname,
class(localmesh3d), intent(in) lcmesh,
integer, intent(in) i0_s,
integer, intent(in) j0_s,
integer, intent(in) k0_s,
real(rp), dimension(lcmesh%refelem3d%np,lcmesh%nea), intent(out) val,
integer, intent(in), optional step,
logical, intent(in), optional allow_missing,
integer, intent(in), optional comp_id )

Read a 3D variable with local mesh in the file.

Definition at line 122 of file scale_file_base_meshfield.F90.

◆ get_commoninfo()

procedure scale_file_base_meshfield::file_base_meshfield::get_commoninfo ( class(file_base_meshfield), intent(in) this,
character(len=file_hmid), intent(out), optional title,
character(len=file_hmid), intent(out), optional source,
character(len=file_hmid), intent(out), optional institution )

Get common information of the file with MeshField data.

Parameters
[out]titleTitle of the file
[out]sourceSource of the file
[out]institutionInstitution of the file

Definition at line 128 of file scale_file_base_meshfield.F90.

◆ get_datainfo()

procedure scale_file_base_meshfield::file_base_meshfield::get_datainfo ( class(file_base_meshfield), intent(in) this,
character(*), intent(in) varname,
integer, intent(in), optional istep,
character(len=file_hmid), intent(out), optional description,
character(len=file_hshort), intent(out), optional units,
character(len=file_hmid), intent(out), optional standard_name,
real(dp), intent(out), optional time_start,
real(dp), intent(out), optional time_end,
character(len=file_hmid), intent(out), optional time_units,
character(len=file_hshort), intent(out), optional calendar )

Get information of the variable in the file with MeshField data.

Parameters
[in]varnameName of the variable
[in]istepTime step of the variable
[out]descriptionDescription of the variable
[out]unitsUnits of the variable
[out]standard_nameStandard name of the variable
[out]time_startStart time of the variable
[out]time_endEnd time of the variable
[out]time_unitsTime units of the variable
[out]calendarCalendar name

Definition at line 129 of file scale_file_base_meshfield.F90.

◆ get_varstepsize()

procedure scale_file_base_meshfield::file_base_meshfield::get_varstepsize ( class(file_base_meshfield), intent(in) this,
character(*), intent(in) varname,
integer, intent(out) len )

Get the number of time steps associated with the variable in the file.

Parameters
[in]varnameName of the variable
[out]lenNumber of time steps associated with the variable

Definition at line 130 of file scale_file_base_meshfield.F90.

◆ close()

procedure scale_file_base_meshfield::file_base_meshfield::close ( class(file_base_meshfield), intent(inout) this)

Close the file with MeshField data.

Definition at line 132 of file scale_file_base_meshfield.F90.

◆ final()

procedure scale_file_base_meshfield::file_base_meshfield::final ( class(file_base_meshfield), intent(inout) this)

Finalize an object to manage file output of meshfield data.

Definition at line 133 of file scale_file_base_meshfield.F90.

Member Data Documentation

◆ fid

integer scale_file_base_meshfield::file_base_meshfield::fid

Definition at line 87 of file scale_file_base_meshfield.F90.

87 integer :: fid

◆ comp_num

integer scale_file_base_meshfield::file_base_meshfield::comp_num

Number of registered components.

Definition at line 89 of file scale_file_base_meshfield.F90.

89 integer :: comp_num !< Number of registered components

◆ comp

type(filebasemeshfieldcomp), dimension(component_num_max) scale_file_base_meshfield::file_base_meshfield::comp

Array of registered components.

Definition at line 90 of file scale_file_base_meshfield.F90.

90 type(FileBaseMeshFieldComp) :: comp(COMPONENT_NUM_MAX) !< Array of registered components

◆ main_comp_id

integer scale_file_base_meshfield::file_base_meshfield::main_comp_id

Registered component ID of main component.

Definition at line 92 of file scale_file_base_meshfield.F90.

92 integer :: main_comp_id !< Registered component ID of main component

◆ file_axes_written

logical scale_file_base_meshfield::file_base_meshfield::file_axes_written

Flag to check whether axes are written or not.

Definition at line 94 of file scale_file_base_meshfield.F90.

94 logical :: File_axes_written !< Flag to check whether axes are written or not

The documentation for this type was generated from the following file: