| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public, | parameter | :: | SP | = | kind(1.) | |
| integer, | public, | parameter | :: | DP | = | kind(1.D0) | |
| integer, | public, | parameter | :: | FP | = | DP | |
| integer, | public, | parameter | :: | kind_r4 | = | kind(mpeuR4) | |
| integer, | public, | parameter | :: | kind_r8 | = | kind(mpeuR8) | |
| integer, | public, | parameter | :: | kind_r | = | kind(mpeuR) |