General type definition
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer(kind=int32), | public, | parameter | :: | I4 | = | int32 | |
integer(kind=I4), | public, | parameter | :: | I8 | = | int64 | |
integer(kind=I4), | public, | parameter | :: | R4 | = | real32 | |
integer(kind=I4), | public, | parameter | :: | R8 | = | real64 | |
integer(kind=I4), | public, | parameter | :: | IN_U | = | input_unit | |
integer(kind=I4), | public, | parameter | :: | OUT_U | = | output_unit | |
integer(kind=I4), | public, | parameter | :: | ERR_U | = | error_unit | |
integer(kind=I4), | public, | parameter | :: | HIG_I4 | = | huge(1) | |
real(kind=R4), | public, | parameter | :: | PI_R4 | = | acos(-1._R4) | |
real(kind=R8), | public, | parameter | :: | PI_R8 | = | acos(-1._R8) | |
real(kind=R4), | public, | parameter | :: | EPS_R4 | = | tiny(1._R4) | |
real(kind=R8), | public, | parameter | :: | EPS_R8 | = | tiny(1._R8) | |
real(kind=R8), | public, | parameter | :: | HIG_R8 | = | huge(1._R8) | |
real(kind=R8), | public, | parameter | :: | HIG_E8 | = | log(HIG_R8) | |
real(kind=R8), | public, | parameter | :: | EPS_E8 | = | log(EPS_R8) | |
integer(kind=I4), | public, | parameter | :: | EXPO_MAX | = | exponent(HIG_R8) | |
integer(kind=I4), | public | :: | NB_THREADS_MAX |