| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| logical, | public | :: | use_do_classic | = | .false. | ||
| logical, | public | :: | use_vectorized | = | .false. | ||
| logical, | public | :: | use_do_concurrent | = | .false. | ||
| type(ParallelMethod), | public | :: | parallel |
type :: LoopMethod logical :: use_do_classic = .false. logical :: use_vectorized = .false. logical :: use_do_concurrent = .false. type(ParallelMethod) :: parallel end type LoopMethod