17 INTEGER,
PARAMETER,
PUBLIC ::
wp = selected_real_kind(14, 200)
18 INTEGER,
PARAMETER,
PUBLIC ::
dp = selected_real_kind(14, 200)
19 INTEGER,
PARAMETER,
PUBLIC ::
sp = selected_real_kind(6, 30)
Defines the basic variable types.
integer, parameter, public wp
integer, parameter, public sp
integer, parameter, public dp