CCPP SciDoc for HSD Capabilities  SRW v3.0.0
Common Community Physics Package Developed at DTC
Loading...
Searching...
No Matches
sfccyc_module Module Reference

Functions/Subroutines

character(len=16) function message (prefix, index)
subroutine sfccycle (lugb, len, lsoil, sig1t, deltsfc, iy, im, id, ih, fh, rla, rlo, slmskl, slmskw, orog, orog_uf, use_ufo, nst_anl, sihfcs, sicfcs, sitfcs, swdfcs, slcfcs, vmnfcs, vmxfcs, slpfcs, absfcs, tsffcs, snofcs, zorfcs, albfcs, tg3fcs, cnpfcs, smcfcs, stcfcs, slifcs, aisfcs, vegfcs, vetfcs, sotfcs, socfcs, alffcs, cvfcs, cvbfcs, cvtfcs, me, nthrds, nlunit, sz_nml, input_nml_file, min_ice, ialb, isot, ivegsrc, tile_num_ch, i_index, j_index)
 This subroutine reads or interpolates surface climatology data in analysis and forecast mode.
subroutine count (slimsk, sno, ijmax)
 This subroutine counts number of points for the four surface conditions.
subroutine monitr (lfld, fld, slimsk, sno, ijmax)
subroutine dayoyr (iyr, imo, idy, ldy)
 This subroutine figures out the day of the year given imo and idy.
subroutine hmskrd (lugb, imsk, jmsk, fnmskh, kpds5, slmskh, gausm, blnmsk, bltmsk, me)
 reads a high resolution mask field for use in grib interpolation
subroutine fixrdg (lugb, idim, jdim, fngrib, kpds5, gdata, gaus, blno, blto, me)
subroutine getarea (kgds, dlat, dlon, rslat, rnlat, wlon, elon, ijordr, me)
 This subroutine get area of the grib record.
subroutine subst (data, imax, jmax, dlon, dlat, ijordr)
subroutine la2ga (regin, imxin, jmxin, rinlon, rinlat, rlon, rlat, inttyp, gauout, len, lmask, rslmsk, slmask, outlat, outlon, me)
 This subroutine conducts interpolation from lat/lon to Gaussian grid to other lat/lon grid.
subroutine maxmin (f, imax, kmax)
subroutine filanl (tsfanl, tsfan2, wetanl, snoanl, zoranl, albanl, aisanl, tg3anl, cvanl, cvbanl, cvtanl, cnpanl, smcanl, stcanl, slianl, scvanl, veganl, vetanl, sotanl, socanl, alfanl, sihanl, sicanl, vmnanl, vmxanl, slpanl, absanl, tsfclm, tsfcl2, wetclm, snoclm, zorclm, albclm, aisclm, tg3clm, cvclm, cvbclm, cvtclm, cnpclm, smcclm, stcclm, sliclm, scvclm, vegclm, vetclm, sotclm, socclm, alfclm, sihclm, sicclm, vmnclm, vmxclm, slpclm, absclm, len, lsoil)
subroutine analy (lugb, iy, im, id, ih, fh, len, lsoil, slmskl, slmskw, fntsfa, fnweta, fnsnoa, fnzora, fnalba, fnaisa, fntg3a, fnscva, fnsmca, fnstca, fnacna, fnvega, fnveta, fnsota, fnsoca, fnvmna, fnvmxa, fnslpa, fnabsa, tsfanl, wetanl, snoanl, zoranl, albanl, aisanl, tg3anl, cvanl, cvbanl, cvtanl, smcanl, stcanl, slianl, scvanl, acnanl, veganl, vetanl, sotanl, socanl, alfanl, tsfan0, vmnanl, vmxanl, slpanl, absanl, kpdtsf, kpdwet, kpdsno, kpdsnd, kpdzor, kpdalb, kpdais, kpdtg3, kpdscv, kpdacn, kpdsmc, kpdstc, kpdveg, kprvet, kpdsot, kpdsoc, kpdalf, kpdvmn, kpdvmx, kpdslp, kpdabs, irttsf, irtwet, irtsno, irtzor, irtalb, irtais, irttg3, irtscv, irtacn, irtsmc, irtstc, irtveg, irtvet, irtsot, irtsoc, irtalf, irtvmn, irtvmx, irtslp, irtabs, imsk, jmsk, slmskh, outlat, outlon, gaus, blno, blto, me, lanom)
subroutine filfcs (tsffcs, wetfcs, snofcs, zorfcs, albfcs, tg3fcs, cvfcs, cvbfcs, cvtfcs, cnpfcs, smcfcs, stcfcs, slifcs, aisfcs, vegfcs, vetfcs, sotfcs, socfcs, alffcs, sihfcs, sicfcs, vmnfcs, vmxfcs, slpfcs, absfcs, tsfanl, wetanl, snoanl, zoranl, albanl, tg3anl, cvanl, cvbanl, cvtanl, cnpanl, smcanl, stcanl, slianl, aisanl, veganl, vetanl, sotanl, socanl, alfanl, sihanl, sicanl, vmnanl, vmxanl, slpanl, absanl, len, lsoil)
subroutine bktges (smcfcs, stcfcs, len, lsoil)
subroutine rof01 (aisfld, len, op, crit)
subroutine rof01_len (aisfld, len, op, crit)
subroutine tsfcor (tsfc, orog, slmask, umask, len, rlapse)
subroutine snodpth (scvanl, slianl, tsfanl, snoclm, glacir, snwmax, snwmin, landice, len, snoanl, me)
 This subroutine uses surface temperature to get snow depth estimate.
subroutine merge (len, lsoil, iy, im, id, ih, fh, deltsfc, slmskl, slmskw, sihfcs, sicfcs, vmnfcs, vmxfcs, slpfcs, absfcs, tsffcs, wetfcs, snofcs, zorfcs, albfcs, aisfcs, cvfcs, cvbfcs, cvtfcs, cnpfcs, smcfcs, stcfcs, slifcs, vegfcs, vetfcs, sotfcs, socfcs, alffcs, sihanl, sicanl, vmnanl, vmxanl, slpanl, absanl, tsfanl, tsfan2, wetanl, snoanl, zoranl, albanl, aisanl, cvanl, cvbanl, cvtanl, cnpanl, smcanl, stcanl, slianl, veganl, vetanl, sotanl, socanl, alfanl, ctsfl, calbl, caisl, csnol, csmcl, czorl, cstcl, cvegl, ctsfs, calbs, caiss, csnos, csmcs, czors, cstcs, cvegs, ccv, ccvb, ccvt, ccnp, cvetl, cvets, csotl, csots, csocl, csocs, calfl, calfs, csihl, csihs, csicl, csics, cvmnl, cvmns, cvmxl, cvmxs, cslpl, cslps, cabsl, cabss, irttsf, irtwet, irtsno, irtzor, irtalb, irtais, irttg3, irtscv, irtacn, irtsmc, irtstc, irtveg, irtvmn, irtvmx, irtslp, irtabs, irtvet, irtsot, irtsoc, irtalf, landice, me)
 This subroutine merges analysis and forecast.
subroutine newice (slianl, slifcs, tsfanl, tsffcs, len, lsoil, sihnew, sicnew, sihanl, sicanl, albanl, snoanl, zoranl, smcanl, stcanl, albsea, snosea, zorsea, smcsea, smcice, tsfmin, tsfice, albice, zorice, tgice, rla, rlo, me)
subroutine qcsnow (snoanl, slmask, aisanl, glacir, len, snoval, landice, me)
subroutine qcsice (ais, glacir, amxice, aicice, aicsea, sllnd, slmask, rla, rlo, len, me)
subroutine setlsi (slmask, aisfld, len, aicice, slifld)
subroutine scale (fld, len, scl)
subroutine qcmxmn (ttl, fld, slimsk, sno, iceflg, fldlmx, fldlmn, fldomx, fldomn, fldimx, fldimn, fldjmx, fldjmn, fldsmx, fldsmn, epsfld, rla, rlo, len, mode, percrit, lgchek, me)
subroutine setzro (fld, eps, len)
subroutine getscv (snofld, scvfld, len)
subroutine getstc (tsffld, tg3fld, slifld, len, lsoil, stcfld, tsfimx)
subroutine getsmc (wetfld, len, lsoil, smcfld, me)
 This subroutine calculates layer soil wetness.
subroutine usesgt (sig1t, slianl, tg3anl, len, lsoil, tsfanl, stcanl, tsfimx)
subroutine snosfc (snoanl, tsfanl, tsfsmx, len, me)
subroutine albocn (albclm, slmask, albomx, len)
subroutine qcmxice (glacir, amxice, len, me)
subroutine qcsli (slianl, slifcs, len, me)
subroutine qcbyfc (tsffcs, snofcs, qctsfs, qcsnos, qctsfi, len, lsoil, snoanl, aisanl, slianl, tsfanl, albanl, zoranl, smcanl, smcclm, tsfsmx, albomx, zoromx, me)
subroutine setrmsk (kpds5, slmask, igaul, jgaul, wlon, rnlat, data, imax, jmax, rlnout, rltout, lmask, rslmsk, gaus, blno, blto, kgds1, kpds4, lbms)
subroutine ga2la (gauin, imxin, jmxin, regout, imxout, jmxout, wlon, rnlat, rlnout, rltout, gaus, blno, blto)
 This subroutine interpolates from lat/lon grid to other lat/lon grid.
subroutine landtyp (vegtype, soiltype, colortype, slptype, slmask, len)
subroutine gaulat (gaul, k)
subroutine anomint (tsfan0, tsfclm, tsfcl0, tsfanl, len)
 The subroutine conducts time interpolation of anomalies, and add initial anomaly to date interpolated climatology.
subroutine clima (lugb, iy, im, id, ih, fh, len, lsoil, slmskl, slmskw, fntsfc, fnwetc, fnsnoc, fnzorc, fnalbc, fnaisc, fntg3c, fnscvc, fnsmcc, fnstcc, fnacnc, fnvegc, fnvetc, fnsotc, fnsocc, fnvmnc, fnvmxc, fnslpc, fnabsc, tsfclm, tsfcl2, wetclm, snoclm, zorclm, albclm, aisclm, tg3clm, cvclm, cvbclm, cvtclm, cnpclm, smcclm, stcclm, sliclm, scvclm, acnclm, vegclm, vetclm, sotclm, socclm, alfclm, vmnclm, vmxclm, slpclm, absclm, kpdtsf, kpdwet, kpdsno, kpdzor, kpdalb, kpdais, kpdtg3, kpdscv, kpdacn, kpdsmc, kpdstc, kpdveg, kpdvet, kpdsot, kpdsoc, kpdalf, tsfcl0, kpdvmn, kpdvmx, kpdslp, kpdabs, deltsfc, lanom, imsk, jmsk, slmskh, outlat, outlon, gaus, blno, blto, me, lprnt, iprnt, fnalbc2, ialb, tile_num_ch, i_index, j_index)
subroutine fixrdc_tile (filename_raw, tile_num_ch, i_index, j_index, kpds, var, mon, npts, me)
subroutine netcdf_err (error)
subroutine fixrdc (lugb, fngrib, kpds5, kpds7, mon, slmask, gdata, len, iret, imsk, jmsk, slmskh, gaus, blno, blto, outlat, outlon, me)
 reads in grib climatology files and interpolate to the input grid. grib files should allow all the necessary parameters to be extracted from the description records.
subroutine fixrda (lugb, fngrib, kpds5, slmask, iy, im, id, ih, fh, gdata, len, iret, imsk, jmsk, slmskh, gaus, blno, blto, outlat, outlon, me)
subroutine snodpth2 (glacir, snwmax, snoanl, len, me)

Variables

integer kpdtsf
integer kpdwet
integer kpdsno
integer kpdzor
integer kpdais
integer kpdtg3
integer kpdplr
integer kpdgla
integer, dimension(4), parameter kpdalb_0 =(/212,215,213,216/)
integer, dimension(4), parameter kpdalb_1 =(/189,190,191,192/)
integer, dimension(2), parameter kpdalf =(/214,217/)
real(kind=kind_io8), parameter ten =10.0
real(kind=kind_io8), parameter one =1.0
real(kind=kind_io8), parameter zero =0.0
integer, parameter xdata =7200
integer, parameter ydata =3600
integer, parameter mdata =xdata*ydata
integer veg_type_landice
integer soil_type_landice
integer soil_color_landice
integer num_threads