Real KIND Selection

Similar principle to INTEGER:

• SELECTED_REAL_KIND(8,9) will support numbers with a precision of 8 digits and decimal exponent range from (-9,9). For example,

    INTEGER, PARAMETER  :: 
         r1 = SELECTED_REAL_KIND(5,20),  &
         r2 = SELECTED_REAL_KIND(10,40)
    REAL(KIND=r1)       :: x, y, z
    REAL(r2), PARAMETER :: diff = 100.0_r2

• COMPLEX variables are specified in the same way,

    COMPLEX(KIND=r1) :: cinema
    COMPLEX(r2) :: inferiority = &
               (100.0_r2,99.0_r2)

  Both parts of the complex number have the same numeric range.

For more information, click here