Subroutine : LAND_PERCENTAGES

Defined in: main/ndown_em.F

Called by :

ndown_em (main/ndown_em.F)
Uses:

  MODULE_SOIL_PRE                   (share/module_soil_pre.F)
Arguments:

  1. xland        :: REAL    , INTENT( OUT )   , DIMENSION( ims:ime,jms:jme )
  2. landuse_frac :: REAL    , INTENT( INOUT ) , DIMENSION( ims:ime,1:num_veg_cat,jms:jme )
  3. soil_top_cat :: REAL    , INTENT( IN )    , DIMENSION( ims:ime,1:num_soil_top_cat,jms:jme )
  4. soil_bot_cat :: REAL    , INTENT( IN )    , DIMENSION( ims:ime,1:num_soil_bot_cat,jms:jme )
  5. isltyp       :: INTEGER , INTENT( OUT )   , DIMENSION( ims:ime,jms:jme )
  6. ivgtyp       :: INTEGER , INTENT( OUT )   , DIMENSION( ims:ime,jms:jme )
  7. num_veg_cat  :: INTEGER , INTENT( IN )    
  8. num_soil_top_cat :: INTEGER , INTENT( IN )    
  9. num_soil_bot_cat :: INTEGER , INTENT( IN )    
 10. ids          :: INTEGER , INTENT( IN )    
 11. ide          :: INTEGER , INTENT( IN )    
 12. jds          :: INTEGER , INTENT( IN )    
 13. jde          :: INTEGER , INTENT( IN )    
 14. kds          :: INTEGER , INTENT( IN )    
 15. kde          :: INTEGER , INTENT( IN )    
 16. ims          :: INTEGER , INTENT( IN )    
 17. ime          :: INTEGER , INTENT( IN )    
 18. jms          :: INTEGER , INTENT( IN )    
 19. jme          :: INTEGER , INTENT( IN )    
 20. kms          :: INTEGER , INTENT( IN )    
 21. kme          :: INTEGER , INTENT( IN )    
 22. its          :: INTEGER , INTENT( IN )    
 23. ite          :: INTEGER , INTENT( IN )    
 24. jts          :: INTEGER , INTENT( IN )    
 25. jte          :: INTEGER , INTENT( IN )    
 26. kts          :: INTEGER , INTENT( IN )    
 27. kte          :: INTEGER , INTENT( IN )    
 28. iswater      :: INTEGER , INTENT( IN )    
LAND_PERCENTAGES calls :

process_percent_cat_new(share/module_soil_pre.F)