| 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) | slmask, | ||
| 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 | ||
| ) |