HALO_EM_VINTERP_UV_1.inc

1 !STARTOFREGISTRYGENERATEDINCLUDE 'inc/HALO_EM_VINTERP_UV_1.inc'
2 !
3 ! WARNING This file is generated automatically by use_registry
4 ! using the data base in the file named Registry.
5 ! Do not edit.  Your changes to this file will be lost.
6 !
7 #ifndef DATA_CALLS_INCLUDED
8 --- DELIBERATE SYNTAX ERROR: THIS ROUTINE SHOULD INCLUDE "em_data_calls.inc"
9     BECAUSE IT CONTAINS AN RSL HALO OPERATION
10 #endif
11 IF ( grid%comms( HALO_EM_VINTERP_UV_1 ) == invalid_message_value ) THEN
12   CALL wrf_debug ( 50 , 'set up halo HALO_EM_VINTERP_UV_1' )
13   CALL setup_halo_rsl( grid )
14   CALL reset_msgs_8pt
15   CALL add_msg_8pt_real ( grid%em_pd_gc , config_flags%num_metgrid_levels )
16   CALL stencil_8pt ( grid%domdesc , grid%comms ( HALO_EM_VINTERP_UV_1 ) )
17 ENDIF
18   CALL wrf_debug ( 50 , 'exchange halo HALO_EM_VINTERP_UV_1' )
19 CALL rsl_exch_stencil ( grid%domdesc , grid%comms( HALO_EM_VINTERP_UV_1 ) )
20 !ENDOFREGISTRYGENERATEDINCLUDE