15 |
. albvisdr, albvisdf, albnirdr, albnirdf, emiss, |
. albvisdr, albvisdf, albnirdr, albnirdf, emiss, |
16 |
. landtype, tgz, nchpland, ityp |
. landtype, tgz, nchpland, ityp |
17 |
integer nchpland |
integer nchpland |
18 |
integer ityp(nchp) |
integer ityp(nchp,Nsx,Nsy) |
19 |
_RL chfr(nchp) |
_RL chfr(nchp,Nsx,Nsy) |
20 |
_RL alai(nchp) |
_RL alai(nchp,Nsx,Nsy) |
21 |
_RL agrn(nchp) |
_RL agrn(nchp,Nsx,Nsy) |
22 |
_RL albvisdr(sNx,sNy,Nsx,Nsy) |
_RL albvisdr(sNx,sNy,Nsx,Nsy) |
23 |
_RL albvisdf(sNx,sNy,Nsx,Nsy) |
_RL albvisdf(sNx,sNy,Nsx,Nsy) |
24 |
_RL albnirdr(sNx,sNy,Nsx,Nsy) |
_RL albnirdr(sNx,sNy,Nsx,Nsy) |