mksoitex

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 textures

USES:

   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

ARGUMENTS:

   implicit none
   character(len=*), intent(in) :: fsoitex        !soil texture dataset file name
   integer , intent(in) :: ndiag                  !unit # for diagnostic output
   real(r8), intent(in) :: pctgla_o(lsmlon,lsmlat)      !% glacier (output grid)
   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