include file: HALO_EM_B.inc 1,18
!STARTOFREGISTRYGENERATEDINCLUDE 'inc/HALO_EM_B.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_B ) == invalid_message_value ) THEN
  CALL wrf_debug ( 50 , 'set up halo HALO_EM_B' )
  CALL setup_halo_rsl( grid )
  CALL reset_msgs_4pt
  CALL add_msg_4pt_real ( ph_2 , (glen(2)) )
  CALL add_msg_4pt_real ( al , (glen(2)) )
  CALL add_msg_4pt_real ( p , (glen(2)) )
  CALL add_msg_4pt_real ( t_1 , (glen(2)) )
  CALL add_msg_4pt_real ( t_save , (glen(2)) )
  CALL add_msg_4pt_real ( u_save , (glen(2)) )
  CALL add_msg_4pt_real ( v_save , (glen(2)) )
  CALL add_msg_4pt_real ( mu_1 , 1 )
  CALL add_msg_4pt_real ( mu_2 , 1 )
  CALL add_msg_4pt_real ( mudf , 1 )
  CALL add_msg_4pt_real ( php , (glen(2)) )
  CALL add_msg_4pt_real ( alt , (glen(2)) )
  CALL add_msg_4pt_real ( pb , (glen(2)) )
  CALL stencil_4pt ( grid%domdesc , grid%comms ( HALO_EM_B ) )
ENDIF
  CALL wrf_debug ( 50 , 'exchange halo HALO_EM_B' )
CALL rsl_exch_stencil ( grid%domdesc , grid%comms( HALO_EM_B ) )
!ENDOFREGISTRYGENERATEDINCLUDE