INTERFACE:
subroutine mksoitex (fsoitex, ndiag, pctgla_o, sand_o, clay_o)DESCRIPTION:
make %sand and %clay from IGBP soil data, which includes igbp soil 'mapunits' and their corresponding texturesUSES:
use shr_kind_mod, only: r8 => shr_kind_r8 use clm_varpar !parameters use clm_varsur !surface variables use clm_varctl !run control variables use fileutils, only : getfil use areaMod !area averaging routines use shr_sys_mod, only : shr_sys_flush use ncdio use abortutils, only : endrunARGUMENTS:
implicit none
character(len=*), intent(in) :: fsoitex !soil texture dataset file n
integer , intent(in) :: ndiag !unit # for diagnostic outpu
real(r8), intent(in) :: pctgla_o(lsmlon,lsmlat) !% glacier (output gri
real(r8), intent(out):: sand_o(lsmlon,lsmlat,nlevsoi) !% sand (output grid)
real(r8), intent(out):: clay_o(lsmlon,lsmlat,nlevsoi) !% clay (output grid)\end{verbatim}{\sf CALLED FROM:}
\begin{verbatim} subroutine mksrfdat in module mksrfdatMod
REVISION HISTORY:
Authors: Gordon Bonan and Sam Levis