Initialisation module, includes kinds FSML works with.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | parameter | :: | dp | = | real64 |
double precision |
integer, | public, | parameter | :: | hp | = | selected_real_kind(p=33, r=4931) |
very high precision (for testing) |
integer, | public, | parameter | :: | i4 | = | int32 | |
integer, | public, | parameter | :: | i8 | = | int64 | |
integer, | public, | parameter | :: | qp | = | real128 |
quadruple precision |
integer, | public, | parameter | :: | sp | = | real32 |
single precision |
integer, | public, | parameter | :: | std_e | = | error_unit | |
integer, | public, | parameter | :: | std_i | = | input_unit | |
integer, | public, | parameter | :: | std_o | = | output_unit | |
integer, | public, | parameter | :: | std_rw | = | 21 | |
integer, | public, | parameter | :: | wp | = | dp |
working precision |