This type contains a character variables that represents each literal: all, pref, suff, and fact.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(character_array_element_t), | public | :: | all | ||||
type(character_array_element_t), | public | :: | fact | ||||
logical, | public | :: | flag_class | = | .false. | ||
logical, | public | :: | flag_closure | = | .false. | ||
type(character_array_element_t), | public | :: | pref | ||||
type(character_array_element_t), | public | :: | suff |
type literal_t type(character_array_element_t) :: all, pref, suff, fact logical :: flag_closure = .false. logical :: flag_class = .false. end type literal_t