Called by :
Uses:
MODULE_DOMAIN (frame/module_domain.F) MODULE_DM (frame/module_dm.F) MODULE_STATE_DESCRIPTION (frame/module_state_description.F) MODULE_MODEL_CONSTANTS (share/module_model_constants.F) MODULE_BC (share/module_bc.F) MODULE_BC_EM (dyn_em/module_bc_em.F) MODULE_CONFIGURE (frame/module_configure.F) MODULE_DATE_TIME (share/module_date_time.F) MODULE_TILES (frame/module_tiles.F) MODULE_PHYSICS_INIT (phys/module_physics_init.F) MODULE_DM (frame/module_dm.F) MODULE_MODEL_CONSTANTS (share/module_model_constants.F)Arguments:
1. grid :: TYPE(DOMAIN)::GRID, INTENT( INOUT ) 2. allowed_to_read :: LOGICAL , INTENT( IN ) 3. lu_index :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 4. lu_mask :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 5. u_1 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 6. u_2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 7. u_b :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 8. u_bt :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 9. ru :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 10. ru_m :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 11. ru_tend :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 12. u_save :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 13. v_1 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 14. v_2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 15. v_b :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 16. v_bt :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 17. rv :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 18. rv_m :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 19. rv_tend :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 20. v_save :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 21. w_1 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 22. w_2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 23. w_b :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 24. w_bt :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 25. ww :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 26. rw :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 27. ph_1 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 28. ph_2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 29. ph_b :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 30. ph_bt :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 31. phb :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 32. phb_fine :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 33. ph0 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 34. php :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 35. t_1 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 36. t_2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 37. t_b :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 38. t_bt :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4 ) 39. t_init :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 40. tp_1 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 41. tp_2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 42. t_save :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 43. mu_1 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 44. mu_2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 45. mu_b :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),1,grid%spec_bdy_width,4 ) 46. mu_bt :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),1,grid%spec_bdy_width,4 ) 47. mub :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 48. mub_fine :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 49. mu0 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 50. mudf :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 51. muu :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 52. muv :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 53. mut :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 54. muts :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 55. nest_pos :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 56. nest_mask :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 57. ht_coarse :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 58. tke_1 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 59. tke_2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 60. p :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 61. al :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 62. alt :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 63. alb :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 64. zx :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 65. zy :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 66. rdz :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 67. rdzw :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 68. pb :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 69. fnm :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 70. fnp :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 71. rdnw :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 72. rdn :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 73. dnw :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 74. dn :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 75. znu :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 76. znw :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 77. t_base :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 78. z :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 79. q2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 80. t2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 81. th2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 82. psfc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 83. u10 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 84. v10 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 85. imask_nostag :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 86. imask_xstag :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 87. imask_ystag :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 88. imask_xystag :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 89. moist :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33,num_moist ) 90. moist_b :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4,num_moist ) 91. moist_bt :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4,num_moist ) 92. chem :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33,num_chem ) 93. scalar :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33,num_scalar ) 94. scalar_b :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4,num_scalar ) 95. scalar_bt :: REAL , INTENT( INOUT ) , DIMENSION( max(grid%ed31,grid%ed33),grid%sd32:grid%ed32,grid%spec_bdy_width,4,num_scalar ) 96. fcx :: REAL , INTENT( INOUT ) , DIMENSION( grid%spec_bdy_width ) 97. gcx :: REAL , INTENT( INOUT ) , DIMENSION( grid%spec_bdy_width ) 98. sm000010 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 99. sm010040 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 100. sm040100 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 101. sm100200 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 102. sm010200 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 103. soilm000 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 104. soilm005 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 105. soilm020 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 106. soilm040 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 107. soilm160 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 108. soilm300 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 109. sw000010 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 110. sw010040 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 111. sw040100 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 112. sw100200 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 113. sw010200 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 114. soilw000 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 115. soilw005 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 116. soilw020 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 117. soilw040 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 118. soilw160 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 119. soilw300 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 120. st000010 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 121. st010040 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 122. st040100 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 123. st100200 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 124. st010200 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 125. soilt000 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 126. soilt005 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 127. soilt020 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 128. soilt040 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 129. soilt160 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 130. soilt300 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 131. landmask :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 132. topostdv :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 133. toposlpx :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 134. toposlpy :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 135. shdmax :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 136. shdmin :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 137. snoalb :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 138. slopecat :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 139. toposoil :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 140. landusef :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%num_land_cat,grid%sm33:grid%em33 ) 141. soilctop :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%num_soil_cat,grid%sm33:grid%em33 ) 142. soilcbot :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%num_soil_cat,grid%sm33:grid%em33 ) 143. soilcat :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 144. vegcat :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 145. tslb :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%num_soil_layers,grid%sm33:grid%em33 ) 146. zs :: REAL , INTENT( INOUT ) , DIMENSION( grid%num_soil_layers ) 147. dzs :: REAL , INTENT( INOUT ) , DIMENSION( grid%num_soil_layers ) 148. smois :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%num_soil_layers,grid%sm33:grid%em33 ) 149. sh2o :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%num_soil_layers,grid%sm33:grid%em33 ) 150. xice :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 151. smstav :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 152. smstot :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 153. sfcrunoff :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 154. udrunoff :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 155. ivgtyp :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 156. isltyp :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 157. vegfra :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 158. sfcevp :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 159. grdflx :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 160. sfcexc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 161. acsnow :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 162. acsnom :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 163. snow :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 164. snowh :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 165. canwat :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 166. sst :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 167. smfr3d :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%num_soil_layers,grid%sm33:grid%em33 ) 168. keepfr3dflag :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%num_soil_layers,grid%sm33:grid%em33 ) 169. tke_myj :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 170. el_myj :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 171. exch_h :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 172. ct :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 173. thz0 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 174. z0 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 175. qz0 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 176. uz0 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 177. vz0 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 178. qsfc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 179. akhs :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 180. akms :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 181. kpbl :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 182. htop :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 183. hbot :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 184. cuppt :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 185. totswdn :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 186. totlwdn :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 187. rswtoa :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 188. rlwtoa :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 189. czmean :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 190. cfracl :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 191. cfracm :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 192. cfrach :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 193. acfrst :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 194. ncfrst :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 195. acfrcv :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 196. ncfrcv :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 197. aer_dry :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 198. aer_water :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 199. f_ice_phy :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 200. f_rain_phy :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 201. f_rimef_phy :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 202. h_diabatic :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 203. msft :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 204. msfu :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 205. msfv :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 206. f :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 207. e :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 208. sina :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 209. cosa :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 210. ht :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 211. ht_fine :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 212. ht_int :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 213. ht_input :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 214. tsk :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 215. tsk_save :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 216. u_base :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 217. v_base :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 218. qv_base :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 219. z_base :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm32:grid%em32 ) 220. rthcuten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 221. rqvcuten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 222. rqrcuten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 223. rqccuten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 224. rqscuten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 225. rqicuten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 226. w0avg :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 227. rainc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 228. rainnc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 229. raincv :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 230. rainncv :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 231. rainbl :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 232. nca :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 233. lowlyr :: INTEGER , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 234. mass_flux :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 235. apr_gr :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 236. apr_w :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 237. apr_mc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 238. apr_st :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 239. apr_as :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 240. apr_capma :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 241. apr_capme :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 242. apr_capmi :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 243. xf_ens :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33,grid%ensdim ) 244. pr_ens :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33,grid%ensdim ) 245. rthften :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 246. rqvften :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 247. rthraten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 248. rthratenlw :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 249. rthratensw :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 250. cldfra :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 251. swdown :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 252. gsw :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 253. glw :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 254. xlat :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 255. xlong :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 256. albedo :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 257. albbck :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 258. emiss :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 259. cldefi :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 260. rublten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 261. rvblten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 262. rthblten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 263. rqvblten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 264. rqcblten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 265. rqiblten :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 266. mp_restart_state :: REAL , INTENT( INOUT ) , DIMENSION( 1:7501 ) 267. tbpvs_state :: REAL , INTENT( INOUT ) , DIMENSION( 1:7501 ) 268. tbpvs0_state :: REAL , INTENT( INOUT ) , DIMENSION( 1:7501 ) 269. tmn :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 270. xland :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 271. znt :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 272. ust :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 273. rmol :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 274. mol :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 275. pblh :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 276. capg :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 277. thc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 278. hfx :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 279. qfx :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 280. lh :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 281. flhc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 282. flqc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 283. qsg :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 284. qvg :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 285. qcg :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 286. soilt1 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 287. tsnav :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 288. snowc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 289. mavail :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 290. tkesfcf :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm33:grid%em33 ) 291. taucldi :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 292. taucldc :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 293. defor11 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 294. defor22 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 295. defor12 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 296. defor33 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 297. defor13 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 298. defor23 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 299. xkmv :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 300. xkmh :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 301. xkmhd :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 302. xkhv :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 303. xkhh :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 304. div :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 ) 305. bn2 :: REAL , INTENT( INOUT ) , DIMENSION( grid%sm31:grid%em31,grid%sm32:grid%em32,grid%sm33:grid%em33 )START_DOMAIN_EM calls :