FV3 Bundle
gsw_mod_kinds.f90
Go to the documentation of this file.
1 !==========================================================================
3 !==========================================================================
4 
5 implicit none
6 
7 integer, parameter :: r4 = selected_real_kind(6,30)
8 
9 integer, parameter :: r8 = selected_real_kind(14,30)
10 
11 end module
12 
13 !--------------------------------------------------------------------------
14 
15 
16 
integer, parameter r8
integer, parameter r4