Raise error for misconfigured field_tables (#132)

FV3/gfsphysics/GFS_layer/GFS_typedefs.F90

@@ -19,6 +19,8 @@ module GFS_typedefs
        use h2o_def,                  only: levh2o,      h2o_coeff
        use aerclm_def,               only: ntrcaer,     ntrcaerm
 #endif
+       use mpp_mod,                  only: mpp_error, FATAL
+
 
        implicit none
 
@@ -3706,6 +3708,10 @@ subroutine control_initialize (Model, nlunit, fn_nml, me, master, &
       endif
     endif
 
+    if (Model%satmedmf .and. Model%ntke .lt. 0) then
+      call mpp_error(FATAL, 'GFS_typedefs::control_initialize An sgs_tke tracer must be defined in the field_table if gfs_physics_nml.satmedmf is true.')
+    endif
+
     ! -- setup aerosol scavenging factors
     allocate(Model%fscav(Model%ntchm))
     if (Model%ntchm > 0) then