include file: em_shift_halo_y.inc 1,235
!STARTOFREGISTRYGENERATEDINCLUDE 'inc/em_shift_halo_y.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%shift_y == invalid_message_value ) THEN
CALL wrf_debug
( 50 , 'set up halo for y shift' )
CALL setup_halo_rsl
( grid )
CALL reset_msgs_y_shift
CALL add_msg_y_shift_real
( u_1 , (glen(2)) )
CALL add_msg_y_shift_real
( u_2 , (glen(2)) )
CALL add_msg_y_shift_real
( ru , (glen(2)) )
CALL add_msg_y_shift_real
( v_1 , (glen(2)) )
CALL add_msg_y_shift_real
( v_2 , (glen(2)) )
CALL add_msg_y_shift_real
( rv , (glen(2)) )
CALL add_msg_y_shift_real
( w_1 , (glen(2)) )
CALL add_msg_y_shift_real
( w_2 , (glen(2)) )
CALL add_msg_y_shift_real
( ww , (glen(2)) )
CALL add_msg_y_shift_real
( rw , (glen(2)) )
CALL add_msg_y_shift_real
( ph_1 , (glen(2)) )
CALL add_msg_y_shift_real
( ph_2 , (glen(2)) )
CALL add_msg_y_shift_real
( phb , (glen(2)) )
CALL add_msg_y_shift_real
( ph0 , (glen(2)) )
CALL add_msg_y_shift_real
( php , (glen(2)) )
CALL add_msg_y_shift_real
( t_1 , (glen(2)) )
CALL add_msg_y_shift_real
( t_2 , (glen(2)) )
CALL add_msg_y_shift_real
( t_init , (glen(2)) )
CALL add_msg_y_shift_real
( tp_1 , (glen(2)) )
CALL add_msg_y_shift_real
( tp_2 , (glen(2)) )
CALL add_msg_y_shift_real
( mu_1 , 1 )
CALL add_msg_y_shift_real
( mu_2 , 1 )
CALL add_msg_y_shift_real
( mub , 1 )
CALL add_msg_y_shift_real
( mu0 , 1 )
CALL add_msg_y_shift_real
( mudf , 1 )
CALL add_msg_y_shift_real
( tke_1 , (glen(2)) )
CALL add_msg_y_shift_real
( tke_2 , (glen(2)) )
CALL add_msg_y_shift_real
( p , (glen(2)) )
CALL add_msg_y_shift_real
( al , (glen(2)) )
CALL add_msg_y_shift_real
( alt , (glen(2)) )
CALL add_msg_y_shift_real
( alb , (glen(2)) )
CALL add_msg_y_shift_real
( zx , (glen(2)) )
CALL add_msg_y_shift_real
( zy , (glen(2)) )
CALL add_msg_y_shift_real
( rdz , (glen(2)) )
CALL add_msg_y_shift_real
( rdzw , (glen(2)) )
CALL add_msg_y_shift_real
( pb , (glen(2)) )
CALL add_msg_y_shift_real
( z , (glen(2)) )
CALL add_msg_y_shift_real
( q2 , 1 )
CALL add_msg_y_shift_real
( t2 , 1 )
CALL add_msg_y_shift_real
( th2 , 1 )
CALL add_msg_y_shift_real
( u10 , 1 )
CALL add_msg_y_shift_real
( v10 , 1 )
CALL add_msg_y_shift_integer
( imask , 1 )
if ( P_qv .GT. 1 ) CALL add_msg_y_shift_real
( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qv), glen(2) )
if ( P_qc .GT. 1 ) CALL add_msg_y_shift_real
( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qc), glen(2) )
if ( P_qr .GT. 1 ) CALL add_msg_y_shift_real
( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qr), glen(2) )
if ( P_qi .GT. 1 ) CALL add_msg_y_shift_real
( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qi), glen(2) )
if ( P_qs .GT. 1 ) CALL add_msg_y_shift_real
( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qs), glen(2) )
if ( P_qg .GT. 1 ) CALL add_msg_y_shift_real
( moist_1 ( grid%sm31,grid%sm32,grid%sm33,P_qg), glen(2) )
if ( P_qv .GT. 1 ) CALL add_msg_y_shift_real
( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qv), glen(2) )
if ( P_qc .GT. 1 ) CALL add_msg_y_shift_real
( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qc), glen(2) )
if ( P_qr .GT. 1 ) CALL add_msg_y_shift_real
( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qr), glen(2) )
if ( P_qi .GT. 1 ) CALL add_msg_y_shift_real
( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qi), glen(2) )
if ( P_qs .GT. 1 ) CALL add_msg_y_shift_real
( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qs), glen(2) )
if ( P_qg .GT. 1 ) CALL add_msg_y_shift_real
( moist_2 ( grid%sm31,grid%sm32,grid%sm33,P_qg), glen(2) )
CALL add_msg_y_shift_real
( sm000010 , 1 )
CALL add_msg_y_shift_real
( sm010040 , 1 )
CALL add_msg_y_shift_real
( sm040100 , 1 )
CALL add_msg_y_shift_real
( sm100200 , 1 )
CALL add_msg_y_shift_real
( sm010200 , 1 )
CALL add_msg_y_shift_real
( soilm000 , 1 )
CALL add_msg_y_shift_real
( soilm005 , 1 )
CALL add_msg_y_shift_real
( soilm020 , 1 )
CALL add_msg_y_shift_real
( soilm040 , 1 )
CALL add_msg_y_shift_real
( soilm160 , 1 )
CALL add_msg_y_shift_real
( soilm300 , 1 )
CALL add_msg_y_shift_real
( sw000010 , 1 )
CALL add_msg_y_shift_real
( sw010040 , 1 )
CALL add_msg_y_shift_real
( sw040100 , 1 )
CALL add_msg_y_shift_real
( sw100200 , 1 )
CALL add_msg_y_shift_real
( sw010200 , 1 )
CALL add_msg_y_shift_real
( soilw000 , 1 )
CALL add_msg_y_shift_real
( soilw005 , 1 )
CALL add_msg_y_shift_real
( soilw020 , 1 )
CALL add_msg_y_shift_real
( soilw040 , 1 )
CALL add_msg_y_shift_real
( soilw160 , 1 )
CALL add_msg_y_shift_real
( soilw300 , 1 )
CALL add_msg_y_shift_real
( st000010 , 1 )
CALL add_msg_y_shift_real
( st010040 , 1 )
CALL add_msg_y_shift_real
( st040100 , 1 )
CALL add_msg_y_shift_real
( st100200 , 1 )
CALL add_msg_y_shift_real
( st010200 , 1 )
CALL add_msg_y_shift_real
( soilt000 , 1 )
CALL add_msg_y_shift_real
( soilt005 , 1 )
CALL add_msg_y_shift_real
( soilt020 , 1 )
CALL add_msg_y_shift_real
( soilt040 , 1 )
CALL add_msg_y_shift_real
( soilt160 , 1 )
CALL add_msg_y_shift_real
( soilt300 , 1 )
CALL add_msg_y_shift_real
( landmask , 1 )
CALL add_msg_y_shift_real
( topostdv , 1 )
CALL add_msg_y_shift_real
( toposlpx , 1 )
CALL add_msg_y_shift_real
( toposlpy , 1 )
CALL add_msg_y_shift_real
( shdmax , 1 )
CALL add_msg_y_shift_real
( shdmin , 1 )
CALL add_msg_y_shift_real
( snoalb , 1 )
CALL add_msg_y_shift_real
( slopecat , 1 )
CALL add_msg_y_shift_real
( toposoil , 1 )
CALL add_msg_y_shift_real
( landusef , config_flags%num_land_cat )
CALL add_msg_y_shift_real
( soilctop , config_flags%num_soil_cat )
CALL add_msg_y_shift_real
( soilcbot , config_flags%num_soil_cat )
CALL add_msg_y_shift_real
( soilcat , 1 )
CALL add_msg_y_shift_real
( vegcat , 1 )
CALL add_msg_y_shift_real
( tslb , config_flags%num_soil_layers )
CALL add_msg_y_shift_real
( smois , config_flags%num_soil_layers )
CALL add_msg_y_shift_real
( sh2o , config_flags%num_soil_layers )
CALL add_msg_y_shift_real
( xice , 1 )
CALL add_msg_y_shift_real
( smstav , 1 )
CALL add_msg_y_shift_real
( smstot , 1 )
CALL add_msg_y_shift_real
( sfcrunoff , 1 )
CALL add_msg_y_shift_real
( udrunoff , 1 )
CALL add_msg_y_shift_integer
( ivgtyp , 1 )
CALL add_msg_y_shift_integer
( isltyp , 1 )
CALL add_msg_y_shift_real
( vegfra , 1 )
CALL add_msg_y_shift_real
( sfcevp , 1 )
CALL add_msg_y_shift_real
( grdflx , 1 )
CALL add_msg_y_shift_real
( sfcexc , 1 )
CALL add_msg_y_shift_real
( acsnow , 1 )
CALL add_msg_y_shift_real
( acsnom , 1 )
CALL add_msg_y_shift_real
( snow , 1 )
CALL add_msg_y_shift_real
( snowh , 1 )
CALL add_msg_y_shift_real
( canwat , 1 )
CALL add_msg_y_shift_real
( sst , 1 )
CALL add_msg_y_shift_real
( potevp , 1 )
CALL add_msg_y_shift_real
( snopcx , 1 )
CALL add_msg_y_shift_real
( soiltb , 1 )
CALL add_msg_y_shift_real
( tke_myj , (glen(2)) )
CALL add_msg_y_shift_real
( ct , 1 )
CALL add_msg_y_shift_real
( thz0 , 1 )
CALL add_msg_y_shift_real
( z0 , 1 )
CALL add_msg_y_shift_real
( qz0 , 1 )
CALL add_msg_y_shift_real
( uz0 , 1 )
CALL add_msg_y_shift_real
( vz0 , 1 )
CALL add_msg_y_shift_real
( qsfc , 1 )
CALL add_msg_y_shift_real
( akhs , 1 )
CALL add_msg_y_shift_real
( akms , 1 )
CALL add_msg_y_shift_integer
( kpbl , 1 )
CALL add_msg_y_shift_real
( htop , 1 )
CALL add_msg_y_shift_real
( hbot , 1 )
CALL add_msg_y_shift_real
( cuppt , 1 )
CALL add_msg_y_shift_real
( totswdn , 1 )
CALL add_msg_y_shift_real
( totlwdn , 1 )
CALL add_msg_y_shift_real
( rswtoa , 1 )
CALL add_msg_y_shift_real
( rlwtoa , 1 )
CALL add_msg_y_shift_real
( czmean , 1 )
CALL add_msg_y_shift_real
( cfracl , 1 )
CALL add_msg_y_shift_real
( cfracm , 1 )
CALL add_msg_y_shift_real
( cfrach , 1 )
CALL add_msg_y_shift_real
( acfrst , 1 )
CALL add_msg_y_shift_integer
( ncfrst , 1 )
CALL add_msg_y_shift_real
( acfrcv , 1 )
CALL add_msg_y_shift_integer
( ncfrcv , 1 )
CALL add_msg_y_shift_real
( t0eta , (glen(2)) )
CALL add_msg_y_shift_real
( q0eta , (glen(2)) )
CALL add_msg_y_shift_real
( p0eta , (glen(2)) )
CALL add_msg_y_shift_real
( f_ice_phy , (glen(2)) )
CALL add_msg_y_shift_real
( f_rain_phy , (glen(2)) )
CALL add_msg_y_shift_real
( f_rimef_phy , (glen(2)) )
CALL add_msg_y_shift_real
( h_diabatic , (glen(2)) )
CALL add_msg_y_shift_real
( msft , 1 )
CALL add_msg_y_shift_real
( msfu , 1 )
CALL add_msg_y_shift_real
( msfv , 1 )
CALL add_msg_y_shift_real
( f , 1 )
CALL add_msg_y_shift_real
( e , 1 )
CALL add_msg_y_shift_real
( sina , 1 )
CALL add_msg_y_shift_real
( cosa , 1 )
CALL add_msg_y_shift_real
( ht , 1 )
CALL add_msg_y_shift_real
( ht_fine , 1 )
CALL add_msg_y_shift_real
( tsk , 1 )
CALL add_msg_y_shift_real
( rthcuten , (glen(2)) )
CALL add_msg_y_shift_real
( rqvcuten , (glen(2)) )
CALL add_msg_y_shift_real
( rqrcuten , (glen(2)) )
CALL add_msg_y_shift_real
( rqccuten , (glen(2)) )
CALL add_msg_y_shift_real
( rqscuten , (glen(2)) )
CALL add_msg_y_shift_real
( rqicuten , (glen(2)) )
CALL add_msg_y_shift_real
( w0avg , (glen(2)) )
CALL add_msg_y_shift_real
( rainc , 1 )
CALL add_msg_y_shift_real
( rainnc , 1 )
CALL add_msg_y_shift_real
( raincv , 1 )
CALL add_msg_y_shift_real
( rainncv , 1 )
CALL add_msg_y_shift_real
( rainbl , 1 )
CALL add_msg_y_shift_real
( nca , 1 )
CALL add_msg_y_shift_integer
( lowlyr , 1 )
CALL add_msg_y_shift_real
( rthraten , (glen(2)) )
CALL add_msg_y_shift_real
( rthratenlw , (glen(2)) )
CALL add_msg_y_shift_real
( rthratensw , (glen(2)) )
CALL add_msg_y_shift_real
( cldfra , (glen(2)) )
CALL add_msg_y_shift_real
( gsw , 1 )
CALL add_msg_y_shift_real
( glw , 1 )
CALL add_msg_y_shift_real
( xlat , 1 )
CALL add_msg_y_shift_real
( xlong , 1 )
CALL add_msg_y_shift_real
( albedo , 1 )
CALL add_msg_y_shift_real
( albbck , 1 )
CALL add_msg_y_shift_real
( emiss , 1 )
CALL add_msg_y_shift_real
( lu_index , 1 )
CALL add_msg_y_shift_real
( cldefi , 1 )
CALL add_msg_y_shift_real
( rublten , (glen(2)) )
CALL add_msg_y_shift_real
( rvblten , (glen(2)) )
CALL add_msg_y_shift_real
( rthblten , (glen(2)) )
CALL add_msg_y_shift_real
( rqvblten , (glen(2)) )
CALL add_msg_y_shift_real
( rqcblten , (glen(2)) )
CALL add_msg_y_shift_real
( rqiblten , (glen(2)) )
CALL add_msg_y_shift_real
( tmn , 1 )
CALL add_msg_y_shift_real
( xland , 1 )
CALL add_msg_y_shift_real
( znt , 1 )
CALL add_msg_y_shift_real
( ust , 1 )
CALL add_msg_y_shift_real
( mol , 1 )
CALL add_msg_y_shift_real
( pblh , 1 )
CALL add_msg_y_shift_real
( capg , 1 )
CALL add_msg_y_shift_real
( thc , 1 )
CALL add_msg_y_shift_real
( hfx , 1 )
CALL add_msg_y_shift_real
( qfx , 1 )
CALL add_msg_y_shift_real
( lh , 1 )
CALL add_msg_y_shift_real
( snowc , 1 )
CALL add_msg_y_shift_real
( mavail , 1 )
CALL add_msg_y_shift_real
( tkesfcf , 1 )
CALL add_msg_y_shift_real
( taucldi , (glen(2)) )
CALL add_msg_y_shift_real
( taucldc , (glen(2)) )
CALL add_msg_y_shift_real
( defor11 , (glen(2)) )
CALL add_msg_y_shift_real
( defor22 , (glen(2)) )
CALL add_msg_y_shift_real
( defor12 , (glen(2)) )
CALL add_msg_y_shift_real
( defor33 , (glen(2)) )
CALL add_msg_y_shift_real
( defor13 , (glen(2)) )
CALL add_msg_y_shift_real
( defor23 , (glen(2)) )
CALL add_msg_y_shift_real
( xkmv , (glen(2)) )
CALL add_msg_y_shift_real
( xkmh , (glen(2)) )
CALL add_msg_y_shift_real
( xkmhd , (glen(2)) )
CALL add_msg_y_shift_real
( xkhv , (glen(2)) )
CALL add_msg_y_shift_real
( xkhh , (glen(2)) )
CALL add_msg_y_shift_real
( div , (glen(2)) )
CALL add_msg_y_shift_real
( bn2 , (glen(2)) )
CALL stencil_y_shift
( grid%domdesc , grid%shift_y )
ENDIF
CALL wrf_debug
( 50 , 'exchange halo for y shift' )
CALL rsl_exch_stencil ( grid%domdesc , grid%shift_y )
u_1 (ips:ipe,:,jps:jpe) = u_1 (ips:ipe,:,jps+py:jpe+py)
u_2 (ips:ipe,:,jps:jpe) = u_2 (ips:ipe,:,jps+py:jpe+py)
ru (ips:ipe,:,jps:jpe) = ru (ips:ipe,:,jps+py:jpe+py)
v_1 (ips:ipe,:,jps:jpe) = v_1 (ips:ipe,:,jps+py:jpe+py)
v_2 (ips:ipe,:,jps:jpe) = v_2 (ips:ipe,:,jps+py:jpe+py)
rv (ips:ipe,:,jps:jpe) = rv (ips:ipe,:,jps+py:jpe+py)
w_1 (ips:ipe,:,jps:jpe) = w_1 (ips:ipe,:,jps+py:jpe+py)
w_2 (ips:ipe,:,jps:jpe) = w_2 (ips:ipe,:,jps+py:jpe+py)
ww (ips:ipe,:,jps:jpe) = ww (ips:ipe,:,jps+py:jpe+py)
rw (ips:ipe,:,jps:jpe) = rw (ips:ipe,:,jps+py:jpe+py)
ph_1 (ips:ipe,:,jps:jpe) = ph_1 (ips:ipe,:,jps+py:jpe+py)
ph_2 (ips:ipe,:,jps:jpe) = ph_2 (ips:ipe,:,jps+py:jpe+py)
phb (ips:ipe,:,jps:jpe) = phb (ips:ipe,:,jps+py:jpe+py)
ph0 (ips:ipe,:,jps:jpe) = ph0 (ips:ipe,:,jps+py:jpe+py)
php (ips:ipe,:,jps:jpe) = php (ips:ipe,:,jps+py:jpe+py)
t_1 (ips:ipe,:,jps:jpe) = t_1 (ips:ipe,:,jps+py:jpe+py)
t_2 (ips:ipe,:,jps:jpe) = t_2 (ips:ipe,:,jps+py:jpe+py)
t_init (ips:ipe,:,jps:jpe) = t_init (ips:ipe,:,jps+py:jpe+py)
tp_1 (ips:ipe,:,jps:jpe) = tp_1 (ips:ipe,:,jps+py:jpe+py)
tp_2 (ips:ipe,:,jps:jpe) = tp_2 (ips:ipe,:,jps+py:jpe+py)
mu_1 (ips:ipe,jps:jpe) = mu_1 (ips:ipe,jps+py:jpe+py)
mu_2 (ips:ipe,jps:jpe) = mu_2 (ips:ipe,jps+py:jpe+py)
mub (ips:ipe,jps:jpe) = mub (ips:ipe,jps+py:jpe+py)
mu0 (ips:ipe,jps:jpe) = mu0 (ips:ipe,jps+py:jpe+py)
mudf (ips:ipe,jps:jpe) = mudf (ips:ipe,jps+py:jpe+py)
tke_1 (ips:ipe,:,jps:jpe) = tke_1 (ips:ipe,:,jps+py:jpe+py)
tke_2 (ips:ipe,:,jps:jpe) = tke_2 (ips:ipe,:,jps+py:jpe+py)
p (ips:ipe,:,jps:jpe) = p (ips:ipe,:,jps+py:jpe+py)
al (ips:ipe,:,jps:jpe) = al (ips:ipe,:,jps+py:jpe+py)
alt (ips:ipe,:,jps:jpe) = alt (ips:ipe,:,jps+py:jpe+py)
alb (ips:ipe,:,jps:jpe) = alb (ips:ipe,:,jps+py:jpe+py)
zx (ips:ipe,:,jps:jpe) = zx (ips:ipe,:,jps+py:jpe+py)
zy (ips:ipe,:,jps:jpe) = zy (ips:ipe,:,jps+py:jpe+py)
rdz (ips:ipe,:,jps:jpe) = rdz (ips:ipe,:,jps+py:jpe+py)
rdzw (ips:ipe,:,jps:jpe) = rdzw (ips:ipe,:,jps+py:jpe+py)
pb (ips:ipe,:,jps:jpe) = pb (ips:ipe,:,jps+py:jpe+py)
z (ips:ipe,:,jps:jpe) = z (ips:ipe,:,jps+py:jpe+py)
q2 (ips:ipe,jps:jpe) = q2 (ips:ipe,jps+py:jpe+py)
t2 (ips:ipe,jps:jpe) = t2 (ips:ipe,jps+py:jpe+py)
th2 (ips:ipe,jps:jpe) = th2 (ips:ipe,jps+py:jpe+py)
u10 (ips:ipe,jps:jpe) = u10 (ips:ipe,jps+py:jpe+py)
v10 (ips:ipe,jps:jpe) = v10 (ips:ipe,jps+py:jpe+py)
imask (ips:ipe,jps:jpe) = imask (ips:ipe,jps+py:jpe+py)
if ( P_qv .GT. 1 ) moist_1 ( ips:ipe,:,jps:jpe,P_qv) = moist_1 (ips:ipe,:,jps+py:jpe+py,P_qv)
if ( P_qc .GT. 1 ) moist_1 ( ips:ipe,:,jps:jpe,P_qc) = moist_1 (ips:ipe,:,jps+py:jpe+py,P_qc)
if ( P_qr .GT. 1 ) moist_1 ( ips:ipe,:,jps:jpe,P_qr) = moist_1 (ips:ipe,:,jps+py:jpe+py,P_qr)
if ( P_qi .GT. 1 ) moist_1 ( ips:ipe,:,jps:jpe,P_qi) = moist_1 (ips:ipe,:,jps+py:jpe+py,P_qi)
if ( P_qs .GT. 1 ) moist_1 ( ips:ipe,:,jps:jpe,P_qs) = moist_1 (ips:ipe,:,jps+py:jpe+py,P_qs)
if ( P_qg .GT. 1 ) moist_1 ( ips:ipe,:,jps:jpe,P_qg) = moist_1 (ips:ipe,:,jps+py:jpe+py,P_qg)
if ( P_qv .GT. 1 ) moist_2 ( ips:ipe,:,jps:jpe,P_qv) = moist_2 (ips:ipe,:,jps+py:jpe+py,P_qv)
if ( P_qc .GT. 1 ) moist_2 ( ips:ipe,:,jps:jpe,P_qc) = moist_2 (ips:ipe,:,jps+py:jpe+py,P_qc)
if ( P_qr .GT. 1 ) moist_2 ( ips:ipe,:,jps:jpe,P_qr) = moist_2 (ips:ipe,:,jps+py:jpe+py,P_qr)
if ( P_qi .GT. 1 ) moist_2 ( ips:ipe,:,jps:jpe,P_qi) = moist_2 (ips:ipe,:,jps+py:jpe+py,P_qi)
if ( P_qs .GT. 1 ) moist_2 ( ips:ipe,:,jps:jpe,P_qs) = moist_2 (ips:ipe,:,jps+py:jpe+py,P_qs)
if ( P_qg .GT. 1 ) moist_2 ( ips:ipe,:,jps:jpe,P_qg) = moist_2 (ips:ipe,:,jps+py:jpe+py,P_qg)
sm000010 (ips:ipe,jps:jpe) = sm000010 (ips:ipe,jps+py:jpe+py)
sm010040 (ips:ipe,jps:jpe) = sm010040 (ips:ipe,jps+py:jpe+py)
sm040100 (ips:ipe,jps:jpe) = sm040100 (ips:ipe,jps+py:jpe+py)
sm100200 (ips:ipe,jps:jpe) = sm100200 (ips:ipe,jps+py:jpe+py)
sm010200 (ips:ipe,jps:jpe) = sm010200 (ips:ipe,jps+py:jpe+py)
soilm000 (ips:ipe,jps:jpe) = soilm000 (ips:ipe,jps+py:jpe+py)
soilm005 (ips:ipe,jps:jpe) = soilm005 (ips:ipe,jps+py:jpe+py)
soilm020 (ips:ipe,jps:jpe) = soilm020 (ips:ipe,jps+py:jpe+py)
soilm040 (ips:ipe,jps:jpe) = soilm040 (ips:ipe,jps+py:jpe+py)
soilm160 (ips:ipe,jps:jpe) = soilm160 (ips:ipe,jps+py:jpe+py)
soilm300 (ips:ipe,jps:jpe) = soilm300 (ips:ipe,jps+py:jpe+py)
sw000010 (ips:ipe,jps:jpe) = sw000010 (ips:ipe,jps+py:jpe+py)
sw010040 (ips:ipe,jps:jpe) = sw010040 (ips:ipe,jps+py:jpe+py)
sw040100 (ips:ipe,jps:jpe) = sw040100 (ips:ipe,jps+py:jpe+py)
sw100200 (ips:ipe,jps:jpe) = sw100200 (ips:ipe,jps+py:jpe+py)
sw010200 (ips:ipe,jps:jpe) = sw010200 (ips:ipe,jps+py:jpe+py)
soilw000 (ips:ipe,jps:jpe) = soilw000 (ips:ipe,jps+py:jpe+py)
soilw005 (ips:ipe,jps:jpe) = soilw005 (ips:ipe,jps+py:jpe+py)
soilw020 (ips:ipe,jps:jpe) = soilw020 (ips:ipe,jps+py:jpe+py)
soilw040 (ips:ipe,jps:jpe) = soilw040 (ips:ipe,jps+py:jpe+py)
soilw160 (ips:ipe,jps:jpe) = soilw160 (ips:ipe,jps+py:jpe+py)
soilw300 (ips:ipe,jps:jpe) = soilw300 (ips:ipe,jps+py:jpe+py)
st000010 (ips:ipe,jps:jpe) = st000010 (ips:ipe,jps+py:jpe+py)
st010040 (ips:ipe,jps:jpe) = st010040 (ips:ipe,jps+py:jpe+py)
st040100 (ips:ipe,jps:jpe) = st040100 (ips:ipe,jps+py:jpe+py)
st100200 (ips:ipe,jps:jpe) = st100200 (ips:ipe,jps+py:jpe+py)
st010200 (ips:ipe,jps:jpe) = st010200 (ips:ipe,jps+py:jpe+py)
soilt000 (ips:ipe,jps:jpe) = soilt000 (ips:ipe,jps+py:jpe+py)
soilt005 (ips:ipe,jps:jpe) = soilt005 (ips:ipe,jps+py:jpe+py)
soilt020 (ips:ipe,jps:jpe) = soilt020 (ips:ipe,jps+py:jpe+py)
soilt040 (ips:ipe,jps:jpe) = soilt040 (ips:ipe,jps+py:jpe+py)
soilt160 (ips:ipe,jps:jpe) = soilt160 (ips:ipe,jps+py:jpe+py)
soilt300 (ips:ipe,jps:jpe) = soilt300 (ips:ipe,jps+py:jpe+py)
landmask (ips:ipe,jps:jpe) = landmask (ips:ipe,jps+py:jpe+py)
topostdv (ips:ipe,jps:jpe) = topostdv (ips:ipe,jps+py:jpe+py)
toposlpx (ips:ipe,jps:jpe) = toposlpx (ips:ipe,jps+py:jpe+py)
toposlpy (ips:ipe,jps:jpe) = toposlpy (ips:ipe,jps+py:jpe+py)
shdmax (ips:ipe,jps:jpe) = shdmax (ips:ipe,jps+py:jpe+py)
shdmin (ips:ipe,jps:jpe) = shdmin (ips:ipe,jps+py:jpe+py)
snoalb (ips:ipe,jps:jpe) = snoalb (ips:ipe,jps+py:jpe+py)
slopecat (ips:ipe,jps:jpe) = slopecat (ips:ipe,jps+py:jpe+py)
toposoil (ips:ipe,jps:jpe) = toposoil (ips:ipe,jps+py:jpe+py)
landusef (ips:ipe,:,jps:jpe) = landusef (ips:ipe,:,jps+py:jpe+py)
soilctop (ips:ipe,:,jps:jpe) = soilctop (ips:ipe,:,jps+py:jpe+py)
soilcbot (ips:ipe,:,jps:jpe) = soilcbot (ips:ipe,:,jps+py:jpe+py)
soilcat (ips:ipe,jps:jpe) = soilcat (ips:ipe,jps+py:jpe+py)
vegcat (ips:ipe,jps:jpe) = vegcat (ips:ipe,jps+py:jpe+py)
tslb (ips:ipe,:,jps:jpe) = tslb (ips:ipe,:,jps+py:jpe+py)
smois (ips:ipe,:,jps:jpe) = smois (ips:ipe,:,jps+py:jpe+py)
sh2o (ips:ipe,:,jps:jpe) = sh2o (ips:ipe,:,jps+py:jpe+py)
xice (ips:ipe,jps:jpe) = xice (ips:ipe,jps+py:jpe+py)
smstav (ips:ipe,jps:jpe) = smstav (ips:ipe,jps+py:jpe+py)
smstot (ips:ipe,jps:jpe) = smstot (ips:ipe,jps+py:jpe+py)
sfcrunoff (ips:ipe,jps:jpe) = sfcrunoff (ips:ipe,jps+py:jpe+py)
udrunoff (ips:ipe,jps:jpe) = udrunoff (ips:ipe,jps+py:jpe+py)
ivgtyp (ips:ipe,jps:jpe) = ivgtyp (ips:ipe,jps+py:jpe+py)
isltyp (ips:ipe,jps:jpe) = isltyp (ips:ipe,jps+py:jpe+py)
vegfra (ips:ipe,jps:jpe) = vegfra (ips:ipe,jps+py:jpe+py)
sfcevp (ips:ipe,jps:jpe) = sfcevp (ips:ipe,jps+py:jpe+py)
grdflx (ips:ipe,jps:jpe) = grdflx (ips:ipe,jps+py:jpe+py)
sfcexc (ips:ipe,jps:jpe) = sfcexc (ips:ipe,jps+py:jpe+py)
acsnow (ips:ipe,jps:jpe) = acsnow (ips:ipe,jps+py:jpe+py)
acsnom (ips:ipe,jps:jpe) = acsnom (ips:ipe,jps+py:jpe+py)
snow (ips:ipe,jps:jpe) = snow (ips:ipe,jps+py:jpe+py)
snowh (ips:ipe,jps:jpe) = snowh (ips:ipe,jps+py:jpe+py)
canwat (ips:ipe,jps:jpe) = canwat (ips:ipe,jps+py:jpe+py)
sst (ips:ipe,jps:jpe) = sst (ips:ipe,jps+py:jpe+py)
potevp (ips:ipe,jps:jpe) = potevp (ips:ipe,jps+py:jpe+py)
snopcx (ips:ipe,jps:jpe) = snopcx (ips:ipe,jps+py:jpe+py)
soiltb (ips:ipe,jps:jpe) = soiltb (ips:ipe,jps+py:jpe+py)
tke_myj (ips:ipe,:,jps:jpe) = tke_myj (ips:ipe,:,jps+py:jpe+py)
ct (ips:ipe,jps:jpe) = ct (ips:ipe,jps+py:jpe+py)
thz0 (ips:ipe,jps:jpe) = thz0 (ips:ipe,jps+py:jpe+py)
z0 (ips:ipe,jps:jpe) = z0 (ips:ipe,jps+py:jpe+py)
qz0 (ips:ipe,jps:jpe) = qz0 (ips:ipe,jps+py:jpe+py)
uz0 (ips:ipe,jps:jpe) = uz0 (ips:ipe,jps+py:jpe+py)
vz0 (ips:ipe,jps:jpe) = vz0 (ips:ipe,jps+py:jpe+py)
qsfc (ips:ipe,jps:jpe) = qsfc (ips:ipe,jps+py:jpe+py)
akhs (ips:ipe,jps:jpe) = akhs (ips:ipe,jps+py:jpe+py)
akms (ips:ipe,jps:jpe) = akms (ips:ipe,jps+py:jpe+py)
kpbl (ips:ipe,jps:jpe) = kpbl (ips:ipe,jps+py:jpe+py)
htop (ips:ipe,jps:jpe) = htop (ips:ipe,jps+py:jpe+py)
hbot (ips:ipe,jps:jpe) = hbot (ips:ipe,jps+py:jpe+py)
cuppt (ips:ipe,jps:jpe) = cuppt (ips:ipe,jps+py:jpe+py)
totswdn (ips:ipe,jps:jpe) = totswdn (ips:ipe,jps+py:jpe+py)
totlwdn (ips:ipe,jps:jpe) = totlwdn (ips:ipe,jps+py:jpe+py)
rswtoa (ips:ipe,jps:jpe) = rswtoa (ips:ipe,jps+py:jpe+py)
rlwtoa (ips:ipe,jps:jpe) = rlwtoa (ips:ipe,jps+py:jpe+py)
czmean (ips:ipe,jps:jpe) = czmean (ips:ipe,jps+py:jpe+py)
cfracl (ips:ipe,jps:jpe) = cfracl (ips:ipe,jps+py:jpe+py)
cfracm (ips:ipe,jps:jpe) = cfracm (ips:ipe,jps+py:jpe+py)
cfrach (ips:ipe,jps:jpe) = cfrach (ips:ipe,jps+py:jpe+py)
acfrst (ips:ipe,jps:jpe) = acfrst (ips:ipe,jps+py:jpe+py)
ncfrst (ips:ipe,jps:jpe) = ncfrst (ips:ipe,jps+py:jpe+py)
acfrcv (ips:ipe,jps:jpe) = acfrcv (ips:ipe,jps+py:jpe+py)
ncfrcv (ips:ipe,jps:jpe) = ncfrcv (ips:ipe,jps+py:jpe+py)
t0eta (ips:ipe,:,jps:jpe) = t0eta (ips:ipe,:,jps+py:jpe+py)
q0eta (ips:ipe,:,jps:jpe) = q0eta (ips:ipe,:,jps+py:jpe+py)
p0eta (ips:ipe,:,jps:jpe) = p0eta (ips:ipe,:,jps+py:jpe+py)
f_ice_phy (ips:ipe,:,jps:jpe) = f_ice_phy (ips:ipe,:,jps+py:jpe+py)
f_rain_phy (ips:ipe,:,jps:jpe) = f_rain_phy (ips:ipe,:,jps+py:jpe+py)
f_rimef_phy (ips:ipe,:,jps:jpe) = f_rimef_phy (ips:ipe,:,jps+py:jpe+py)
h_diabatic (ips:ipe,:,jps:jpe) = h_diabatic (ips:ipe,:,jps+py:jpe+py)
msft (ips:ipe,jps:jpe) = msft (ips:ipe,jps+py:jpe+py)
msfu (ips:ipe,jps:jpe) = msfu (ips:ipe,jps+py:jpe+py)
msfv (ips:ipe,jps:jpe) = msfv (ips:ipe,jps+py:jpe+py)
f (ips:ipe,jps:jpe) = f (ips:ipe,jps+py:jpe+py)
e (ips:ipe,jps:jpe) = e (ips:ipe,jps+py:jpe+py)
sina (ips:ipe,jps:jpe) = sina (ips:ipe,jps+py:jpe+py)
cosa (ips:ipe,jps:jpe) = cosa (ips:ipe,jps+py:jpe+py)
ht (ips:ipe,jps:jpe) = ht (ips:ipe,jps+py:jpe+py)
ht_fine (ips:ipe,jps:jpe) = ht_fine (ips:ipe,jps+py:jpe+py)
tsk (ips:ipe,jps:jpe) = tsk (ips:ipe,jps+py:jpe+py)
rthcuten (ips:ipe,:,jps:jpe) = rthcuten (ips:ipe,:,jps+py:jpe+py)
rqvcuten (ips:ipe,:,jps:jpe) = rqvcuten (ips:ipe,:,jps+py:jpe+py)
rqrcuten (ips:ipe,:,jps:jpe) = rqrcuten (ips:ipe,:,jps+py:jpe+py)
rqccuten (ips:ipe,:,jps:jpe) = rqccuten (ips:ipe,:,jps+py:jpe+py)
rqscuten (ips:ipe,:,jps:jpe) = rqscuten (ips:ipe,:,jps+py:jpe+py)
rqicuten (ips:ipe,:,jps:jpe) = rqicuten (ips:ipe,:,jps+py:jpe+py)
w0avg (ips:ipe,:,jps:jpe) = w0avg (ips:ipe,:,jps+py:jpe+py)
rainc (ips:ipe,jps:jpe) = rainc (ips:ipe,jps+py:jpe+py)
rainnc (ips:ipe,jps:jpe) = rainnc (ips:ipe,jps+py:jpe+py)
raincv (ips:ipe,jps:jpe) = raincv (ips:ipe,jps+py:jpe+py)
rainncv (ips:ipe,jps:jpe) = rainncv (ips:ipe,jps+py:jpe+py)
rainbl (ips:ipe,jps:jpe) = rainbl (ips:ipe,jps+py:jpe+py)
nca (ips:ipe,jps:jpe) = nca (ips:ipe,jps+py:jpe+py)
lowlyr (ips:ipe,jps:jpe) = lowlyr (ips:ipe,jps+py:jpe+py)
rthraten (ips:ipe,:,jps:jpe) = rthraten (ips:ipe,:,jps+py:jpe+py)
rthratenlw (ips:ipe,:,jps:jpe) = rthratenlw (ips:ipe,:,jps+py:jpe+py)
rthratensw (ips:ipe,:,jps:jpe) = rthratensw (ips:ipe,:,jps+py:jpe+py)
cldfra (ips:ipe,:,jps:jpe) = cldfra (ips:ipe,:,jps+py:jpe+py)
gsw (ips:ipe,jps:jpe) = gsw (ips:ipe,jps+py:jpe+py)
glw (ips:ipe,jps:jpe) = glw (ips:ipe,jps+py:jpe+py)
xlat (ips:ipe,jps:jpe) = xlat (ips:ipe,jps+py:jpe+py)
xlong (ips:ipe,jps:jpe) = xlong (ips:ipe,jps+py:jpe+py)
albedo (ips:ipe,jps:jpe) = albedo (ips:ipe,jps+py:jpe+py)
albbck (ips:ipe,jps:jpe) = albbck (ips:ipe,jps+py:jpe+py)
emiss (ips:ipe,jps:jpe) = emiss (ips:ipe,jps+py:jpe+py)
lu_index (ips:ipe,jps:jpe) = lu_index (ips:ipe,jps+py:jpe+py)
cldefi (ips:ipe,jps:jpe) = cldefi (ips:ipe,jps+py:jpe+py)
rublten (ips:ipe,:,jps:jpe) = rublten (ips:ipe,:,jps+py:jpe+py)
rvblten (ips:ipe,:,jps:jpe) = rvblten (ips:ipe,:,jps+py:jpe+py)
rthblten (ips:ipe,:,jps:jpe) = rthblten (ips:ipe,:,jps+py:jpe+py)
rqvblten (ips:ipe,:,jps:jpe) = rqvblten (ips:ipe,:,jps+py:jpe+py)
rqcblten (ips:ipe,:,jps:jpe) = rqcblten (ips:ipe,:,jps+py:jpe+py)
rqiblten (ips:ipe,:,jps:jpe) = rqiblten (ips:ipe,:,jps+py:jpe+py)
tmn (ips:ipe,jps:jpe) = tmn (ips:ipe,jps+py:jpe+py)
xland (ips:ipe,jps:jpe) = xland (ips:ipe,jps+py:jpe+py)
znt (ips:ipe,jps:jpe) = znt (ips:ipe,jps+py:jpe+py)
ust (ips:ipe,jps:jpe) = ust (ips:ipe,jps+py:jpe+py)
mol (ips:ipe,jps:jpe) = mol (ips:ipe,jps+py:jpe+py)
pblh (ips:ipe,jps:jpe) = pblh (ips:ipe,jps+py:jpe+py)
capg (ips:ipe,jps:jpe) = capg (ips:ipe,jps+py:jpe+py)
thc (ips:ipe,jps:jpe) = thc (ips:ipe,jps+py:jpe+py)
hfx (ips:ipe,jps:jpe) = hfx (ips:ipe,jps+py:jpe+py)
qfx (ips:ipe,jps:jpe) = qfx (ips:ipe,jps+py:jpe+py)
lh (ips:ipe,jps:jpe) = lh (ips:ipe,jps+py:jpe+py)
snowc (ips:ipe,jps:jpe) = snowc (ips:ipe,jps+py:jpe+py)
mavail (ips:ipe,jps:jpe) = mavail (ips:ipe,jps+py:jpe+py)
tkesfcf (ips:ipe,jps:jpe) = tkesfcf (ips:ipe,jps+py:jpe+py)
taucldi (ips:ipe,:,jps:jpe) = taucldi (ips:ipe,:,jps+py:jpe+py)
taucldc (ips:ipe,:,jps:jpe) = taucldc (ips:ipe,:,jps+py:jpe+py)
defor11 (ips:ipe,:,jps:jpe) = defor11 (ips:ipe,:,jps+py:jpe+py)
defor22 (ips:ipe,:,jps:jpe) = defor22 (ips:ipe,:,jps+py:jpe+py)
defor12 (ips:ipe,:,jps:jpe) = defor12 (ips:ipe,:,jps+py:jpe+py)
defor33 (ips:ipe,:,jps:jpe) = defor33 (ips:ipe,:,jps+py:jpe+py)
defor13 (ips:ipe,:,jps:jpe) = defor13 (ips:ipe,:,jps+py:jpe+py)
defor23 (ips:ipe,:,jps:jpe) = defor23 (ips:ipe,:,jps+py:jpe+py)
xkmv (ips:ipe,:,jps:jpe) = xkmv (ips:ipe,:,jps+py:jpe+py)
xkmh (ips:ipe,:,jps:jpe) = xkmh (ips:ipe,:,jps+py:jpe+py)
xkmhd (ips:ipe,:,jps:jpe) = xkmhd (ips:ipe,:,jps+py:jpe+py)
xkhv (ips:ipe,:,jps:jpe) = xkhv (ips:ipe,:,jps+py:jpe+py)
xkhh (ips:ipe,:,jps:jpe) = xkhh (ips:ipe,:,jps+py:jpe+py)
div (ips:ipe,:,jps:jpe) = div (ips:ipe,:,jps+py:jpe+py)
bn2 (ips:ipe,:,jps:jpe) = bn2 (ips:ipe,:,jps+py:jpe+py)
!ENDOFREGISTRYGENERATEDINCLUDE