*
This routine assigns fractions of the 13 landuse classes to each ECMWF *
grid point. *
The landuse inventory of *
*
Belward, A.S., Estes, J.E., and Kline, K.D., 1999, * The IGBP-DIS 1-Km Land-Cover Data Set DISCover: * A Project Overview: Photogrammetric Engineering and Remote Sensing , * v. 65, no. 9, p. 1013-1020 * * if there are no data in the inventory * the ECMWF land/sea mask is used to distinguish * between sea (-> ocean) and land (-> grasslands). * * Author: A. Stohl * * 5 December 1996 * 8 February 1999 Additional use of nests, A. Stohl * 29 December 2006 new landuse inventory, S. Eckhardt *
*
Variables: * xlanduse fractions of numclass landuses for each model grid point * landinvent landuse inventory (0.3 deg resolution) * *
for test: write out xlanduse
Same as above, but for the nested grids
*** TEST *** dyn(1)=dyn(1)/40 dxn(1)=dxn(1)/40 xlon0n(1)=1 ylat0n(1)=50 * TEST *****
for test: write out xlanduse