subroutine analy | ( | integer | lugb, |
integer | iy, | ||
integer | im, | ||
integer | id, | ||
integer | ih, | ||
real (kind=kind_io8) | fh, | ||
integer | len, | ||
integer | lsoil, | ||
real (kind=kind_io8), dimension(len) | slmskl, | ||
real (kind=kind_io8), dimension(len) | slmskw, | ||
character*500 | fntsfa, | ||
character*500 | fnweta, | ||
character*500 | fnsnoa, | ||
character*500 | fnzora, | ||
character*500 | fnalba, | ||
character*500 | fnaisa, | ||
character*500 | fntg3a, | ||
character*500 | fnscva, | ||
character*500 | fnsmca, | ||
character*500 | fnstca, | ||
character*500 | fnacna, | ||
character*500 | fnvega, | ||
character*500 | fnveta, | ||
character*500 | fnsota, | ||
fnvmna, | |||
fnvmxa, | |||
fnslpa, | |||
fnabsa, | |||
real (kind=kind_io8), dimension(len) | tsfanl, | ||
real (kind=kind_io8), dimension(len) | wetanl, | ||
real (kind=kind_io8), dimension(len) | snoanl, | ||
real (kind=kind_io8), dimension(len) | zoranl, | ||
real (kind=kind_io8), dimension(len,4) | albanl, | ||
real (kind=kind_io8), dimension(len) | aisanl, | ||
real (kind=kind_io8), dimension(len) | tg3anl, | ||
real (kind=kind_io8), dimension (len) | cvanl, | ||
real (kind=kind_io8), dimension(len) | cvbanl, | ||
real (kind=kind_io8), dimension(len) | cvtanl, | ||
real (kind=kind_io8), dimension(len,lsoil) | smcanl, | ||
real (kind=kind_io8), dimension(len,lsoil) | stcanl, | ||
real (kind=kind_io8), dimension(len) | slianl, | ||
real (kind=kind_io8), dimension(len) | scvanl, | ||
real (kind=kind_io8), dimension(len) | acnanl, | ||
real (kind=kind_io8), dimension(len) | veganl, | ||
real (kind=kind_io8), dimension(len) | vetanl, | ||
real (kind=kind_io8), dimension(len) | sotanl, | ||
real (kind=kind_io8), dimension(len,2) | alfanl, | ||
real (kind=kind_io8), dimension(len) | tsfan0, | ||
real (kind=kind_io8), dimension(len) | vmnanl, | ||
real (kind=kind_io8), dimension(len) | vmxanl, | ||
real (kind=kind_io8), dimension(len) | slpanl, | ||
real (kind=kind_io8), dimension(len) | absanl, | ||
integer | kpdtsf, | ||
integer | kpdwet, | ||
integer | kpdsno, | ||
integer | kpdsnd, | ||
integer | kpdzor, | ||
integer, dimension(4) | kpdalb, | ||
integer | kpdais, | ||
integer | kpdtg3, | ||
integer | kpdscv, | ||
integer | kpdacn, | ||
integer | kpdsmc, | ||
integer | kpdstc, | ||
integer | kpdveg, | ||
integer | kprvet, | ||
integer | kpdsot, | ||
integer, dimension(2) | kpdalf, | ||
integer | kpdvmn, | ||
integer | kpdvmx, | ||
integer | kpdslp, | ||
integer | kpdabs, | ||
integer | irttsf, | ||
integer | irtwet, | ||
integer | irtsno, | ||
integer | irtzor, | ||
integer | irtalb, | ||
integer | irtais, | ||
integer | irttg3, | ||
integer | irtscv, | ||
integer | irtacn, | ||
integer | irtsmc, | ||
integer | irtstc, | ||
integer | irtveg, | ||
integer | irtvet, | ||
integer | irtsot, | ||
integer | irtalf, | ||
integer | irtvmn, | ||
integer | irtvmx, | ||
integer | irtslp, | ||
integer | irtabs, | ||
integer | imsk, | ||
integer | jmsk, | ||
real (kind=kind_io8), dimension(imsk,jmsk) | slmskh, | ||
real (kind=kind_io8), dimension(len) | outlat, | ||
real (kind=kind_io8), dimension(len) | outlon, | ||
logical | gaus, | ||
real (kind=kind_io8) | blno, | ||
real (kind=kind_io8) | blto, | ||
integer | me, | ||
logical | lanom | ||
) |
References fixrda().
Referenced by sfccycle().