...
Argument | Type | Intent | Description |
---|---|---|---|
line | character(len=ids_string_length) | result | the next meaningful file record |
io_unit | integer | in | the structure containing I/O unit attached to the file namesbeing read |
label | character(len=*) | in | text characterizing the expected record content (used in error messages) |
??????????????
Module imas_controls_for_input
...
function get_imas_version () result (version)
Get the versions of IMAS and IMAS Access Layer from the system environment. The function result is a structure with the type 'ids_version_dd_al' (the type used in IMAS for holding this information).
An example of the environment variable used by the function is as follows:
IMAS_PREFIX=/gw/swimas/core/IMAS/3.37.0/AL/4.11.0/intel/2020
Argument | Type | Intent | Description |
---|---|---|---|
version | type(ids_version_dd_al) | result | structure holding the version information |
Module imas_controls_for_input
The module contains the tools that permit to control the wrappers via the content of the command file.
Data types
type imas_control_panel
character(len=16) :: database !! Name of the database/machine
!! Note: the database must exist
!! before running the wrapper
integer :: shot, run
character(len=4) :: imas_major_version = '3'
character(len=16) :: username !! current login username;
!! to be provided with
!! getlog() Fortran routine.
type(ids_ids_properties) :: ids_properties
type(ids_code) :: code !! Code properties
character(len=16) :: generic_suffix !! The last part of the file name if the
!! is generated automatically
end type imas_control_panel
This type is designed to hold the control parameters taken from the command file.
Methods
- get_imas_controls_for_input_saving
- get_imas_controls_for_input_fetching
function get_imas_controls_for_input_saving (io_unit) result (imas_controls)
Prepare control parameters for saving the EIRENE input to IMAS. Most control parameters are taken from a command file.
Argument | Type | Intent | Description |
---|---|---|---|
imas_controls | type(imas_control_panel) | result | Structure hilding the control parameters |
io_unit | integer | in | I/O unit attached to the command file |
function get_imas_controls_for_input_fetching (io_unit) result (imas_controls)
repare control parameters for getting the EIRENE input from IMAS. Most control parameters are taken from a command file.
Argument | Type | Intent | Description |
---|---|---|---|
imas_controls | type(imas_control_panel) | result | Structure hilding the control parameters |
io_unit | integer | in | I/O unit attached to the command file |
Main files save_input_main.f90
and provide_input_main
.f90
...