| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | private, | parameter | :: | kind_i1 | = | selected_int_kind(2) | |
| integer, | private, | parameter | :: | kind_ih | = | selected_int_kind(4) | |
| integer, | public, | parameter | :: | kind_is | = | selected_int_kind(8) | |
| integer, | public, | parameter | :: | kind_id | = | selected_int_kind(15) | |
| integer, | public, | parameter | :: | kind_rs | = | selected_real_kind(p=6) | |
| integer, | public, | parameter | :: | kind_rd | = | selected_real_kind(p=12) | |
| integer, | private, | parameter | :: | kind_rq | = | selected_real_kind(p=24) | |
| complex, | public, | parameter | :: | zi | = | (0.0, 1.0) | |
| double precision, | public, | parameter | :: | dpi | = | 3.14159265358979323846264338327950288419716939938 | |
| double precision, | public, | parameter | :: | dtwopi | = | 2.*dpi | |
| real, | public, | parameter | :: | pi | = | dpi | |
| real, | public, | parameter | :: | twopi | = | dtwopi |