include file: HALO_EM_MOIST_E_5.inc 2,17
!STARTOFREGISTRYGENERATEDINCLUDE 'inc/HALO_EM_MOIST_E_5.inc'
!
! WARNING This file is generated automatically by use_registry
! using the data base in the file named Registry.
! Do not edit.  Your changes to this file will be lost.
!
IF ( grid%comms( HALO_EM_MOIST_E_5 ) == invalid_message_value ) THEN
  CALL wrf_debug ( 50 , 'set up halo HALO_EM_MOIST_E_5' )
  CALL setup_halo_rsl( grid )
  CALL reset_msgs_48pt
  if ( P_qv .GT. 1 ) CALL add_msg_48pt_real ( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qv), glen(2) )
  if ( P_qc .GT. 1 ) CALL add_msg_48pt_real ( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qc), glen(2) )
  if ( P_qr .GT. 1 ) CALL add_msg_48pt_real ( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qr), glen(2) )
  if ( P_qi .GT. 1 ) CALL add_msg_48pt_real ( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qi), glen(2) )
  if ( P_qs .GT. 1 ) CALL add_msg_48pt_real ( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qs), glen(2) )
  if ( P_qg .GT. 1 ) CALL add_msg_48pt_real ( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qg), glen(2) )
  if ( P_qv .GT. 1 ) CALL add_msg_48pt_real ( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qv), glen(2) )
  if ( P_qc .GT. 1 ) CALL add_msg_48pt_real ( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qc), glen(2) )
  if ( P_qr .GT. 1 ) CALL add_msg_48pt_real ( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qr), glen(2) )
  if ( P_qi .GT. 1 ) CALL add_msg_48pt_real ( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qi), glen(2) )
  if ( P_qs .GT. 1 ) CALL add_msg_48pt_real ( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qs), glen(2) )
  if ( P_qg .GT. 1 ) CALL add_msg_48pt_real ( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qg), glen(2) )
  CALL stencil_48pt ( grid%domdesc , grid%comms ( HALO_EM_MOIST_E_5 ) )
ENDIF
  CALL wrf_debug ( 50 , 'exchange halo HALO_EM_MOIST_E_5' )
CALL rsl_exch_stencil ( grid%domdesc , grid%comms( HALO_EM_MOIST_E_5 ) )
!ENDOFREGISTRYGENERATEDINCLUDE