diff --git a/rte/mo_rte_kind.F90 b/rte/mo_rte_kind.F90 index de9e13e90..1d98f0d50 100644 --- a/rte/mo_rte_kind.F90 +++ b/rte/mo_rte_kind.F90 @@ -26,7 +26,11 @@ module mo_rte_kind ! ! Floating point working precision ! +#ifdef SINGLE_PREC + integer, parameter :: wp = sp +#else integer, parameter :: wp = dp +#endif ! ! Logical - for use with kernels