include file: HALO_EM_PHYS_DIFFUSION.inc 1,18
!STARTOFREGISTRYGENERATEDINCLUDE 'inc/HALO_EM_PHYS_DIFFUSION.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_PHYS_DIFFUSION ) == invalid_message_value ) THEN
CALL wrf_debug
( 50 , 'set up halo HALO_EM_PHYS_DIFFUSION' )
CALL setup_halo_rsl
( grid )
CALL reset_msgs_4pt
CALL add_msg_4pt_real
( defor11 , (glen(2)) )
CALL add_msg_4pt_real
( defor22 , (glen(2)) )
CALL add_msg_4pt_real
( defor12 , (glen(2)) )
CALL add_msg_4pt_real
( defor13 , (glen(2)) )
CALL add_msg_4pt_real
( defor23 , (glen(2)) )
CALL add_msg_4pt_real
( div , (glen(2)) )
CALL add_msg_4pt_real
( xkmv , (glen(2)) )
CALL add_msg_4pt_real
( xkmh , (glen(2)) )
CALL add_msg_4pt_real
( xkmhd , (glen(2)) )
CALL add_msg_4pt_real
( xkhv , (glen(2)) )
CALL add_msg_4pt_real
( xkhh , (glen(2)) )
CALL add_msg_4pt_real
( tke_1 , (glen(2)) )
CALL add_msg_4pt_real
( tke_2 , (glen(2)) )
CALL stencil_4pt
( grid%domdesc , grid%comms ( HALO_EM_PHYS_DIFFUSION ) )
ENDIF
CALL wrf_debug
( 50 , 'exchange halo HALO_EM_PHYS_DIFFUSION' )
CALL rsl_exch_stencil ( grid%domdesc , grid%comms( HALO_EM_PHYS_DIFFUSION ) )
!ENDOFREGISTRYGENERATEDINCLUDE