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