Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character, | public | :: | source | = | 'D' | ||
character(len=max_paramter_name_len), | public | :: | name |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(CONF_PAR), | intent(inout) | :: | this | |||
class(*), | intent(out) | :: | env_val |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(CONF_PAR), | intent(in) | :: | this |
TYPE, ABSTRACT :: CONF_PAR
CHARACTER :: source = 'D' ! Possible values are: D=Default, E=Environment, U=User code
CHARACTER(len=max_paramter_name_len) :: name
CONTAINS
PROCEDURE, NON_OVERRIDABLE :: env_value => conf_par_env_value
PROCEDURE, NON_OVERRIDABLE :: print_source
END TYPE CONF_PAR