diff --git a/ccpp/data/GFS_typedefs.F90 b/ccpp/data/GFS_typedefs.F90 index ed29a4104..a6ca113c8 100644 --- a/ccpp/data/GFS_typedefs.F90 +++ b/ccpp/data/GFS_typedefs.F90 @@ -3536,6 +3536,7 @@ subroutine coupling_create (Coupling, IM, Model) allocate (Coupling%min_fplume(0)) allocate (Coupling%max_fplume(0)) allocate (Coupling%uspdavg(0)) + allocate (Coupling%rho_dry (0,0)) allocate (Coupling%hpbl_thetav(0)) allocate (Coupling%rrfs_hwp (0)) allocate (Coupling%rrfs_hwp_ave (0))