SURFEX v7.3: /home/dasprezs/EXPORT_v7_3/src/SURFEX/default_data

Go to the documentation of this file.
00001 SUBROUTINE DEFAULT_DATA_COVER_1
00002  
00003 USE MODD_SURF_PAR
00004 USE MODD_DATA_COVER_PAR
00005 USE MODD_DATA_COVER
00006 IMPLICIT NONE
00007  
00008 XDATA_TOWN(:) = (/          &
00009    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   1.00,   0.00,   0.00,   0.00, &
00010    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00011    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00012    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00013    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00014    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00015    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00016    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00017    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00018    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00019    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00020    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00021    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00022    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00023    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00024    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   0.30,   0.10,   0.10, &
00025    0.20,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00026    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00027    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00028    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00029    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00030    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00031    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00032    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00033    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00034    0.00,   0.00,   0.00,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00035    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00036    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00037    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00038    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00039    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00040    0.00,   0.01,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01, &
00041    0.00,   0.01,   0.02,   0.01,   0.01,   0.01,   0.00,   0.00,   0.00,   0.01, &
00042    0.00,   0.00,   0.00,   0.00,   0.01,   0.02,   0.01,   0.00,   0.00,   0.01, &
00043    0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00044    0.00,   0.00,   0.02,   0.01,   0.00,   0.00,   0.01,   0.01,   0.00,   0.01, &
00045    0.02,   0.01,   0.02,   0.00,   0.01,   0.02,   0.00,   0.00,   0.00,   0.00, &
00046    0.00,   0.00,   0.00,   0.00,   0.00,   0.03,   0.00,   0.00,   0.00,   0.00, &
00047    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00048    0.00,   0.01,   0.01,   0.04,   0.00,   0.00,   0.00,   0.02,   0.01,   0.01, &
00049    0.01,   0.01,   0.01,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00050    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00051    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.01,   0.01, &
00052    0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00053    0.00,   0.00,   0.03,   0.04,   0.01,   0.01,   0.02,   0.01,   0.02,   0.02, &
00054    0.04,   0.05,   0.09,   0.04,   0.02,   0.02,   0.03,   0.05,   0.03,   0.02, &
00055    0.00,   0.00,   0.00,   0.02,   0.01,   0.02,   0.04,   0.00,   0.02,   0.01, &
00056    0.02,   0.04,   0.08,   0.05,   0.03,   0.02,   0.02,   0.02,   0.00,   0.02, &
00057    0.02,   0.02,   0.01,   0.03,   0.03,   0.02,   0.02,   0.02,   0.02,   0.00, &
00058    0.02,   0.01,   0.02,   0.01,   0.00,   0.02,   0.00,   0.00,   0.00,   0.00, &
00059    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01, &
00060    0.01,   0.02,   0.01,   0.01,   0.01,   0.01,   0.01,   0.01,   0.00,   0.02, &
00061    0.02,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.02, &
00062    0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00063    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00064    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.02,   0.01, &
00065    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00066    1.00,   0.00,   0.01 &
00067          /)
00068 !-------------------------------------------------------------------                                                    
00069 XDATA_NATURE(:) = (/          &
00070    0.00,   0.00,   0.00,   1.00,   1.00,   1.00,   0.00,   1.00,   1.00,   1.00, &
00071    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00072    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00073    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00074    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00075    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00076    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00077    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00078    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00079    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00080    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00081    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00082    1.00,   1.00,   1.00,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00083    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00084    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00085    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.70,   0.90,   0.90, &
00086    0.80,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00087    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00088    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00089    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00090    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00091    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00092    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00093    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00094    1.00,   0.50,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00095    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00096    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00097    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00098    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00099    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00100    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00101    1.00,   0.99,   1.00,   0.99,   1.00,   1.00,   1.00,   1.00,   1.00,   0.99, &
00102    1.00,   0.99,   0.98,   0.99,   0.99,   0.99,   1.00,   1.00,   1.00,   0.99, &
00103    1.00,   1.00,   1.00,   1.00,   0.99,   0.98,   0.99,   1.00,   1.00,   0.99, &
00104    1.00,   0.99,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00105    1.00,   1.00,   0.98,   0.99,   1.00,   1.00,   0.99,   0.99,   1.00,   0.99, &
00106    0.98,   0.99,   0.98,   1.00,   0.99,   0.98,   1.00,   1.00,   1.00,   1.00, &
00107    1.00,   1.00,   1.00,   1.00,   1.00,   0.97,   1.00,   1.00,   1.00,   1.00, &
00108    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00109    1.00,   0.99,   0.99,   0.96,   1.00,   1.00,   1.00,   0.98,   0.99,   0.99, &
00110    0.99,   0.99,   0.99,   0.99,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00111    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00112    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   0.99,   0.99,   0.99, &
00113    0.99,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00114    1.00,   1.00,   0.97,   0.96,   0.99,   0.99,   0.98,   0.99,   0.98,   0.98, &
00115    0.96,   0.95,   0.91,   0.96,   0.98,   0.98,   0.97,   0.95,   0.97,   0.98, &
00116    1.00,   1.00,   1.00,   0.98,   0.99,   0.98,   0.96,   1.00,   0.98,   0.99, &
00117    0.98,   0.96,   0.92,   0.95,   0.97,   0.98,   0.98,   0.98,   1.00,   0.98, &
00118    0.98,   0.98,   0.99,   0.97,   0.97,   0.98,   0.98,   0.98,   0.98,   1.00, &
00119    0.98,   0.99,   0.98,   0.99,   1.00,   0.98,   1.00,   1.00,   1.00,   1.00, &
00120    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   0.99, &
00121    0.99,   0.98,   0.99,   0.99,   0.99,   0.99,   0.99,   0.99,   1.00,   0.98, &
00122    0.98,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   0.98, &
00123    0.99,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00124    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   0.00,   0.45, &
00125    0.05,   1.00,   0.01,   0.02,   0.03,   0.25,   1.00,   0.99,   0.98,   0.99, &
00126    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00127    0.00,   1.00,   0.99 &
00128          /)
00129 !-------------------------------------------------------------------                                                    
00130 XDATA_WATER(:) = (/          &
00131    0.00,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00132    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00133    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00134    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00135    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00136    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00137    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00138    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00139    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00140    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00141    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00142    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00143    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00144    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00145    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00146    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00147    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00148    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00149    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00150    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00151    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00152    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00153    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00154    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00155    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00156    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00157    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00158    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00159    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00160    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00161    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00162    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00163    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00164    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00165    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00166    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00167    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00168    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00169    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00170    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00171    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00172    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00173    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00174    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00175    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00176    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00177    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00178    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00179    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00180    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00181    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00182    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00183    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00184    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00185    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   1.00,   0.55, &
00186    0.95,   0.00,   0.99,   0.98,   0.97,   0.75,   0.00,   0.00,   0.00,   0.00, &
00187    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00188    0.00,   0.00,   0.00 &
00189          /)
00190 !-------------------------------------------------------------------                                                    
00191 XDATA_SEA(:) = (/          &
00192    1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00193    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00194    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00195    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00196    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00197    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00198    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00199    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00200    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00201    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00202    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00203    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00204    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00205    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00206    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00207    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00208    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00209    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00210    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00211    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00212    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00213    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00214    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00215    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00216    0.00,   0.50,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00217    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00218    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00219    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00220    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00221    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00222    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00223    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00224    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00225    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00226    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00227    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00228    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00229    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00230    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00231    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00232    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00233    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00234    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00235    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00236    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00237    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00238    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00239    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00240    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00241    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00242    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00243    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00244    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00245    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00246    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00247    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00248    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00249    0.00,   0.00,   0.00 &
00250          /)
00251 !-------------------------------------------------------------------                                                    
00252 WHERE(XDATA_TOWN>0.) XDATA_Z0_TOWN(:) = 1.000
00253 XDATA_Z0_TOWN(151) = 3.000
00254 XDATA_Z0_TOWN(155) = 2.000
00255 XDATA_Z0_TOWN(156) = 0.500
00256 XDATA_Z0_TOWN(157) = 2.000
00257 XDATA_Z0_TOWN(158) = 0.010
00258 XDATA_Z0_TOWN(159) = 0.100
00259 XDATA_Z0_TOWN(160) = 0.500
00260 XDATA_Z0_TOWN(254) = 2.000
00261 XDATA_Z0_TOWN(255) = 2.000
00262 !-------------------------------------------------------------------                                                    
00263 WHERE(XDATA_TOWN>0.) XDATA_BLD_HEIGHT(:) =   10.
00264 XDATA_BLD_HEIGHT(151) =   30.
00265 XDATA_BLD_HEIGHT(155) =   20.
00266 XDATA_BLD_HEIGHT(156) =    5.
00267 XDATA_BLD_HEIGHT(157) =   20.
00268 XDATA_BLD_HEIGHT(159) =    5.
00269 XDATA_BLD_HEIGHT(160) =    5.
00270 XDATA_BLD_HEIGHT(254) =   20.
00271 XDATA_BLD_HEIGHT(255) =   20.
00272 !-------------------------------------------------------------------                                                    
00273 WHERE(XDATA_TOWN>0.) XDATA_WALL_O_HOR(:) =0.50
00274 XDATA_WALL_O_HOR(  7) =0.30
00275 XDATA_WALL_O_HOR(151) =0.90
00276 XDATA_WALL_O_HOR(152) =0.30
00277 XDATA_WALL_O_HOR(153) =0.30
00278 XDATA_WALL_O_HOR(154) =0.30
00279 XDATA_WALL_O_HOR(155) =0.45
00280 XDATA_WALL_O_HOR(156) =0.09
00281 XDATA_WALL_O_HOR(157) =0.90
00282 XDATA_WALL_O_HOR(158) =0.10
00283 XDATA_WALL_O_HOR(159) =0.10
00284 XDATA_WALL_O_HOR(160) =0.10
00285 XDATA_WALL_O_HOR(161) =1.00
00286 XDATA_WALL_O_HOR(254) =1.50
00287 XDATA_WALL_O_HOR(255) =1.50
00288 XDATA_WALL_O_HOR(561) =0.28
00289 XDATA_WALL_O_HOR(562) =0.27
00290 XDATA_WALL_O_HOR(563) =0.25
00291 XDATA_WALL_O_HOR(564) =0.16
00292 XDATA_WALL_O_HOR(565) =0.31
00293 XDATA_WALL_O_HOR(566) =0.28
00294 XDATA_WALL_O_HOR(567) =0.31
00295 XDATA_WALL_O_HOR(568) =0.25
00296 XDATA_WALL_O_HOR(569) =0.24
00297 XDATA_WALL_O_HOR(570) =0.25
00298 XDATA_WALL_O_HOR(571) =0.28
00299 !-------------------------------------------------------------------                                                    
00300 WHERE(XDATA_TOWN>0.) XDATA_BLD(:) =0.50
00301 XDATA_BLD(  7) =0.30
00302 XDATA_BLD(151) =0.45
00303 XDATA_BLD(152) =0.30
00304 XDATA_BLD(153) =0.30
00305 XDATA_BLD(154) =0.30
00306 XDATA_BLD(155) =0.45
00307 XDATA_BLD(156) =0.09
00308 XDATA_BLD(157) =0.45
00309 XDATA_BLD(158) =0.10
00310 XDATA_BLD(159) =0.10
00311 XDATA_BLD(160) =0.10
00312 XDATA_BLD(254) =0.60
00313 XDATA_BLD(255) =0.60
00314 XDATA_BLD(561) =0.28
00315 XDATA_BLD(562) =0.27
00316 XDATA_BLD(563) =0.25
00317 XDATA_BLD(564) =0.16
00318 XDATA_BLD(565) =0.31
00319 XDATA_BLD(566) =0.28
00320 XDATA_BLD(567) =0.31
00321 XDATA_BLD(568) =0.25
00322 XDATA_BLD(569) =0.24
00323 XDATA_BLD(570) =0.25
00324 XDATA_BLD(571) =0.28
00325 !-------------------------------------------------------------------                                                    
00326 WHERE(XDATA_TOWN>0.) XDATA_GARDEN(:) =0.00
00327 XDATA_GARDEN(  7) =0.40
00328 XDATA_GARDEN(151) =0.10
00329 XDATA_GARDEN(152) =0.40
00330 XDATA_GARDEN(153) =0.40
00331 XDATA_GARDEN(154) =0.40
00332 XDATA_GARDEN(155) =0.10
00333 XDATA_GARDEN(156) =0.10
00334 XDATA_GARDEN(157) =0.10
00335 XDATA_GARDEN(561) =0.44
00336 XDATA_GARDEN(562) =0.45
00337 XDATA_GARDEN(563) =0.51
00338 XDATA_GARDEN(564) =0.48
00339 XDATA_GARDEN(565) =0.37
00340 XDATA_GARDEN(566) =0.44
00341 XDATA_GARDEN(567) =0.38
00342 XDATA_GARDEN(568) =0.49
00343 XDATA_GARDEN(569) =0.52
00344 XDATA_GARDEN(570) =0.51
00345 XDATA_GARDEN(571) =0.44
00346 !-------------------------------------------------------------------                                                    
00347 WHERE(XDATA_TOWN>0.) XDATA_ALB_ROOF(:) =0.15
00348 !-------------------------------------------------------------------                                                    
00349 WHERE(XDATA_TOWN>0.) XDATA_ALB_ROAD(:) =0.08
00350 !-------------------------------------------------------------------                                                    
00351 WHERE(XDATA_TOWN>0.) XDATA_ALB_WALL(:) =0.25
00352 !-------------------------------------------------------------------                                                    
00353 WHERE(XDATA_TOWN>0.) XDATA_EMIS_ROOF(:) =0.90
00354 !-------------------------------------------------------------------                                                    
00355 WHERE(XDATA_TOWN>0.) XDATA_EMIS_ROAD(:) =0.94
00356 !-------------------------------------------------------------------                                                    
00357 WHERE(XDATA_TOWN>0.) XDATA_EMIS_WALL(:) =0.85
00358 !-------------------------------------------------------------------                                                    
00359 WHERE(XDATA_TOWN>0.) XDATA_HC_ROOF(:,  1) =2.11 * 1.E6
00360 !-------------------------------------------------------------------                                                    
00361 WHERE(XDATA_TOWN>0.) XDATA_HC_ROOF(:,  2) =0.28 * 1.E6
00362 !-------------------------------------------------------------------                                                    
00363 WHERE(XDATA_TOWN>0.) XDATA_HC_ROOF(:,  3) =0.29 * 1.E6
00364 !-------------------------------------------------------------------                                                    
00365 WHERE(XDATA_TOWN>0.) XDATA_TC_ROOF(:,  1) =1.5100
00366 !-------------------------------------------------------------------                                                    
00367 WHERE(XDATA_TOWN>0.) XDATA_TC_ROOF(:,  2) =0.0800
00368 !-------------------------------------------------------------------                                                    
00369 WHERE(XDATA_TOWN>0.) XDATA_TC_ROOF(:,  3) =0.0500
00370 !-------------------------------------------------------------------                                                    
00371 WHERE(XDATA_TOWN>0.) XDATA_D_ROOF(:,  1) =0.050
00372 !-------------------------------------------------------------------                                                    
00373 WHERE(XDATA_TOWN>0.) XDATA_D_ROOF(:,  2) =0.400
00374 !-------------------------------------------------------------------                                                    
00375 WHERE(XDATA_TOWN>0.) XDATA_D_ROOF(:,  3) =0.100
00376 !-------------------------------------------------------------------                                                    
00377 WHERE(XDATA_TOWN>0.) XDATA_HC_ROAD(:,  1) =1.94 * 1.E6
00378 !-------------------------------------------------------------------                                                    
00379 WHERE(XDATA_TOWN>0.) XDATA_HC_ROAD(:,  2) =1.28 * 1.E6
00380 !-------------------------------------------------------------------                                                    
00381 WHERE(XDATA_TOWN>0.) XDATA_HC_ROAD(:,  3) =1.28 * 1.E6
00382 !-------------------------------------------------------------------                                                    
00383 WHERE(XDATA_TOWN>0.) XDATA_TC_ROAD(:,  1) =0.7454
00384 !-------------------------------------------------------------------                                                    
00385 WHERE(XDATA_TOWN>0.) XDATA_TC_ROAD(:,  2) =0.2513
00386 !-------------------------------------------------------------------                                                    
00387 WHERE(XDATA_TOWN>0.) XDATA_TC_ROAD(:,  3) =0.2513
00388 !-------------------------------------------------------------------                                                    
00389 WHERE(XDATA_TOWN>0.) XDATA_D_ROAD(:,  1) =0.050
00390 !-------------------------------------------------------------------                                                    
00391 WHERE(XDATA_TOWN>0.) XDATA_D_ROAD(:,  2) =0.100
00392 !-------------------------------------------------------------------                                                    
00393 WHERE(XDATA_TOWN>0.) XDATA_D_ROAD(:,  3) =1.000
00394 !-------------------------------------------------------------------                                                    
00395 WHERE(XDATA_TOWN>0.) XDATA_HC_WALL(:,  1) =1.55 * 1.E6
00396 !-------------------------------------------------------------------                                                    
00397 WHERE(XDATA_TOWN>0.) XDATA_HC_WALL(:,  2) =1.55 * 1.E6
00398 !-------------------------------------------------------------------                                                    
00399 WHERE(XDATA_TOWN>0.) XDATA_HC_WALL(:,  3) =0.29 * 1.E6
00400 !-------------------------------------------------------------------                                                    
00401 WHERE(XDATA_TOWN>0.) XDATA_TC_WALL(:,  1) =0.9338
00402 !-------------------------------------------------------------------                                                    
00403 WHERE(XDATA_TOWN>0.) XDATA_TC_WALL(:,  2) =0.9338
00404 !-------------------------------------------------------------------                                                    
00405 WHERE(XDATA_TOWN>0.) XDATA_TC_WALL(:,  3) =0.0500
00406 !-------------------------------------------------------------------                                                    
00407 WHERE(XDATA_TOWN>0.) XDATA_D_WALL(:,  1) =0.020
00408 !-------------------------------------------------------------------                                                    
00409 WHERE(XDATA_TOWN>0.) XDATA_D_WALL(:,  2) =0.125
00410 !-------------------------------------------------------------------                                                    
00411 WHERE(XDATA_TOWN>0.) XDATA_D_WALL(:,  3) =0.050
00412 !-------------------------------------------------------------------                                                    
00413 WHERE(XDATA_TOWN>0.) XDATA_H_TRAFFIC(:) =   10.
00414 XDATA_H_TRAFFIC(151) =   20.
00415 XDATA_H_TRAFFIC(156) =   30.
00416 XDATA_H_TRAFFIC(159) =    0.
00417 XDATA_H_TRAFFIC(160) =    0.
00418 XDATA_H_TRAFFIC(161) =    0.
00419 XDATA_H_TRAFFIC(254) =    0.
00420 XDATA_H_TRAFFIC(255) =    0.
00421 !-------------------------------------------------------------------                                                    
00422 WHERE(XDATA_TOWN>0.) XDATA_LE_TRAFFIC(:) =    0.
00423 !-------------------------------------------------------------------                                                    
00424 WHERE(XDATA_TOWN>0.) XDATA_H_INDUSTRY(:) =    5.
00425 XDATA_H_INDUSTRY(151) =   10.
00426 XDATA_H_INDUSTRY(155) =   20.
00427 XDATA_H_INDUSTRY(156) =    0.
00428 XDATA_H_INDUSTRY(157) =   20.
00429 XDATA_H_INDUSTRY(158) =    0.
00430 XDATA_H_INDUSTRY(159) =    0.
00431 XDATA_H_INDUSTRY(160) =    0.
00432 XDATA_H_INDUSTRY(161) =    0.
00433 XDATA_H_INDUSTRY(254) =    0.
00434 XDATA_H_INDUSTRY(255) =    0.
00435 !-------------------------------------------------------------------                                                    
00436 WHERE(XDATA_TOWN>0.) XDATA_LE_INDUSTRY(:) =    0.
00437 !-------------------------------------------------------------------                                                    
00438 XDATA_VEGTYPE(:,  1) = (/          &
00439    0.00,   0.00,   0.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.90,   0.00, &
00440    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00441    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00442    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.10, &
00443    0.00,   0.00,   0.00,   0.10,   0.00,   0.00,   0.00,   0.30,   0.20,   0.00, &
00444    0.20,   0.00,   0.20,   0.00,   0.00,   0.20,   0.00,   0.30,   0.00,   0.00, &
00445    0.00,   0.00,   0.00,   0.10,   0.00,   0.10,   0.30,   0.20,   0.20,   0.30, &
00446    0.30,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.60, &
00447    0.50,   0.70,   0.20,   0.30,   0.40,   0.30,   0.70,   0.00,   0.00,   0.00, &
00448    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00449    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00450    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00451    0.00,   0.00,   0.90,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00452    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00453    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00454    0.00,   0.00,   0.00,   0.00,   1.00,   0.00,   1.00,   0.00,   1.00,   0.00, &
00455    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00456    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.50,   0.50,   0.50,   0.00, &
00457    0.50,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00458    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00459    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00460    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.20, &
00461    0.00,   0.00,   0.50,   0.00,   0.30,   0.10,   0.10,   0.00,   0.00,   0.40, &
00462    0.50,   0.50,   0.20,   0.10,   0.00,   0.80,   1.00,   0.00,   0.00,   0.00, &
00463    0.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00464    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00465    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00466    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00467    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00468    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00469    0.06,   0.01,   0.00,   0.03,   0.03,   0.00,   0.00,   0.00,   0.00,   0.05, &
00470    0.03,   0.05,   0.00,   0.01,   0.02,   0.01,   0.02,   0.01,   0.01,   0.00, &
00471    0.00,   0.02,   0.08,   0.04,   0.07,   0.04,   0.30,   0.02,   0.05,   0.09, &
00472    0.06,   0.03,   0.04,   0.04,   0.11,   0.19,   0.12,   0.25,   0.20,   0.11, &
00473    0.05,   0.15,   0.13,   0.20,   0.10,   0.10,   0.10,   0.05,   0.04,   0.40, &
00474    0.08,   0.09,   0.08,   0.00,   0.10,   0.50,   0.55,   0.60,   0.70,   0.05, &
00475    0.06,   0.04,   0.09,   0.07,   0.14,   0.16,   0.30,   0.45,   0.55,   0.57, &
00476    0.70,   0.70,   0.65,   0.75,   0.85,   0.30,   0.39,   0.43,   0.30,   0.28, &
00477    0.15,   0.33,   0.54,   0.25,   0.35,   0.48,   0.44,   0.40,   0.35,   0.15, &
00478    0.15,   0.03,   0.04,   0.30,   0.20,   0.07,   0.15,   0.17,   0.35,   0.30, &
00479    0.30,   0.25,   0.15,   0.20,   0.15,   0.10,   0.30,   0.40,   0.60,   0.65, &
00480    0.60,   0.18,   0.45,   0.55,   0.63,   0.23,   0.45,   0.32,   0.50,   0.30, &
00481    0.22,   0.45,   0.57,   0.55,   0.30,   0.50,   0.55,   0.50,   0.27,   0.10, &
00482    0.22,   0.77,   0.63,   0.74,   0.52,   0.65,   0.88,   0.72,   0.80,   0.90, &
00483    0.89,   0.07,   0.07,   0.09,   0.18,   0.15,   0.15,   0.12,   0.15,   0.15, &
00484    0.20,   0.12,   0.15,   0.14,   0.08,   0.06,   0.12,   0.29,   0.15,   0.09, &
00485    0.09,   0.09,   0.09,   0.13,   0.06,   0.06,   0.13,   0.14,   0.09,   0.02, &
00486    0.25,   0.15,   0.35,   0.12,   0.17,   0.11,   0.43,   0.18,   0.13,   0.10, &
00487    0.08,   0.06,   0.22,   0.07,   0.06,   0.07,   0.04,   0.01,   0.06,   0.20, &
00488    0.03,   0.05,   0.06,   0.09,   0.42,   0.42,   0.27,   0.14,   0.08,   0.22, &
00489    0.07,   0.16,   0.25,   0.48,   0.45,   0.07,   0.21,   0.16,   0.37,   0.12, &
00490    0.10,   0.27,   0.25,   0.12,   0.33,   0.14,   0.14,   0.42,   0.15,   0.34, &
00491    0.06,   0.32,   0.03,   0.08,   0.09,   0.17,   0.32,   0.51,   0.15,   0.08, &
00492    0.72,   0.16,   0.00,   0.00,   1.00,   1.00,   1.00,   1.00,   1.00,   0.80, &
00493    0.76,   0.89,   0.90,   0.97,   0.81,   0.60,   0.85,   0.00,   0.00,   0.01, &
00494    1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00495    0.02,   0.02,   0.02,   0.05,   0.14,   0.01,   0.13,   0.16,   0.00,   0.02, &
00496    0.04,   0.47,   0.46 &
00497          /)
00498 !-------------------------------------------------------------------                                                    
00499 XDATA_VEGTYPE(:,  2) = (/          &
00500    0.00,   0.00,   0.00,   0.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00501    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00502    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00503    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00504    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00505    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00506    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00507    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00508    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00509    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00510    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00511    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00512    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00513    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00514    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00515    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00516    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00517    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00518    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00519    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00520    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00521    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00522    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00523    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00524    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00525    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00526    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00527    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00528    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00529    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00530    0.06,   0.01,   0.00,   0.04,   0.04,   0.00,   0.01,   0.00,   0.01,   0.05, &
00531    0.03,   0.05,   0.00,   0.02,   0.03,   0.01,   0.02,   0.02,   0.02,   0.04, &
00532    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00533    0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00, &
00534    0.00,   0.00,   0.00,   0.40,   0.30,   0.20,   0.15,   0.10,   0.08,   0.05, &
00535    0.00,   0.00,   0.00,   0.00,   0.00,   0.05,   0.05,   0.05,   0.10,   0.00, &
00536    0.00,   0.00,   0.00,   0.00,   0.01,   0.02,   0.05,   0.05,   0.05,   0.13, &
00537    0.05,   0.05,   0.05,   0.05,   0.05,   0.00,   0.01,   0.02,   0.00,   0.02, &
00538    0.01,   0.00,   0.01,   0.00,   0.00,   0.02,   0.06,   0.00,   0.00,   0.00, &
00539    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00540    0.00,   0.00,   0.00,   0.00,   0.00,   0.02,   0.05,   0.05,   0.05,   0.05, &
00541    0.05,   0.02,   0.05,   0.05,   0.07,   0.02,   0.05,   0.23,   0.05,   0.05, &
00542    0.03,   0.05,   0.05,   0.05,   0.05,   0.05,   0.05,   0.05,   0.03,   0.02, &
00543    0.03,   0.08,   0.27,   0.16,   0.23,   0.10,   0.07,   0.21,   0.12,   0.00, &
00544    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00545    0.00,   0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00, &
00546    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00, &
00547    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00548    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00549    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.03, &
00550    0.00,   0.01,   0.03,   0.06,   0.05,   0.01,   0.02,   0.01,   0.03,   0.01, &
00551    0.01,   0.02,   0.02,   0.01,   0.02,   0.01,   0.01,   0.02,   0.01,   0.03, &
00552    0.01,   0.03,   0.00,   0.00,   0.00,   0.00,   0.00,   0.03,   0.01,   0.00, &
00553    0.00,   0.07,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.19, &
00554    0.19,   0.09,   0.00,   0.02,   0.12,   0.25,   0.00,   0.00,   0.00,   0.00, &
00555    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00556    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00557    0.02,   0.00,   0.00 &
00558          /)
00559 !-------------------------------------------------------------------                                                    
00560 XDATA_VEGTYPE(:,  3) = (/          &
00561    0.00,   0.00,   0.00,   0.00,   0.00,   1.00,   0.00,   0.00,   0.00,   0.00, &
00562    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00563    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00564    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00565    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00566    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00567    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00568    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00569    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00570    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00571    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00572    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00573    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00574    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00575    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00576    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00577    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00578    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00579    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00580    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00581    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00582    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00583    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00584    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00585    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00586    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00587    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00588    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00589    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00590    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00591    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00592    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00593    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00594    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00595    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00596    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00597    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00598    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00599    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00600    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00601    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00602    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00603    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00604    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00605    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00606    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00607    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00608    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00609    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00610    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00611    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00612    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00613    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00614    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00615    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.10,   1.00,   0.00,   0.00, &
00616    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00617    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00618    0.00,   0.00,   0.00 &
00619          /)
00620 !-------------------------------------------------------------------                                                    
00621 XDATA_VEGTYPE(:,  4) = (/          &
00622    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.50,   0.50,   0.00,   0.00, &
00623    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00624    0.00,   0.00,   0.00,   0.00,   1.00,   1.00,   1.00,   1.00,   0.50,   0.50, &
00625    0.50,   0.50,   0.50,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.40, &
00626    0.00,   0.00,   0.00,   0.40,   0.00,   0.00,   0.00,   0.20,   0.20,   0.00, &
00627    0.20,   0.30,   0.20,   0.30,   0.00,   0.20,   0.00,   0.20,   0.00,   0.00, &
00628    0.00,   0.00,   0.00,   0.00,   0.00,   0.30,   0.20,   0.20,   0.20,   0.20, &
00629    0.20,   0.20,   0.20,   0.00,   0.00,   0.20,   0.00,   0.00,   0.20,   0.00, &
00630    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00631    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00632    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00633    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00634    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00635    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00636    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00637    0.50,   0.50,   0.50,   0.50,   0.00,   0.00,   0.00,   0.00,   0.00,   0.50, &
00638    0.20,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00639    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.50,   0.50,   0.50,   0.50, &
00640    0.50,   0.00,   0.00,   0.00,   0.00,   0.00,   0.10,   0.10,   0.10,   0.10, &
00641    0.10,   0.40,   0.40,   0.40,   0.40,   0.00,   0.00,   0.30,   1.00,   1.00, &
00642    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   0.00,   0.00,   0.00, &
00643    0.00,   0.00,   0.00,   0.00,   0.50,   0.50,   0.50,   0.50,   0.50,   0.00, &
00644    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.20, &
00645    0.50,   0.00,   0.60,   0.60,   0.60,   0.00,   0.00,   0.50,   0.00,   0.00, &
00646    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00647    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00648    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00649    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00650    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00651    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00652    0.09,   0.85,   0.85,   0.05,   0.08,   0.85,   0.14,   0.82,   0.17,   0.10, &
00653    0.15,   0.06,   0.81,   0.40,   0.05,   0.12,   0.10,   0.07,   0.14,   0.25, &
00654    0.51,   0.49,   0.11,   0.13,   0.07,   0.54,   0.00,   0.06,   0.31,   0.07, &
00655    0.06,   0.56,   0.28,   0.27,   0.34,   0.10,   0.20,   0.08,   0.72,   0.14, &
00656    0.21,   0.15,   0.39,   0.02,   0.05,   0.10,   0.07,   0.10,   0.02,   0.09, &
00657    0.05,   0.01,   0.04,   0.04,   0.00,   0.10,   0.05,   0.10,   0.04,   0.08, &
00658    0.22,   0.04,   0.05,   0.01,   0.08,   0.05,   0.13,   0.10,   0.07,   0.05, &
00659    0.03,   0.04,   0.05,   0.02,   0.01,   0.14,   0.07,   0.16,   0.18,   0.17, &
00660    0.08,   0.15,   0.08,   0.18,   0.16,   0.10,   0.10,   0.14,   0.14,   0.20, &
00661    0.10,   0.16,   0.03,   0.01,   0.17,   0.02,   0.35,   0.11,   0.06,   0.07, &
00662    0.10,   0.07,   0.07,   0.05,   0.04,   0.15,   0.18,   0.12,   0.07,   0.00, &
00663    0.02,   0.04,   0.09,   0.07,   0.03,   0.09,   0.08,   0.04,   0.00,   0.10, &
00664    0.11,   0.09,   0.06,   0.07,   0.15,   0.06,   0.04,   0.07,   0.11,   0.13, &
00665    0.10,   0.01,   0.00,   0.00,   0.03,   0.03,   0.00,   0.00,   0.00,   0.00, &
00666    0.00,   0.00,   0.02,   0.06,   0.08,   0.03,   0.01,   0.05,   0.04,   0.03, &
00667    0.13,   0.16,   0.44,   0.33,   0.17,   0.23,   0.14,   0.28,   0.08,   0.15, &
00668    0.11,   0.13,   0.10,   0.06,   0.10,   0.13,   0.19,   0.00,   0.07,   0.02, &
00669    0.01,   0.00,   0.00,   0.09,   0.02,   0.03,   0.03,   0.25,   0.00,   0.04, &
00670    0.03,   0.01,   0.00,   0.10,   0.09,   0.14,   0.04,   0.02,   0.12,   0.08, &
00671    0.13,   0.35,   0.04,   0.12,   0.00,   0.07,   0.01,   0.01,   0.03,   0.03, &
00672    0.05,   0.03,   0.03,   0.03,   0.02,   0.02,   0.02,   0.03,   0.04,   0.12, &
00673    0.17,   0.22,   0.07,   0.19,   0.20,   0.06,   0.20,   0.19,   0.24,   0.17, &
00674    0.06,   0.12,   0.00,   0.00,   0.03,   0.12,   0.10,   0.10,   0.01,   0.00, &
00675    0.00,   0.02,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00676    0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00677    0.00,   0.00,   0.00,   0.00,   0.00,   0.22,   0.02,   0.02,   0.04,   0.20, &
00678    0.18,   0.21,   0.26,   0.15,   0.04,   0.17,   0.04,   0.19,   0.07,   0.07, &
00679    0.17,   0.47,   0.48 &
00680          /)
00681 !-------------------------------------------------------------------                                                    
00682 XDATA_VEGTYPE(:,  5) = (/          &
00683    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   1.00, &
00684    1.00,   1.00,   1.00,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00685    0.00,   0.00,   0.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.50,   0.50, &
00686    0.50,   0.50,   0.50,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00687    0.50,   0.50,   0.50,   0.00,   0.50,   0.50,   0.50,   0.00,   0.00,   0.00, &
00688    0.00,   0.00,   0.00,   0.00,   0.30,   0.00,   0.00,   0.00,   0.30,   0.30, &
00689    0.00,   0.00,   0.30,   0.30,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00690    0.00,   0.00,   0.00,   0.20,   0.20,   0.00,   0.20,   0.20,   0.00,   0.00, &
00691    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00692    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00693    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00694    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00695    0.00,   0.00,   0.00,   0.00,   0.20,   0.00,   0.00,   0.00,   0.00,   0.00, &
00696    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00697    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00698    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00699    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00700    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00701    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00702    0.00,   0.00,   0.00,   0.00,   0.00,   0.40,   0.40,   0.00,   0.00,   0.00, &
00703    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   1.00,   1.00,   1.00, &
00704    1.00,   1.00,   1.00,   1.00,   0.50,   0.50,   0.50,   0.50,   0.50,   0.00, &
00705    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00706    0.00,   0.50,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.20,   0.00, &
00707    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00708    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00709    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00710    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00711    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00712    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00713    0.27,   0.07,   0.14,   0.88,   0.84,   0.15,   0.85,   0.18,   0.82,   0.73, &
00714    0.73,   0.71,   0.18,   0.48,   0.86,   0.86,   0.80,   0.87,   0.78,   0.13, &
00715    0.07,   0.13,   0.24,   0.55,   0.48,   0.12,   0.68,   0.89,   0.30,   0.66, &
00716    0.83,   0.16,   0.12,   0.31,   0.31,   0.23,   0.32,   0.56,   0.05,   0.11, &
00717    0.02,   0.08,   0.08,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00, &
00718    0.06,   0.04,   0.05,   0.07,   0.02,   0.01,   0.01,   0.00,   0.00,   0.09, &
00719    0.10,   0.03,   0.03,   0.02,   0.07,   0.02,   0.00,   0.00,   0.00,   0.00, &
00720    0.00,   0.00,   0.00,   0.00,   0.00,   0.03,   0.10,   0.10,   0.00,   0.01, &
00721    0.05,   0.05,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00722    0.01,   0.00,   0.04,   0.08,   0.00,   0.17,   0.00,   0.04,   0.00,   0.06, &
00723    0.07,   0.04,   0.20,   0.35,   0.03,   0.00,   0.00,   0.00,   0.00,   0.00, &
00724    0.00,   0.03,   0.03,   0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00, &
00725    0.05,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.05,   0.18,   0.06, &
00726    0.12,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00727    0.00,   0.00,   0.00,   0.00,   0.05,   0.00,   0.01,   0.06,   0.00,   0.04, &
00728    0.00,   0.04,   0.11,   0.12,   0.15,   0.07,   0.02,   0.25,   0.01,   0.04, &
00729    0.05,   0.13,   0.04,   0.06,   0.05,   0.05,   0.00,   0.00,   0.00,   0.08, &
00730    0.00,   0.00,   0.00,   0.03,   0.00,   0.00,   0.02,   0.10,   0.01,   0.00, &
00731    0.02,   0.01,   0.00,   0.07,   0.09,   0.00,   0.01,   0.02,   0.04,   0.00, &
00732    0.08,   0.00,   0.00,   0.02,   0.00,   0.05,   0.01,   0.01,   0.02,   0.00, &
00733    0.00,   0.00,   0.00,   0.00,   0.00,   0.02,   0.00,   0.03,   0.04,   0.02, &
00734    0.05,   0.07,   0.02,   0.12,   0.22,   0.00,   0.08,   0.13,   0.07,   0.04, &
00735    0.00,   0.02,   0.00,   0.00,   0.00,   0.00,   0.04,   0.00,   0.00,   0.01, &
00736    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00737    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00738    0.00,   0.00,   0.00,   0.00,   0.00,   0.55,   0.40,   0.02,   0.04,   0.55, &
00739    0.10,   0.10,   0.34,   0.07,   0.03,   0.48,   0.02,   0.07,   0.01,   0.01, &
00740    0.05,   0.00,   0.01 &
00741          /)
00742 !-------------------------------------------------------------------                                                    
00743 XDATA_VEGTYPE(:,  6) = (/          &
00744    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00745    0.00,   0.00,   0.00,   0.00,   0.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
00746    1.00,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00747    0.00,   0.00,   0.00,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.00, &
00748    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.30, &
00749    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.30,   0.00,   0.00,   0.00, &
00750    0.30,   0.30,   0.00,   0.00,   0.30,   0.00,   0.00,   0.00,   0.00,   0.00, &
00751    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00752    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00753    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00754    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00755    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00756    0.00,   0.00,   0.00,   0.50,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00757    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00758    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00759    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00760    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00761    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00762    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00763    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00764    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00765    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00766    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00767    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00768    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00769    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00770    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00771    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00772    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00773    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00774    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00775    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00776    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00777    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00778    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00779    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00780    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00781    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00782    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00783    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00784    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00785    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00786    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00787    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00788    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00789    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00790    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00791    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00792    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00793    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00794    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00795    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00796    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00797    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00798    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00799    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00800    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00801    0.00,   0.00,   0.00 &
00802          /)
00803 !-------------------------------------------------------------------                                                    
00804 XDATA_VEGTYPE(:,  7) = (/          &
00805    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00806    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00807    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00808    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.20,   0.00,   0.00, &
00809    0.00,   0.50,   0.50,   0.00,   0.00,   0.00,   0.40,   0.00,   0.00,   0.00, &
00810    0.00,   0.00,   0.00,   0.00,   0.70,   0.00,   0.00,   0.00,   0.00,   0.50, &
00811    0.50,   0.00,   0.40,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00812    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00813    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00814    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00815    0.00,   0.00,   0.00,   0.00,   0.50,   0.90,   0.50,   0.90,   1.00,   0.00, &
00816    0.50,   0.00,   1.00,   0.90,   0.70,   0.90,   0.80,   0.30,   0.80,   1.00, &
00817    1.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00818    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00819    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00820    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00821    0.00,   0.90,   0.90,   0.90,   0.90,   1.00,   1.00,   0.90,   0.90,   0.90, &
00822    1.00,   0.80,   0.90,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00823    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.90,   0.90,   0.90,   0.90, &
00824    0.90,   0.60,   0.60,   0.60,   0.60,   0.60,   0.60,   0.40,   0.00,   0.00, &
00825    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00826    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00827    0.00,   0.00,   0.00,   0.00,   0.00,   0.50,   0.00,   0.00,   0.00,   0.00, &
00828    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00829    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00830    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00831    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00832    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00833    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00834    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00835    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01, &
00836    0.03,   0.01,   0.00,   0.01,   0.02,   0.00,   0.03,   0.02,   0.03,   0.03, &
00837    0.00,   0.05,   0.08,   0.01,   0.04,   0.02,   0.00,   0.00,   0.01,   0.01, &
00838    0.01,   0.00,   0.01,   0.00,   0.00,   0.01,   0.01,   0.00,   0.01,   0.03, &
00839    0.01,   0.02,   0.02,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.10, &
00840    0.03,   0.00,   0.05,   0.04,   0.00,   0.01,   0.09,   0.01,   0.03,   0.02, &
00841    0.29,   0.10,   0.30,   0.05,   0.06,   0.01,   0.02,   0.00,   0.00,   0.00, &
00842    0.00,   0.03,   0.00,   0.01,   0.00,   0.09,   0.04,   0.04,   0.04,   0.02, &
00843    0.12,   0.04,   0.15,   0.05,   0.00,   0.00,   0.00,   0.00,   0.04,   0.09, &
00844    0.08,   0.05,   0.14,   0.26,   0.04,   0.09,   0.15,   0.19,   0.34,   0.19, &
00845    0.14,   0.14,   0.09,   0.06,   0.09,   0.30,   0.00,   0.00,   0.00,   0.00, &
00846    0.24,   0.35,   0.12,   0.09,   0.06,   0.04,   0.05,   0.01,   0.00,   0.04, &
00847    0.05,   0.01,   0.00,   0.01,   0.04,   0.12,   0.03,   0.09,   0.06,   0.12, &
00848    0.04,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00849    0.00,   0.35,   0.05,   0.05,   0.02,   0.66,   0.67,   0.55,   0.57,   0.52, &
00850    0.39,   0.39,   0.20,   0.18,   0.10,   0.33,   0.27,   0.09,   0.42,   0.45, &
00851    0.65,   0.34,   0.53,   0.55,   0.58,   0.45,   0.17,   0.62,   0.55,   0.78, &
00852    0.58,   0.69,   0.57,   0.63,   0.62,   0.71,   0.37,   0.32,   0.64,   0.56, &
00853    0.80,   0.79,   0.72,   0.62,   0.61,   0.67,   0.80,   0.84,   0.54,   0.43, &
00854    0.72,   0.55,   0.76,   0.63,   0.52,   0.24,   0.61,   0.74,   0.49,   0.42, &
00855    0.49,   0.61,   0.44,   0.35,   0.36,   0.75,   0.66,   0.63,   0.34,   0.58, &
00856    0.46,   0.13,   0.53,   0.34,   0.14,   0.53,   0.24,   0.08,   0.32,   0.18, &
00857    0.32,   0.39,   0.00,   0.00,   0.00,   0.00,   0.07,   0.00,   0.15,   0.03, &
00858    0.00,   0.02,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00859    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00860    0.00,   0.00,   0.00,   0.00,   0.00,   0.05,   0.00,   0.00,   0.00,   0.10, &
00861    0.20,   0.39,   0.19,   0.35,   0.14,   0.20,   0.15,   0.29,   0.69,   0.53, &
00862    0.19,   0.01,   0.01 &
00863          /)
00864 !-------------------------------------------------------------------                                                    
00865 XDATA_VEGTYPE(:,  8) = (/          &
00866    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00867    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00868    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00869    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.30,   0.00,   0.00, &
00870    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.10,   0.00,   0.00,   0.00, &
00871    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.70,   0.00,   0.00,   0.20, &
00872    0.20,   0.00,   0.30,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00873    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00874    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00875    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00876    0.00,   0.00,   0.00,   0.00,   0.50,   0.10,   0.50,   0.10,   0.00,   1.00, &
00877    0.50,   1.00,   0.00,   0.10,   0.30,   0.10,   0.20,   0.70,   0.20,   0.00, &
00878    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00879    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00880    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00881    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00882    0.00,   0.10,   0.10,   0.10,   0.10,   0.00,   0.00,   0.10,   0.10,   0.10, &
00883    0.00,   0.20,   0.10,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00884    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00885    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00886    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00887    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00888    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00889    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00890    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00891    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00892    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00893    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00894    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00895    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00896    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00897    0.00,   0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.02, &
00898    0.02,   0.01,   0.01,   0.01,   0.00,   0.01,   0.00,   0.02,   0.01,   0.01, &
00899    0.01,   0.00,   0.00,   0.00,   0.00,   0.01,   0.01,   0.00,   0.01,   0.00, &
00900    0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00901    0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.01,   0.00,   0.00,   0.01, &
00902    0.01,   0.00,   0.05,   0.00,   0.02,   0.01,   0.00,   0.00,   0.00,   0.00, &
00903    0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.01,   0.01,   0.00,   0.01, &
00904    0.03,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.01, &
00905    0.02,   0.01,   0.01,   0.01,   0.00,   0.01,   0.00,   0.01,   0.01,   0.01, &
00906    0.01,   0.01,   0.01,   0.01,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00, &
00907    0.01,   0.01,   0.01,   0.01,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00, &
00908    0.00,   0.00,   0.00,   0.00,   0.01,   0.01,   0.00,   0.01,   0.01,   0.01, &
00909    0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00910    0.00,   0.45,   0.68,   0.73,   0.18,   0.01,   0.02,   0.01,   0.04,   0.01, &
00911    0.02,   0.02,   0.02,   0.02,   0.15,   0.01,   0.02,   0.01,   0.10,   0.08, &
00912    0.05,   0.01,   0.02,   0.05,   0.02,   0.08,   0.47,   0.03,   0.05,   0.00, &
00913    0.01,   0.01,   0.00,   0.01,   0.14,   0.09,   0.01,   0.03,   0.05,   0.04, &
00914    0.01,   0.01,   0.03,   0.01,   0.00,   0.05,   0.01,   0.00,   0.02,   0.01, &
00915    0.00,   0.03,   0.01,   0.01,   0.01,   0.01,   0.01,   0.01,   0.01,   0.00, &
00916    0.01,   0.00,   0.02,   0.01,   0.00,   0.02,   0.01,   0.01,   0.01,   0.01, &
00917    0.00,   0.01,   0.01,   0.01,   0.01,   0.02,   0.00,   0.01,   0.01,   0.01, &
00918    0.02,   0.00,   0.05,   0.09,   0.04,   0.03,   0.03,   0.02,   0.01,   0.03, &
00919    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00920    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00921    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00922    0.00,   0.01,   0.01,   0.05,   0.08,   0.00,   0.02,   0.01,   0.01,   0.07, &
00923    0.01,   0.01,   0.04 &
00924          /)
00925 !-------------------------------------------------------------------                                                    
00926 XDATA_VEGTYPE(:,  9) = (/          &
00927    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00928    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00929    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00930    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00931    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00932    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00933    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00934    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00935    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00936    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00937    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00938    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00939    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00940    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00941    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00942    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00943    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00944    0.00,   0.00,   0.00,   1.00,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00, &
00945    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00946    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00947    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00948    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00949    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00950    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00951    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00952    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00953    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00954    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00955    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00956    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00957    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00958    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00959    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00960    0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.01,   0.00,   0.01,   0.00, &
00961    0.00,   0.01,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00962    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00963    0.00,   0.00,   0.00,   0.00,   0.02,   0.00,   0.00,   0.00,   0.00,   0.00, &
00964    0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.10,   0.00,   0.00,   0.00, &
00965    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00966    0.00,   0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.02, &
00967    0.02,   0.00,   0.00,   0.01,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00, &
00968    0.01,   0.00,   0.02,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00969    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00970    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00971    0.00,   0.00,   0.18,   0.06,   0.48,   0.01,   0.01,   0.03,   0.07,   0.09, &
00972    0.06,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.02,   0.00,   0.00, &
00973    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00974    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.04,   0.01,   0.00,   0.01, &
00975    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00976    0.00,   0.00,   0.00,   0.00,   0.00,   0.10,   0.04,   0.05,   0.00,   0.00, &
00977    0.00,   0.02,   0.00,   0.04,   0.00,   0.01,   0.04,   0.01,   0.01,   0.01, &
00978    0.01,   0.02,   0.02,   0.02,   0.03,   0.02,   0.02,   0.02,   0.02,   0.03, &
00979    0.00,   0.00,   0.85,   0.76,   0.77,   0.63,   0.40,   0.31,   0.63,   0.82, &
00980    0.26,   0.72,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00981    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00982    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00983    0.00,   0.00,   0.00,   0.00,   0.02,   0.00,   0.08,   0.07,   0.00,   0.00, &
00984    0.10,   0.00,   0.00 &
00985          /)
00986 !-------------------------------------------------------------------                                                    
00987 XDATA_VEGTYPE(:, 10) = (/          &
00988    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.10,   0.00, &
00989    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00990    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00991    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00992    0.50,   0.00,   0.00,   0.00,   0.50,   0.50,   0.00,   0.00,   0.00,   0.00, &
00993    0.00,   0.00,   0.00,   0.70,   0.00,   0.00,   0.00,   0.00,   0.70,   0.00, &
00994    0.00,   0.00,   0.00,   0.60,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00995    0.00,   0.00,   0.00,   0.60,   0.60,   0.00,   0.60,   0.30,   0.60,   0.40, &
00996    0.00,   0.00,   0.80,   0.70,   0.60,   0.70,   0.00,   0.00,   0.00,   0.00, &
00997    0.00,   1.00,   1.00,   0.00,   0.00,   0.00,   1.00,   1.00,   1.00,   1.00, &
00998    1.00,   1.00,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
00999    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01000    0.00,   0.00,   0.10,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01001    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01002    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01003    0.00,   0.00,   0.00,   0.00,   0.00,   1.00,   0.00,   1.00,   0.00,   0.00, &
01004    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01005    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.50, &
01006    0.00,   1.00,   1.00,   1.00,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00, &
01007    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.30,   0.00,   0.00, &
01008    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01009    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.80, &
01010    1.00,   1.00,   0.50,   1.00,   0.70,   0.40,   0.90,   1.00,   1.00,   0.40, &
01011    0.00,   0.00,   0.20,   0.30,   0.40,   0.20,   0.00,   0.00,   0.00,   0.00, &
01012    1.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01013    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01014    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01015    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01016    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01017    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01018    0.44,   0.03,   0.01,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00, &
01019    0.00,   0.05,   0.00,   0.05,   0.00,   0.00,   0.02,   0.00,   0.01,   0.53, &
01020    0.40,   0.30,   0.48,   0.26,   0.33,   0.27,   0.01,   0.01,   0.32,   0.10, &
01021    0.03,   0.25,   0.55,   0.38,   0.23,   0.44,   0.33,   0.11,   0.00,   0.61, &
01022    0.71,   0.59,   0.36,   0.38,   0.55,   0.60,   0.68,   0.73,   0.86,   0.35, &
01023    0.76,   0.77,   0.75,   0.82,   0.57,   0.31,   0.22,   0.24,   0.12,   0.75, &
01024    0.32,   0.75,   0.48,   0.84,   0.59,   0.73,   0.50,   0.40,   0.33,   0.25, &
01025    0.22,   0.18,   0.25,   0.17,   0.09,   0.41,   0.28,   0.24,   0.48,   0.49, &
01026    0.55,   0.42,   0.21,   0.52,   0.49,   0.39,   0.40,   0.45,   0.46,   0.55, &
01027    0.64,   0.75,   0.74,   0.33,   0.59,   0.64,   0.35,   0.48,   0.24,   0.35, &
01028    0.36,   0.49,   0.48,   0.32,   0.67,   0.43,   0.47,   0.43,   0.28,   0.30, &
01029    0.07,   0.37,   0.22,   0.23,   0.21,   0.60,   0.37,   0.40,   0.44,   0.51, &
01030    0.54,   0.40,   0.32,   0.32,   0.45,   0.25,   0.33,   0.23,   0.34,   0.56, &
01031    0.48,   0.14,   0.10,   0.10,   0.22,   0.22,   0.05,   0.07,   0.08,   0.10, &
01032    0.11,   0.13,   0.00,   0.01,   0.01,   0.14,   0.13,   0.18,   0.13,   0.16, &
01033    0.19,   0.27,   0.08,   0.18,   0.35,   0.30,   0.43,   0.04,   0.24,   0.19, &
01034    0.05,   0.30,   0.22,   0.15,   0.19,   0.08,   0.03,   0.20,   0.24,   0.10, &
01035    0.13,   0.15,   0.08,   0.11,   0.04,   0.06,   0.09,   0.10,   0.12,   0.25, &
01036    0.06,   0.12,   0.03,   0.13,   0.15,   0.07,   0.09,   0.10,   0.22,   0.28, &
01037    0.04,   0.02,   0.13,   0.12,   0.05,   0.10,   0.05,   0.04,   0.37,   0.30, &
01038    0.38,   0.17,   0.23,   0.03,   0.12,   0.10,   0.04,   0.12,   0.16,   0.13, &
01039    0.20,   0.26,   0.06,   0.19,   0.05,   0.22,   0.31,   0.12,   0.18,   0.20, &
01040    0.53,   0.12,   0.07,   0.07,   0.07,   0.05,   0.04,   0.03,   0.04,   0.02, &
01041    0.02,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01, &
01042    0.05,   0.01,   0.10,   0.01,   0.07,   0.15,   0.05,   0.00,   0.00,   0.00, &
01043    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.03,   0.02,   0.03,   0.05, &
01044    0.48,   0.26,   0.17,   0.31,   0.49,   0.10,   0.49,   0.19,   0.22,   0.30, &
01045    0.40,   0.04,   0.00 &
01046          /)
01047 !-------------------------------------------------------------------                                                    
01048 XDATA_VEGTYPE(:, 11) = (/          &
01049    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.50,   0.00,   0.00, &
01050    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01051    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01052    0.00,   0.00,   0.00,   0.50,   0.50,   0.50,   0.50,   0.00,   0.50,   0.50, &
01053    0.00,   0.00,   0.00,   0.50,   0.00,   0.00,   0.00,   0.50,   0.60,   0.70, &
01054    0.60,   0.70,   0.60,   0.00,   0.00,   0.60,   0.00,   0.50,   0.00,   0.00, &
01055    0.00,   0.70,   0.00,   0.00,   0.70,   0.60,   0.50,   0.60,   0.60,   0.50, &
01056    0.50,   0.60,   0.60,   0.00,   0.00,   0.60,   0.00,   0.30,   0.00,   0.00, &
01057    0.50,   0.30,   0.00,   0.00,   0.00,   0.00,   0.30,   1.00,   1.00,   1.00, &
01058    1.00,   0.00,   0.00,   1.00,   1.00,   1.00,   0.00,   0.00,   0.00,   0.00, &
01059    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01060    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01061    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01062    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01063    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01064    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01065    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01066    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01067    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01068    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01069    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01070    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01071    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01072    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01073    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01074    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01075    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01076    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01077    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01078    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01079    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01080    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01081    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00,   0.00, &
01082    0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00, &
01083    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01084    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01085    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01086    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01087    0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.01,   0.00,   0.00, &
01088    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01089    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01090    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00, &
01091    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01092    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01093    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01094    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01095    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01096    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01097    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01098    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01099    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01100    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01101    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01102    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01103    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01104    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01105    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01106    0.00,   0.00,   0.00 &
01107          /)
01108 !-------------------------------------------------------------------                                                    
01109 XDATA_VEGTYPE(:, 12) = (/          &
01110    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.50,   0.00,   0.00,   0.00, &
01111    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01112    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01113    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01114    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01115    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01116    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01117    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01118    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01119    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01120    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01121    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01122    0.00,   0.00,   0.00,   0.50,   0.80,   0.00,   0.00,   0.00,   0.00,   0.00, &
01123    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01124    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01125    0.50,   0.50,   0.50,   0.50,   0.00,   0.00,   0.00,   0.00,   0.00,   0.50, &
01126    0.80,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01127    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01128    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01129    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01130    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01131    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01132    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01133    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.50,   0.80,   1.00, &
01134    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01135    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01136    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01137    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01138    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01139    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01140    0.08,   0.03,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.06, &
01141    0.03,   0.07,   0.01,   0.02,   0.02,   0.00,   0.01,   0.01,   0.01,   0.00, &
01142    0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.06, &
01143    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01144    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01, &
01145    0.02,   0.09,   0.03,   0.03,   0.31,   0.01,   0.02,   0.00,   0.01,   0.00, &
01146    0.00,   0.04,   0.00,   0.01,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00, &
01147    0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00, &
01148    0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01149    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01150    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01151    0.00,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01152    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01153    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01154    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01155    0.01,   0.00,   0.00,   0.02,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00, &
01156    0.00,   0.00,   0.00,   0.00,   0.00,   0.15,   0.01,   0.00,   0.00,   0.00, &
01157    0.02,   0.00,   0.00,   0.01,   0.01,   0.00,   0.01,   0.01,   0.05,   0.00, &
01158    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01,   0.01,   0.00,   0.00, &
01159    0.00,   0.00,   0.00,   0.01,   0.00,   0.01,   0.00,   0.00,   0.00,   0.00, &
01160    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01161    0.00,   0.00,   0.02,   0.00,   0.00,   0.00,   0.00,   0.01,   0.00,   0.00, &
01162    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.01, &
01163    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00, &
01164    0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.00,   0.99, &
01165    0.00,   1.00,   1.00,   1.00,   1.00,   0.18,   0.55,   0.94,   0.89,   0.10, &
01166    0.02,   0.01,   0.01,   0.02,   0.06,   0.04,   0.07,   0.02,   0.00,   0.00, &
01167    0.02,   0.00,   0.00 &
01168          /)
01169 !-------------------------------------------------------------------                                                    
01170 XDATA_H_TREE(:,  4) = (/          &
01171  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,     5.,    15., XUNDEF, XUNDEF, &
01172  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01173  XUNDEF, XUNDEF, XUNDEF, XUNDEF,    20.,    15.,    20.,    20.,    15.,    15., &
01174     15.,    15.,    15., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    10., &
01175  XUNDEF, XUNDEF, XUNDEF,    10., XUNDEF, XUNDEF, XUNDEF,     5.,    10., XUNDEF, &
01176     10.,    10.,     5.,    15., XUNDEF,    10., XUNDEF,     5., XUNDEF, XUNDEF, &
01177  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,     5.,     2.,     2.,     2.,     2., &
01178      2.,     2.,     2., XUNDEF, XUNDEF,     2., XUNDEF, XUNDEF,     2., XUNDEF, &
01179  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01180  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01181  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01182  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01183  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01184  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01185  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01186      5.,     5.,     5.,     5., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,     5., &
01187      5., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01188  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,     1.,     1.,     5.,     5., &
01189      5., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    10.,    10.,    10.,    10., &
01190     10.,    10.,    10.,    10.,    10., XUNDEF, XUNDEF,    10.,    10.,    10., &
01191     10.,    10.,    10.,    10.,    10.,    10.,    10., XUNDEF, XUNDEF, XUNDEF, &
01192  XUNDEF, XUNDEF, XUNDEF, XUNDEF,    10.,    10.,    10.,    10.,    10., XUNDEF, &
01193  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,     2., &
01194      2., XUNDEF,    10.,    10.,    10., XUNDEF, XUNDEF,    10., XUNDEF, XUNDEF, &
01195  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01196  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01197  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01198  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01199  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01200  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01201      8.,    15.,    15.,     8.,    15.,    15.,    15.,    15.,    15.,    14., &
01202     13.,    14.,    13.,    12.,    13.,    13.,    13.,    13.,    12.,    15., &
01203     14.,    11.,    12.,    12.,    11.,    11., XUNDEF,    10.,    10.,     7., &
01204     10.,    10.,    10.,    10.,    10.,    10.,    10.,    10.,    10.,     8., &
01205      8.,    10.,    10.,     1.,     1.,     1.,     1.,     2.,     2.,     1., &
01206      7.,     2.,     2.,     2., XUNDEF,     1.,     1.,     1.,     1.,    10., &
01207      5.,     5.,     2.,     2.,     2.,     2.,     1.,     1.,     1.,     1., &
01208      1.,     1.,     1.,     1.,     1.,     5.,     2.,     1.,     2.,     2., &
01209      2.,     2.,     1.,     2.,     1.,     1.,     1.,     2.,     2.,     2., &
01210      1.,    10.,     2.,     2.,     2.,     2.,     8.,     5.,     2.,     5., &
01211     10.,     4.,     8.,     8.,     4.,     2.,     2.,     2.,     2., XUNDEF, &
01212      2.,     1.,     2.,     1.,     1.,     2.,     2.,     1., XUNDEF,     1., &
01213      1.,     1.,     1.,     1.,     2.,     2.,     1.,     5.,     8.,     5., &
01214      8.,     1., XUNDEF, XUNDEF,     1.,     1., XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01215  XUNDEF, XUNDEF,     2.,     2.,     2.,     2.,     2.,     2.,     5.,     2., &
01216      2.,     5.,     5.,     1.,     8.,     8.,     5.,     5.,     2.,     2., &
01217     10.,    10.,    10.,    10.,    10.,    10.,    10., XUNDEF,    10.,    11., &
01218     11., XUNDEF, XUNDEF,    10.,     8.,     5.,     5.,     8., XUNDEF,     5., &
01219     10.,    10., XUNDEF,    10.,    10.,    10.,    10.,    10.,     8.,     1., &
01220     10.,     8.,     8.,     5., XUNDEF,     3.,     3.,     3.,     2.,     2., &
01221      2.,     2.,     2.,     2.,     2.,     3.,     3.,     2.,     2.,     5., &
01222      5.,     5.,     5.,     5.,     8.,     5.,     7.,     8.,     7.,     5., &
01223      3.,     2., XUNDEF, XUNDEF,     8.,     8.,     8.,     8.,     8., XUNDEF, &
01224  XUNDEF,     1., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01225  XUNDEF,     1., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01226  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    11.,     5.,    11.,    11.,    10., &
01227      7.,     7.,     8.,     8.,     5.,    10.,     3.,     6.,     5.,     9., &
01228      6.,     1.,     1. &
01229          /)
01230 !-------------------------------------------------------------------                                                    
01231 XDATA_H_TREE(:,  5) = (/          &
01232  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    15., &
01233     15.,    15.,    15.,    15.,    20., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01234  XUNDEF, XUNDEF, XUNDEF,    15., XUNDEF, XUNDEF, XUNDEF, XUNDEF,    15.,    15., &
01235     15.,    15.,    15., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01236     10.,    15.,    15., XUNDEF,    15.,    15.,    15., XUNDEF, XUNDEF, XUNDEF, &
01237  XUNDEF, XUNDEF, XUNDEF, XUNDEF,    15., XUNDEF, XUNDEF, XUNDEF,    10.,    15., &
01238  XUNDEF, XUNDEF,    10.,    10., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01239  XUNDEF, XUNDEF, XUNDEF,     2.,     2., XUNDEF,     2.,     2., XUNDEF, XUNDEF, &
01240  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01241  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01242  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01243  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01244  XUNDEF, XUNDEF, XUNDEF, XUNDEF,    10., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01245  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01246  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01247  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01248  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01249  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01250  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01251  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    10.,    10., XUNDEF, XUNDEF, XUNDEF, &
01252  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    10.,    10.,    10., &
01253     10.,    10.,    10.,    10.,    10.,    10.,    10.,    10.,    10., XUNDEF, &
01254  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01255  XUNDEF,     2., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    10., XUNDEF, &
01256  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01257  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01258  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01259  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01260  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01261  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01262     14.,    15.,    15.,    14.,    15.,    15.,    15.,    15.,    15.,    14., &
01263     13.,    14.,    13.,    12.,    13.,    13.,    13.,    13.,    12.,    15., &
01264     14.,    11.,    12.,    12.,    11.,    11.,    10.,    10.,    10.,    10., &
01265     10.,    10.,    10.,    10.,    10.,    10.,    10.,    10.,    10.,    10., &
01266     10.,    10.,    10., XUNDEF, XUNDEF, XUNDEF, XUNDEF,    14., XUNDEF, XUNDEF, &
01267     10.,    10.,    10.,    10.,    10.,     1.,     1., XUNDEF, XUNDEF,    10., &
01268      5.,     5.,     2.,    10.,     3.,     2., XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01269  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,     5.,     2.,     1., XUNDEF,     2., &
01270      2.,     2.,     1., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01271      1., XUNDEF,     2.,     2., XUNDEF,     2., XUNDEF,     5., XUNDEF,     5., &
01272      5.,     3.,     8.,     8.,     4., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01273  XUNDEF,     1.,     2., XUNDEF, XUNDEF,     2., XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01274      1., XUNDEF, XUNDEF, XUNDEF, XUNDEF,     2., XUNDEF,     5.,     8.,     5., &
01275      8., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01276  XUNDEF, XUNDEF, XUNDEF, XUNDEF,     2., XUNDEF,     2.,     2., XUNDEF,     2., &
01277  XUNDEF,     5.,     5.,     7.,     8.,     8.,     5.,     5.,     2.,     2., &
01278     10.,    10.,    10.,    10.,    10.,    10., XUNDEF, XUNDEF, XUNDEF,    11., &
01279  XUNDEF, XUNDEF, XUNDEF,    10., XUNDEF, XUNDEF,     5.,     8.,     8., XUNDEF, &
01280     10.,    10., XUNDEF,    10.,    10., XUNDEF,    10.,    10.,     8., XUNDEF, &
01281     10., XUNDEF, XUNDEF,     5., XUNDEF,     3.,     3.,     3.,     2., XUNDEF, &
01282  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,     3., XUNDEF,     2.,     2.,     5., &
01283      5.,     5.,     5.,     5.,     8., XUNDEF,     7.,     8.,     7.,     5., &
01284  XUNDEF,     2., XUNDEF, XUNDEF, XUNDEF, XUNDEF,     8., XUNDEF, XUNDEF,     5., &
01285  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01286  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01287  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    13.,    12.,    13.,    11.,    10., &
01288      7.,     7.,     8.,     8.,     5.,    10.,     3.,     6.,     5.,     9., &
01289      6., XUNDEF,     1. &
01290          /)
01291 !-------------------------------------------------------------------                                                    
01292 XDATA_H_TREE(:,  6) = (/          &
01293  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01294  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    30.,    20.,    30.,    20.,    20., &
01295     30.,    30.,    20., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01296  XUNDEF, XUNDEF, XUNDEF,    10.,    10.,    15.,    15.,    20.,    15., XUNDEF, &
01297  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    15., &
01298  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,    30., XUNDEF, XUNDEF, XUNDEF, &
01299     15.,    15., XUNDEF, XUNDEF,    15., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01300  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01301  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01302  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01303  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01304  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01305  XUNDEF, XUNDEF, XUNDEF,    10., XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01306  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01307  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01308  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01309  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01310  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01311  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01312  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01313  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01314  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01315  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01316  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01317  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01318  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01319  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01320  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01321  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01322  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01323  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01324  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01325  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01326  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01327  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01328  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01329  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01330  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01331  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01332  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01333  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01334  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01335  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01336  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01337  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01338  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01339  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01340  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01341  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01342  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01343  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01344  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01345  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01346  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01347  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01348  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01349  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01350  XUNDEF, XUNDEF, XUNDEF &
01351          /)
01352 !-------------------------------------------------------------------                                                    
01353 WHERE(XDATA_VEGTYPE(:, 8)>0.) XDATA_WATSUP(:,  8) =   0.                                  
01354 !-------------------------------------------------------------------                                                    
01355 WHERE(XDATA_VEGTYPE(:, 9)>0.) XDATA_WATSUP(:,  9) =  30.                                  
01356 !-------------------------------------------------------------------                                                    
01357 WHERE(XDATA_VEGTYPE(:, 8)>0.) XDATA_IRRIG(:,  8) = 0.00                                   
01358 !-------------------------------------------------------------------                                                    
01359 WHERE(XDATA_VEGTYPE(:, 9)>0.) XDATA_IRRIG(:,  9) = 1.00                                   
01360 !-------------------------------------------------------------------                                                    
01361 XDATA_ROOT_DEPTH(:,  1) = (/          &
01362  XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF, &
01363  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01364  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01365  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, &
01366  XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF, XUNDEF, XUNDEF,   0.50,   0.50, XUNDEF, &
01367    0.50, XUNDEF,   0.50, XUNDEF, XUNDEF,   0.50, XUNDEF,   0.50, XUNDEF, XUNDEF, &
01368  XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF,   0.50,   0.50,   0.50,   0.50,   0.50, &
01369    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01370    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, XUNDEF, XUNDEF, XUNDEF, &
01371  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01372  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01373  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01374  XUNDEF, XUNDEF,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01375  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01376  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01377  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF,   0.50, XUNDEF,   0.50, XUNDEF, &
01378  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01379  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00,   1.00, XUNDEF, &
01380    0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01381  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01382  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01383  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, &
01384  XUNDEF, XUNDEF,   0.50, XUNDEF,   0.50,   0.50,   0.50, XUNDEF, XUNDEF,   0.50, &
01385    0.50,   0.50,   0.50,   0.50, XUNDEF,   0.50,   0.50, XUNDEF, XUNDEF, XUNDEF, &
01386  XUNDEF,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01387  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01388  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01389  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01390  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01391  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01392    0.50,   0.50, XUNDEF,   0.50,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, &
01393    0.50,   0.50, XUNDEF,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, XUNDEF, &
01394  XUNDEF,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01395    0.50,   0.50,   0.50,   0.50,   1.00,   1.00,   1.00,   1.00,   1.00,   0.50, &
01396    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01397    0.50,   0.50,   0.50, XUNDEF,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01398    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01399    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01400    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01401    0.50,   0.50,   0.50,   1.00,   1.00,   0.50,   0.50,   0.50,   0.50,   0.50, &
01402    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01403    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01404    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01405    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01406    0.50,   0.50,   0.50,   0.50,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01407    1.00,   1.00,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01408    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   1.00,   1.00,   1.00,   1.00, &
01409    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   0.50,   0.50,   0.50,   0.50, &
01410    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01411    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01412    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   1.00, &
01413    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01414    0.50,   0.50,   0.50,   0.50,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01415    1.00,   1.00, XUNDEF, XUNDEF,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01416    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, XUNDEF, XUNDEF,   0.50, &
01417    0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01418    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, XUNDEF,   0.50, &
01419    0.50,   1.00,   1.00 &
01420          /)
01421 !-------------------------------------------------------------------                                                    
01422 WHERE(XDATA_VEGTYPE(:, 2)>0.) XDATA_ROOT_DEPTH(:,  2) = 0.20                              
01423 !-------------------------------------------------------------------                                                    
01424 WHERE(XDATA_VEGTYPE(:, 3)>0.) XDATA_ROOT_DEPTH(:,  3) = 0.20                              
01425 !-------------------------------------------------------------------                                                    
01426 XDATA_ROOT_DEPTH(:,  4) = (/          &
01427  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, &
01428  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01429  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   2.00,   3.00,   3.00,   2.00,   2.00, &
01430    2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
01431  XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00, XUNDEF, &
01432    3.00,   2.00,   2.00,   3.00, XUNDEF,   3.00, XUNDEF,   3.00, XUNDEF, XUNDEF, &
01433  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   4.00,   4.00,   4.00,   4.00, &
01434    4.00,   4.00,   4.00, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF,   3.00, XUNDEF, &
01435  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01436  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01437  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01438  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01439  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01440  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01441  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01442    2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
01443    2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01444  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00,   2.00,   2.00, &
01445    2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00,   2.00, &
01446    2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF,   2.00,   2.00,   2.00, &
01447    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, &
01448  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, &
01449  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
01450    2.00, XUNDEF,   2.00,   2.00,   2.00, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, &
01451  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01452  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01453  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01454  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01455  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01456  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01457    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01458    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01459    2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00, &
01460    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   1.50, &
01461    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01462    2.00,   2.00,   2.00,   2.00, XUNDEF,   1.50,   1.50,   1.50,   1.50,   2.00, &
01463    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   1.50,   1.50, &
01464    1.50,   1.50,   1.50,   1.50,   1.50,   2.00,   2.00,   2.00,   2.00,   2.00, &
01465    2.00,   2.00,   1.50,   2.00,   2.00,   1.50,   1.50,   1.50,   1.50,   2.00, &
01466    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   1.50,   1.50, &
01467    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, &
01468    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50, &
01469    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   2.00,   2.00,   2.00, &
01470    2.00,   2.00, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01471  XUNDEF, XUNDEF,   2.00,   2.00,   3.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01472    2.00,   2.00,   3.00,   3.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01473    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00,   2.00, &
01474    2.00, XUNDEF, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00, &
01475    2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01476    2.00,   2.00,   2.00,   2.00, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50, &
01477    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   2.00, &
01478    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01479    2.00,   2.00, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF, &
01480  XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01481  XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01482  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00, &
01483    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01484    2.00,   3.00,   3.00 &
01485          /)
01486 !-------------------------------------------------------------------                                                    
01487 XDATA_ROOT_DEPTH(:,  5) = (/          &
01488  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
01489    2.00,   2.00,   2.00,   2.00,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01490  XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00, &
01491    2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01492    2.00,   2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, &
01493  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00, &
01494  XUNDEF, XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01495  XUNDEF, XUNDEF, XUNDEF,   1.50,   2.00, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, &
01496  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01497  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01498  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01499  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01500  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01501  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01502  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01503  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01504  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01505  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01506  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01507  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, &
01508  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00, &
01509    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, &
01510  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01511  XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, &
01512  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01513  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01514  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01515  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01516  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01517  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01518    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01519    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01520    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01521    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   1.50, &
01522    1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, &
01523    2.00,   2.00,   2.00,   2.00,   2.00,   1.50,   1.50, XUNDEF, XUNDEF,   2.00, &
01524    2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01525  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00, XUNDEF,   2.00, &
01526    2.00,   2.00,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01527    2.00, XUNDEF,   2.00,   2.00, XUNDEF,   2.00, XUNDEF,   2.00, XUNDEF,   1.50, &
01528    1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01529  XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01530    1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   2.00,   2.00,   2.00, &
01531    2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01532  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF,   2.00,   2.00, XUNDEF,   2.00, &
01533  XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01534    2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF,   2.00, &
01535  XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF,   2.00,   2.00,   2.00, XUNDEF, &
01536    2.00,   2.00, XUNDEF,   2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00, XUNDEF, &
01537    2.00, XUNDEF, XUNDEF,   2.00, XUNDEF,   1.50,   1.50,   1.50,   1.50, XUNDEF, &
01538  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.50,   1.50,   2.00, &
01539    2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00,   2.00, &
01540  XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF,   2.00, &
01541  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01542  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01543  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00, &
01544    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
01545    2.00, XUNDEF,   2.00 &
01546          /)
01547 !-------------------------------------------------------------------                                                    
01548 XDATA_ROOT_DEPTH(:,  6) = (/          &
01549  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01550  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   8.00,   5.00,   8.00,   5.00,   5.00, &
01551    8.00,   5.00,   5.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01552  XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   5.00,   3.00, XUNDEF, &
01553  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, &
01554  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   5.00, XUNDEF, XUNDEF, XUNDEF, &
01555    3.00,   3.00, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01556  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01557  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01558  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01559  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01560  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01561  XUNDEF, XUNDEF, XUNDEF,   5.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01562  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01563  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01564  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01565  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01566  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01567  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01568  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01569  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01570  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01571  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01572  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01573  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01574  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01575  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01576  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01577  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01578  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01579  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01580  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01581  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01582  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01583  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01584  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01585  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01586  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01587  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01588  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01589  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01590  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01591  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01592  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01593  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01594  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01595  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01596  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01597  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01598  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01599  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01600  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01601  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01602  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01603  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01604  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01605  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01606  XUNDEF, XUNDEF, XUNDEF &
01607          /)
01608 
01609 END SUBROUTINE DEFAULT_DATA_COVER_1
01610 
01611 SUBROUTINE DEFAULT_DATA_COVER_2
01612 
01613 USE MODD_SURF_PAR
01614 USE MODD_DATA_COVER_PAR
01615 USE MODD_DATA_COVER
01616 
01617 IMPLICIT NONE
01618 
01619 !-------------------------------------------------------------------                                                    
01620 XDATA_ROOT_DEPTH(:,  7) = (/          &
01621  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01622  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01623  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01624  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, &
01625  XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, &
01626  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
01627    1.50, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01628  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01629  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01630  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01631  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.50,   1.50,   1.50,   1.50, XUNDEF, &
01632    1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01633    1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01634  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01635  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01636  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01637  XUNDEF,   1.00,   1.00,   1.00,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01638    1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01639  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00,   1.50,   1.50, &
01640    1.50,   1.00,   1.50,   1.50,   1.50,   1.00,   1.50,   1.00, XUNDEF, XUNDEF, &
01641  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01642  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01643  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01644  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01645  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01646  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01647  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01648  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01649  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01650  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01651  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
01652    1.50,   1.50, XUNDEF,   1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50, &
01653  XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF,   1.50,   1.50, &
01654    1.50, XUNDEF,   1.00, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF,   1.00,   1.00, &
01655    1.00,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00, &
01656    1.00, XUNDEF,   1.50,   1.00, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00, &
01657    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, &
01658  XUNDEF,   1.00, XUNDEF,   1.00, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00, &
01659    1.00,   1.00,   1.00,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, &
01660    1.00,   1.50,   1.50,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01661    1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01662    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00, &
01663    1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01664    1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01665  XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01666    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01667    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01668    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01669    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01670    1.50,   1.50,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01671    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01672    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01673    1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00,   1.00, &
01674  XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01675  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01676  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF,   1.50, &
01677    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01678    1.50,   1.50,   1.50 &
01679          /)
01680 !-------------------------------------------------------------------                                                    
01681 XDATA_ROOT_DEPTH(:,  8) = (/          &
01682  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01683  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01684  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01685  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, &
01686  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, &
01687  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF,   1.50, &
01688    1.50, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01689  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01690  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01691  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01692  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.50,   1.50,   1.50, XUNDEF,   1.50, &
01693    1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, &
01694  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01695  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01696  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01697  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01698  XUNDEF,   1.00,   1.00,   1.00,   1.50, XUNDEF, XUNDEF,   1.50,   1.50,   1.50, &
01699  XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01700  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01701  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01702  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01703  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01704  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01705  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01706  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01707  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01708  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01709  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01710  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01711  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01712  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01713  XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
01714    1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50, XUNDEF,   1.50,   1.50,   1.50, &
01715    1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF,   1.00, XUNDEF, &
01716  XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01717  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF, XUNDEF,   1.00, &
01718    1.00, XUNDEF,   1.00, XUNDEF,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01719  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00,   1.00, XUNDEF,   1.00, &
01720    1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, &
01721    1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00, XUNDEF,   1.00,   1.00,   1.00, &
01722    1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01723    1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01724  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00, &
01725    1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01726  XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01727    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01728    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, &
01729    1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.00,   1.50,   1.50,   1.50, &
01730    1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50,   1.50, XUNDEF,   1.50,   1.50, &
01731  XUNDEF,   1.50,   1.50,   1.50,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, &
01732    1.00, XUNDEF,   1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00, &
01733  XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00, &
01734    1.00, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01735  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01736  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01737  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01738  XUNDEF,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50, &
01739    1.50,   1.50,   1.50 &
01740          /)
01741 !-------------------------------------------------------------------                                                    
01742 WHERE(XDATA_VEGTYPE(:, 9)>0.) XDATA_ROOT_DEPTH(:,  9) = 1.50                              
01743 !-------------------------------------------------------------------                                                    
01744 XDATA_ROOT_DEPTH(:, 10) = (/          &
01745  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF, &
01746  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01747  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01748  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01749    1.00, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01750  XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, &
01751  XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01752  XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF,   1.00,   1.00,   1.50,   0.50, &
01753  XUNDEF, XUNDEF,   1.00,   1.50,   0.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01754  XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   1.00,   1.00, &
01755    1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01756  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01757  XUNDEF, XUNDEF,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01758  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01759  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01760  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.00, XUNDEF, XUNDEF, &
01761  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01762  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
01763  XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01764  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, &
01765  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01766  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
01767    1.50,   1.50,   1.50,   1.50,   0.50,   1.00,   1.00,   1.00,   1.00,   1.00, &
01768  XUNDEF, XUNDEF,   1.50,   1.50,   1.50,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01769    1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01770  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01771  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01772  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01773  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01774  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01775    1.00,   1.00,   1.00, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01776  XUNDEF,   1.00, XUNDEF,   1.00, XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00,   1.50, &
01777    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01778    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50, &
01779    1.50,   1.50,   1.50,   0.50,   0.50,   0.50,   1.00,   1.00,   1.00,   1.00, &
01780    1.50,   1.50,   1.50,   1.50,   1.50,   1.00,   1.00,   0.50,   0.50,   1.50, &
01781    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.00,   1.00,   0.50,   0.50, &
01782    0.50,   0.50,   0.50,   0.50,   0.50,   1.50,   1.50,   1.00,   1.00,   1.00, &
01783    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01784    1.00,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01785    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   0.50,   0.50, &
01786    0.50,   1.50,   1.50,   1.00,   0.50,   1.00,   1.00,   0.50,   0.50,   1.00, &
01787    1.00,   0.50,   0.50,   0.50,   1.00,   0.50,   0.50,   1.50,   1.50,   1.50, &
01788    1.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01789    0.50,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01790    1.50,   1.50,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01791    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.50,   1.50, &
01792    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.00,   1.00,   1.00,   1.50, &
01793    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01794    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01795    1.50,   1.50,   1.50,   1.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
01796    0.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01797    1.50,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01798    1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, &
01799    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, XUNDEF, XUNDEF, XUNDEF, &
01800  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   1.50,   1.50, &
01801    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01802    1.50,   1.50, XUNDEF &
01803          /)
01804 !-------------------------------------------------------------------                                                    
01805 XDATA_ROOT_DEPTH(:, 11) = (/          &
01806  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, &
01807  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01808  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01809  XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50,   1.50, &
01810  XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00,   1.50, &
01811    1.50,   1.00,   1.00, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.00, XUNDEF, XUNDEF, &
01812  XUNDEF,   1.00, XUNDEF, XUNDEF,   1.50,   1.50,   1.00,   1.00,   1.00,   1.00, &
01813    1.00,   1.00,   1.00, XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00, XUNDEF, XUNDEF, &
01814    1.00,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50,   1.50,   1.00,   1.50, &
01815    1.50, XUNDEF, XUNDEF,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01816  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01817  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01818  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01819  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01820  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01821  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01822  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01823  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01824  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01825  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01826  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01827  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01828  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01829  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01830  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01831  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01832  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01833  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01834  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01835  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01836  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01837  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01838  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, &
01839  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01840  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01841  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01842  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01843  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01844  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00, XUNDEF, XUNDEF, &
01845  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01846  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01847  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF, &
01848  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01849  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01850  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01851  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01852  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01853  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01854  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01855  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01856  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01857  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01858  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01859  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01860  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01861  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01862  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01863  XUNDEF, XUNDEF, XUNDEF &
01864          /)
01865 !-------------------------------------------------------------------                                                    
01866 XDATA_ROOT_DEPTH(:, 12) = (/          &
01867  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, &
01868  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01869  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01870  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01871  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01872  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01873  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01874  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01875  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01876  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01877  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01878  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01879  XUNDEF, XUNDEF, XUNDEF,   3.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01880  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01881  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01882    1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
01883    1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01884  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01885  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01886  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01887  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01888  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01889  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01890  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   1.50, &
01891  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01892  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01893  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01894  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01895  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01896  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01897    1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, &
01898    1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00, XUNDEF, &
01899  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
01900  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01901  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, &
01902    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00, XUNDEF, &
01903  XUNDEF,   1.00, XUNDEF,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01904  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01905    1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01906  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01907  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01908  XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01909  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01910  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01911  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01912    1.50, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, &
01913  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, &
01914    1.50, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50, XUNDEF, &
01915  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, &
01916  XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01917  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01918  XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, &
01919  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
01920  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01921  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
01922  XUNDEF,   1.50,   1.50,   1.50,   1.50,   2.00,   2.00,   2.00,   2.00,   2.00, &
01923    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, &
01924    1.50, XUNDEF, XUNDEF &
01925          /)
01926 !-------------------------------------------------------------------                                                    
01927 XDATA_GROUND_DEPTH(:,  1) = (/          &
01928  XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, &
01929  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01930  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01931  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, &
01932  XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF, &
01933    1.00, XUNDEF,   1.00, XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00, XUNDEF, XUNDEF, &
01934  XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00, &
01935    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01936    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, &
01937  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01938  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01939  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01940  XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01941  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01942  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01943  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00, XUNDEF,   1.00, XUNDEF, &
01944  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01945  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   1.50, XUNDEF, &
01946    1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01947  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01948  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01949  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, &
01950  XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00,   1.00,   1.00, XUNDEF, XUNDEF,   1.00, &
01951    1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, &
01952  XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01953  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01954  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01955  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01956  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01957  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01958    1.00,   1.00, XUNDEF,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, &
01959    1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, &
01960  XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01961    1.00,   1.00,   1.00,   1.00,   1.50,   1.50,   1.50,   1.50,   1.50,   1.00, &
01962    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01963    1.00,   1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01964    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01965    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01966    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01967    1.00,   1.00,   1.00,   1.50,   1.50,   1.00,   1.00,   1.00,   1.00,   1.00, &
01968    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01969    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01970    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01971    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01972    1.00,   1.00,   1.00,   1.00,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01973    1.50,   1.50,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01974    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.50,   1.50,   1.50,   1.50, &
01975    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.00,   1.00,   1.00,   1.00, &
01976    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01977    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01978    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.50, &
01979    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01980    1.00,   1.00,   1.00,   1.00,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
01981    1.50,   1.50, XUNDEF, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
01982    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, XUNDEF,   1.00, &
01983    1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01984    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00, &
01985    1.00,   1.50,   1.50 &
01986          /)
01987 !-------------------------------------------------------------------                                                    
01988 WHERE(XDATA_VEGTYPE(:, 2)>0.) XDATA_GROUND_DEPTH(:,  2) = 0.20                            
01989 !-------------------------------------------------------------------                                                    
01990 WHERE(XDATA_VEGTYPE(:, 3)>0.) XDATA_GROUND_DEPTH(:,  3) = 0.20                            
01991 !-------------------------------------------------------------------                                                    
01992 XDATA_GROUND_DEPTH(:,  4) = (/          &
01993  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00, XUNDEF, XUNDEF, &
01994  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
01995  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   5.00,   3.00,   5.00,   5.00,   3.00,   3.00, &
01996    3.00,   3.00,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, &
01997  XUNDEF, XUNDEF, XUNDEF,   4.00, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00, XUNDEF, &
01998    3.00,   3.00,   3.00,   4.00, XUNDEF,   3.00, XUNDEF,   3.00, XUNDEF, XUNDEF, &
01999  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   4.00,   4.00,   4.00,   4.00, &
02000    4.00,   4.00,   4.00, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF,   3.00, XUNDEF, &
02001  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02002  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02003  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02004  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02005  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02006  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02007  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02008    3.00,   3.00,   3.00,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, &
02009    3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02010  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00, &
02011    3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00, &
02012    3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF, XUNDEF,   3.00,   3.00,   3.00, &
02013    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF, XUNDEF, XUNDEF, &
02014  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF, &
02015  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02016    2.00, XUNDEF,   3.00,   3.00,   3.00, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF, &
02017  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02018  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02019  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02020  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02021  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02022  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02023    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, &
02024    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, &
02025    3.00,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF,   3.00,   3.00,   3.00, &
02026    3.00,   3.00,   2.50,   2.50,   2.50,   2.50,   2.50,   2.50,   2.50,   2.00, &
02027    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02028    3.00,   3.00,   3.00,   3.00, XUNDEF,   2.00,   2.00,   2.00,   2.00,   3.00, &
02029    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   2.50,   2.50,   2.00,   2.00, &
02030    2.00,   2.00,   2.00,   2.00,   2.00,   2.50,   2.50,   2.50,   2.50,   2.50, &
02031    2.50,   2.50,   2.00,   2.50,   2.50,   2.00,   2.00,   2.00,   2.00,   2.50, &
02032    2.50,   2.50,   2.50,   2.50,   2.50,   2.50,   2.50,   2.50,   2.00,   2.00, &
02033    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, &
02034    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00, &
02035    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.50,   2.50,   2.50, &
02036    2.50,   2.50, XUNDEF, XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02037  XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, &
02038    3.00,   3.00,   3.00,   3.00,   3.00,   2.50,   2.50,   2.50,   2.50,   2.50, &
02039    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF,   3.00,   3.00, &
02040    3.00, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF,   3.00, &
02041    3.00,   3.00, XUNDEF,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, &
02042    3.00,   3.00,   3.00,   3.00, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00, &
02043    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   3.00, &
02044    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, &
02045    3.00,   2.50, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF, &
02046  XUNDEF,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02047  XUNDEF,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02048  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   3.00, &
02049    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, &
02050    3.00,   3.00,   3.00 &
02051          /)
02052 !-------------------------------------------------------------------                                                    
02053 XDATA_GROUND_DEPTH(:,  5) = (/          &
02054  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, &
02055    3.00,   3.00,   3.00,   3.00,   4.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02056  XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00, &
02057    3.00,   3.00,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02058    3.00,   3.00,   3.00, XUNDEF,   3.00,   3.00,   3.00, XUNDEF, XUNDEF, XUNDEF, &
02059  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00, &
02060  XUNDEF, XUNDEF,   3.00,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02061  XUNDEF, XUNDEF, XUNDEF,   2.00,   2.50, XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, &
02062  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02063  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02064  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02065  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02066  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02067  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02068  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02069  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02070  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02071  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02072  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02073  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00, XUNDEF, XUNDEF, XUNDEF, &
02074  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00,   3.00, &
02075    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF, &
02076  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02077  XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, &
02078  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02079  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02080  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02081  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02082  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02083  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02084    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, &
02085    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, &
02086    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   2.50,   3.00,   3.00,   3.00, &
02087    3.00,   3.00,   2.50,   2.50,   2.50,   2.50,   2.50,   2.50,   2.50,   2.00, &
02088    2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF, &
02089    3.00,   3.00,   3.00,   3.00,   3.00,   2.00,   2.00, XUNDEF, XUNDEF,   3.00, &
02090    3.00,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02091  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.50,   2.50,   2.50, XUNDEF,   2.50, &
02092    2.50,   2.50,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02093    2.50, XUNDEF,   2.50,   2.50, XUNDEF,   2.50, XUNDEF,   2.50, XUNDEF,   2.00, &
02094    2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02095  XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02096    2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF,   2.50,   2.50,   2.50, &
02097    2.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02098  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF,   3.00,   3.00, XUNDEF,   3.00, &
02099  XUNDEF,   3.00,   3.00,   3.00,   3.00,   2.50,   2.50,   2.50,   2.50,   2.50, &
02100    3.00,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF, XUNDEF, XUNDEF,   3.00, &
02101  XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF,   3.00,   3.00,   3.00, XUNDEF, &
02102    3.00,   3.00, XUNDEF,   3.00,   3.00, XUNDEF,   3.00,   3.00,   3.00, XUNDEF, &
02103    3.00, XUNDEF, XUNDEF,   3.00, XUNDEF,   2.00,   2.00,   2.00,   2.00, XUNDEF, &
02104  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF,   2.00,   2.00,   3.00, &
02105    3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF,   3.00,   3.00,   3.00,   3.00, &
02106  XUNDEF,   2.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF,   3.00, &
02107  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02108  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02109  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   3.00, &
02110    3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00,   3.00, &
02111    3.00, XUNDEF,   3.00 &
02112          /)
02113 !-------------------------------------------------------------------                                                    
02114 XDATA_GROUND_DEPTH(:,  6) = (/          &
02115  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02116  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   8.00,   5.00,   8.00,   5.00,   5.00, &
02117    8.00,   5.00,   5.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02118  XUNDEF, XUNDEF, XUNDEF,   4.00,   4.00,   4.00,   4.00,   5.00,   4.00, XUNDEF, &
02119  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, &
02120  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   5.00, XUNDEF, XUNDEF, XUNDEF, &
02121    3.00,   4.00, XUNDEF, XUNDEF,   4.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02122  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02123  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02124  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02125  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02126  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02127  XUNDEF, XUNDEF, XUNDEF,   5.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02128  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02129  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02130  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02131  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02132  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02133  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02134  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02135  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02136  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02137  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02138  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02139  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02140  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02141  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02142  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02143  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02144  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02145  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02146  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02147  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02148  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02149  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02150  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02151  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02152  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02153  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02154  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02155  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02156  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02157  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02158  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02159  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02160  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02161  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02162  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02163  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02164  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02165  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02166  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02167  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02168  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02169  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02170  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02171  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02172  XUNDEF, XUNDEF, XUNDEF &
02173          /)
02174 !-------------------------------------------------------------------                                                    
02175 XDATA_GROUND_DEPTH(:,  7) = (/          &
02176  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02177  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02178  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02179  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, &
02180  XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, &
02181  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02182    2.00, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02183  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02184  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02185  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02186  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   2.00,   2.00,   2.00,   2.00, XUNDEF, &
02187    2.00, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02188    2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02189  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02190  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02191  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02192  XUNDEF,   1.50,   1.50,   1.50,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02193    2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02194  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   2.00,   2.00, &
02195    2.00,   1.50,   2.00,   2.00,   2.00,   1.50,   2.00,   1.50, XUNDEF, XUNDEF, &
02196  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02197  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02198  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02199  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02200  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02201  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02202  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02203  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02204  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02205  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02206  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02207    2.00,   2.00, XUNDEF,   2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00,   2.00, &
02208  XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF,   2.00,   2.00, &
02209    2.00, XUNDEF,   1.50, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF,   1.50,   1.50, &
02210    1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.50, &
02211    1.50, XUNDEF,   2.00,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50, &
02212    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, &
02213  XUNDEF,   1.50, XUNDEF,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50, &
02214    1.50,   1.50,   1.50,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, &
02215    1.50,   2.00,   2.00,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02216    1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02217    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50, &
02218    1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02219    1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02220  XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02221    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02222    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02223    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02224    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02225    2.00,   2.00,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02226    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02227    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02228    1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.50,   1.50, &
02229  XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02230  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02231  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02232    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02233    2.00,   2.00,   2.00 &
02234          /)
02235 !-------------------------------------------------------------------                                                    
02236 XDATA_GROUND_DEPTH(:,  8) = (/          &
02237  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02238  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02239  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02240  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, &
02241  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, &
02242  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF,   2.00, &
02243    2.00, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02244  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02245  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02246  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02247  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   2.00,   2.00,   2.00, XUNDEF,   2.00, &
02248    2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, &
02249  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02250  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02251  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02252  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02253  XUNDEF,   1.50,   1.50,   1.50,   2.00, XUNDEF, XUNDEF,   2.00,   2.00,   2.00, &
02254  XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02255  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02256  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02257  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02258  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02259  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02260  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02261  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02262  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02263  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02264  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02265  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02266  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02267  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02268  XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02269    2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00, XUNDEF,   2.00,   2.00,   2.00, &
02270    2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF,   1.50, XUNDEF, &
02271  XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02272  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF,   1.50, &
02273    1.50, XUNDEF,   1.50, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02274  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   1.50, XUNDEF,   1.50, &
02275    1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, &
02276    1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50, XUNDEF,   1.50,   1.50,   1.50, &
02277    1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02278    1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02279  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50, &
02280    1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02281  XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02282    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02283    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, &
02284    2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00,   1.50,   2.00,   2.00,   2.00, &
02285    2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00,   2.00, XUNDEF,   2.00,   2.00, &
02286  XUNDEF,   2.00,   2.00,   2.00,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, &
02287    1.50, XUNDEF,   1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50, &
02288  XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50, &
02289    1.50, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02290  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02291  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02292  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02293  XUNDEF,   2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00,   2.00, &
02294    2.00,   2.00,   2.00 &
02295          /)
02296 !-------------------------------------------------------------------                                                    
02297 WHERE(XDATA_VEGTYPE(:, 9)>0.) XDATA_GROUND_DEPTH(:,  9) = 2.00                            
02298 !-------------------------------------------------------------------                                                    
02299 XDATA_GROUND_DEPTH(:, 10) = (/          &
02300  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, &
02301  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02302  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02303  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02304    1.50, XUNDEF, XUNDEF, XUNDEF,   2.00,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02305  XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, &
02306  XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02307  XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF,   1.50,   1.50,   2.00,   1.00, &
02308  XUNDEF, XUNDEF,   1.50,   2.00,   1.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02309  XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   1.50,   1.50, &
02310    2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02311  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02312  XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02313  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02314  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02315  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF,   1.50, XUNDEF, XUNDEF, &
02316  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02317  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02318  XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02319  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, &
02320  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02321  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02322    2.00,   2.00,   2.00,   2.00,   1.00,   1.50,   1.50,   1.50,   1.50,   1.50, &
02323  XUNDEF, XUNDEF,   2.00,   2.00,   2.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02324    2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02325  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02326  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02327  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02328  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02329  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02330    1.50,   1.50,   1.50, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02331  XUNDEF,   1.50, XUNDEF,   1.50, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.50,   2.00, &
02332    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02333    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00, &
02334    2.00,   2.00,   2.00,   1.00,   1.00,   1.00,   1.50,   1.50,   1.50,   1.50, &
02335    2.00,   2.00,   2.00,   2.00,   2.00,   1.50,   1.50,   1.00,   1.00,   2.00, &
02336    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   1.50,   1.50,   1.00,   1.00, &
02337    1.00,   1.00,   1.00,   1.00,   1.00,   2.00,   2.00,   1.50,   1.50,   1.50, &
02338    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02339    1.50,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02340    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   1.00,   1.00, &
02341    1.00,   2.00,   2.00,   1.50,   1.00,   1.50,   1.50,   1.00,   1.00,   1.50, &
02342    1.50,   1.00,   1.00,   1.00,   1.50,   1.00,   1.00,   2.00,   2.00,   2.00, &
02343    2.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02344    1.00,   2.00, XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02345    2.00,   2.00,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02346    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   2.00,   2.00, &
02347    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   1.50,   1.50,   1.50,   2.00, &
02348    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02349    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02350    2.00,   2.00,   2.00,   2.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02351    1.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02352    2.00,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02353    1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, &
02354    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, &
02355  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00,   2.00, &
02356    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02357    2.00,   2.00, XUNDEF &
02358          /)
02359 !-------------------------------------------------------------------                                                    
02360 XDATA_GROUND_DEPTH(:, 11) = (/          &
02361  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, &
02362  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02363  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02364  XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00,   2.00, &
02365  XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   2.00, &
02366    2.00,   1.50,   1.50, XUNDEF, XUNDEF,   2.00, XUNDEF,   1.50, XUNDEF, XUNDEF, &
02367  XUNDEF,   1.50, XUNDEF, XUNDEF,   2.00,   2.00,   1.50,   1.50,   1.50,   1.50, &
02368    1.50,   1.50,   1.50, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.50, XUNDEF, XUNDEF, &
02369    1.50,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   2.00,   1.50,   2.00, &
02370    2.00, XUNDEF, XUNDEF,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02371  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02372  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02373  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02374  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02375  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02376  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02377  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02378  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02379  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02380  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02381  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02382  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02383  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02384  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02385  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02386  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02387  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02388  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02389  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02390  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02391  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02392  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02393  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, &
02394  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02395  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02396  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02397  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02398  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02399  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.50, XUNDEF, XUNDEF, &
02400  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02401  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02402  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, &
02403  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02404  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02405  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02406  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02407  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02408  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02409  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02410  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02411  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02412  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02413  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02414  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02415  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02416  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02417  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02418  XUNDEF, XUNDEF, XUNDEF &
02419          /)
02420 !-------------------------------------------------------------------                                                    
02421 XDATA_GROUND_DEPTH(:, 12) = (/          &
02422  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, &
02423  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02424  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02425  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02426  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02427  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02428  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02429  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02430  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02431  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02432  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02433  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02434  XUNDEF, XUNDEF, XUNDEF,   3.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02435  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02436  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02437    2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02438    2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02439  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02440  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02441  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02442  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02443  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02444  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02445  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00, &
02446  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02447  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02448  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02449  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02450  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02451  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02452    1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
02453    1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50,   1.50,   1.50, XUNDEF, &
02454  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02455  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02456  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
02457    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50, XUNDEF, &
02458  XUNDEF,   1.50, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02459  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02460    1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02461  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02462  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02463  XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02464  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02465  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02466  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02467    2.00, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, &
02468  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, XUNDEF, &
02469    2.00, XUNDEF, XUNDEF,   2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00, XUNDEF, &
02470  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00, XUNDEF, XUNDEF, &
02471  XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02472  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02473  XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF, XUNDEF, &
02474  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02475  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02476  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02477  XUNDEF,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02478    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF, XUNDEF, &
02479    2.00, XUNDEF, XUNDEF &
02480          /)
02481 !-------------------------------------------------------------------                                                    
02482 XDATA_DICE(:,  1) = (/          &
02483  XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.30, XUNDEF, &
02484  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02485  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02486  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.40, &
02487  XUNDEF, XUNDEF, XUNDEF,   0.40, XUNDEF, XUNDEF, XUNDEF,   0.50,   0.50, XUNDEF, &
02488    0.50, XUNDEF,   0.50, XUNDEF, XUNDEF,   0.50, XUNDEF,   0.50, XUNDEF, XUNDEF, &
02489  XUNDEF, XUNDEF, XUNDEF,   0.30, XUNDEF,   0.50,   0.50,   0.50,   0.50,   0.50, &
02490    0.50,   0.50,   0.50,   0.30,   0.40,   0.40,   0.30,   0.30,   0.50,   0.50, &
02491    0.50,   0.50,   0.40,   0.40,   0.30,   0.30,   0.40, XUNDEF, XUNDEF, XUNDEF, &
02492  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02493  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02494  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02495  XUNDEF, XUNDEF,   0.30, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02496  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02497  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02498  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF,   0.50, XUNDEF,   0.50, XUNDEF, &
02499  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02500  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   0.80,   1.00, XUNDEF, &
02501    0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02502  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02503  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02504  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, &
02505  XUNDEF, XUNDEF,   0.50, XUNDEF,   0.30,   0.50,   0.50, XUNDEF, XUNDEF,   0.50, &
02506    0.50,   0.50,   0.50,   0.50, XUNDEF,   0.50,   0.50, XUNDEF, XUNDEF, XUNDEF, &
02507  XUNDEF,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02508  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02509  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02510  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02511  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02512  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02513    0.25,   0.25, XUNDEF,   0.25,   0.25, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.25, &
02514    0.25,   0.30, XUNDEF,   0.30,   0.30,   0.30,   0.30,   0.30,   0.30, XUNDEF, &
02515  XUNDEF,   0.40,   0.40,   0.40,   0.40,   0.40,   0.50,   0.50,   0.50,   0.40, &
02516    0.40,   0.50,   0.50,   0.50,   1.00,   1.00,   1.00,   1.00,   1.00,   0.50, &
02517    0.50,   0.50,   0.50,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.40, &
02518    0.40,   0.40,   0.40, XUNDEF,   0.40,   0.50,   0.50,   0.50,   0.40,   0.40, &
02519    0.40,   0.40,   0.40,   0.40,   0.40,   0.40,   0.40,   0.40,   0.40,   0.40, &
02520    0.40,   0.40,   0.40,   0.40,   0.40,   0.50,   0.50,   0.50,   0.30,   0.40, &
02521    0.40,   0.50,   0.50,   0.50,   0.30,   0.40,   0.40,   0.40,   0.50,   0.50, &
02522    0.50,   0.40,   0.40,   1.00,   1.00,   0.50,   0.50,   0.50,   0.50,   0.50, &
02523    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
02524    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
02525    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
02526    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.25, &
02527    0.40,   0.40,   0.40,   0.40,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02528    0.80,   0.80,   0.40,   0.40,   0.40,   0.40,   0.40,   0.50,   0.40,   0.40, &
02529    0.30,   0.30,   0.30,   0.40,   0.40,   0.40,   0.80,   0.80,   0.80,   0.80, &
02530    0.80,   0.80,   0.80,   0.80,   0.80,   0.80,   0.50,   0.40,   0.40,   0.40, &
02531    0.40,   0.40,   0.40,   0.40,   0.40,   0.40,   0.40,   0.40,   0.40,   0.50, &
02532    0.40,   0.40,   0.40,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
02533    0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   1.00, &
02534    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02535    0.40,   0.50,   0.50,   0.50,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02536    1.00,   1.00, XUNDEF, XUNDEF,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
02537    0.50,   0.50,   0.50,   0.50,   0.50,   0.25,   0.25, XUNDEF, XUNDEF,   0.50, &
02538    0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02539    0.40,   0.40,   0.40,   0.40,   0.40,   0.30,   0.50,   0.50, XUNDEF,   0.50, &
02540    0.50,   1.00,   1.00 &
02541          /)
02542 !-------------------------------------------------------------------                                                    
02543 XDATA_DICE(:,  2) = (/          &
02544  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02545  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02546  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02547  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02548  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02549  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02550  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02551  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02552  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02553  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02554  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02555  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02556  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02557  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02558  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02559  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02560  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02561  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02562  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02563  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02564  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02565  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02566  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02567  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02568  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02569  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02570  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02571  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02572  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02573  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02574    0.25,   0.25, XUNDEF,   0.25,   0.25, XUNDEF,   0.25, XUNDEF,   0.25,   0.25, &
02575    0.25,   0.20, XUNDEF,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20, &
02576  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02577  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02578  XUNDEF, XUNDEF, XUNDEF,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.20, &
02579  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20,   0.20,   0.20,   0.20, XUNDEF, &
02580  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20, &
02581    0.20,   0.20,   0.20,   0.20,   0.20, XUNDEF,   0.20,   0.20, XUNDEF,   0.20, &
02582    0.20, XUNDEF,   0.20, XUNDEF, XUNDEF,   0.20,   0.20, XUNDEF, XUNDEF, XUNDEF, &
02583  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02584  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20,   0.20,   0.20,   0.20,   0.20, &
02585    0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20, &
02586    0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20, &
02587    0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20, XUNDEF, &
02588  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02589  XUNDEF, XUNDEF, XUNDEF,   0.20, XUNDEF, XUNDEF, XUNDEF,   0.20, XUNDEF, XUNDEF, &
02590  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20, XUNDEF, XUNDEF, &
02591  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02592  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02593  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20, &
02594  XUNDEF,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20, &
02595    0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20,   0.20, &
02596    0.20,   0.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20,   0.20, XUNDEF, &
02597  XUNDEF,   0.20,   0.20,   0.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20, &
02598    0.20,   0.20, XUNDEF,   0.20,   0.20,   0.25, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02599  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02600  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02601    0.20, XUNDEF, XUNDEF &
02602          /)
02603 !-------------------------------------------------------------------                                                    
02604 XDATA_DICE(:,  3) = (/          &
02605  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02606  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02607  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02608  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02609  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02610  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02611  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02612  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02613  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02614  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02615  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02616  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02617  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02618  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02619  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02620  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02621  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02622  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02623  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02624  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02625  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02626  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02627  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02628  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02629  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02630  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02631  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02632  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02633  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02634  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02635  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02636  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02637  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02638  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02639  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02640  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02641  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02642  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02643  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02644  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02645  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02646  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02647  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02648  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02649  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02650  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02651  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02652  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02653  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02654  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02655  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02656  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02657  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02658  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02659  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.25,   0.25, XUNDEF, XUNDEF, &
02660  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02661  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02662  XUNDEF, XUNDEF, XUNDEF &
02663          /)
02664 !-------------------------------------------------------------------                                                    
02665 XDATA_DICE(:,  4) = (/          &
02666  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.60,   2.00, XUNDEF, XUNDEF, &
02667  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02668  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   1.00,   3.00,   3.00,   2.00,   1.00, &
02669    0.30,   1.60,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.60, &
02670  XUNDEF, XUNDEF, XUNDEF,   2.40, XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00, XUNDEF, &
02671    3.00,   2.00,   2.00,   2.40, XUNDEF,   3.00, XUNDEF,   3.00, XUNDEF, XUNDEF, &
02672  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   4.00,   4.00,   4.00,   4.00, &
02673    4.00,   4.00,   4.00, XUNDEF, XUNDEF,   2.40, XUNDEF, XUNDEF,   3.00, XUNDEF, &
02674  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02675  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02676  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02677  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02678  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02679  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02680  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02681    1.60,   2.00,   1.60,   1.60, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.60, &
02682    1.60, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02683  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00,   2.40,   2.00,   1.60, &
02684    2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   1.60,   1.60, &
02685    1.60,   2.00,   1.60,   1.60,   1.60, XUNDEF, XUNDEF,   2.00,   2.00,   2.00, &
02686    2.00,   1.60,   1.60,   1.60,   1.60,   1.60,   1.60, XUNDEF, XUNDEF, XUNDEF, &
02687  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   1.60,   1.60,   1.60,   1.60, XUNDEF, &
02688  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, &
02689    2.00, XUNDEF,   2.00,   2.00,   1.60, XUNDEF, XUNDEF,   1.60, XUNDEF, XUNDEF, &
02690  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02691  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02692  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02693  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02694  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02695  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02696    0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25, &
02697    0.25,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.60, &
02698    1.60,   1.60,   1.60,   1.60,   1.60,   1.60, XUNDEF,   2.00,   2.00,   1.60, &
02699    1.60,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   1.50, &
02700    1.50,   1.50,   1.50,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   1.20, &
02701    1.60,   1.60,   1.60,   1.60, XUNDEF,   1.50,   1.50,   1.50,   1.20,   1.60, &
02702    1.60,   1.60,   1.60,   1.60,   1.60,   1.60,   1.60,   1.60,   1.20,   1.20, &
02703    1.20,   1.20,   1.20,   1.20,   1.20,   2.00,   2.00,   2.00,   1.00,   1.60, &
02704    1.60,   2.00,   1.50,   2.00,   1.00,   1.20,   1.20,   1.20,   1.50,   2.00, &
02705    2.00,   1.60,   1.60,   2.00,   2.00,   2.00,   2.00,   2.00,   1.50,   1.50, &
02706    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, &
02707    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50, &
02708    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   2.00,   2.00,   2.00, &
02709    2.00,   2.00, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02710  XUNDEF, XUNDEF,   1.60,   1.60,   3.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02711    1.60,   1.60,   2.40,   2.40,   1.60,   1.60,   1.60,   2.00,   1.60,   1.60, &
02712    1.00,   1.00,   1.00,   1.60,   1.60,   1.60,   1.60, XUNDEF,   1.60,   1.60, &
02713    1.60, XUNDEF, XUNDEF,   1.60,   1.60,   1.60,   2.00,   1.60, XUNDEF,   1.60, &
02714    1.60,   1.60, XUNDEF,   1.60,   1.60,   1.60,   1.60,   1.60,   1.60,   2.00, &
02715    1.60,   1.60,   1.60,   2.00, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50, &
02716    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   2.00, &
02717    2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00, &
02718    1.60,   2.00, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   3.00, XUNDEF, &
02719  XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02720  XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02721  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.60,   0.25,   1.00,   1.00,   1.60, &
02722    1.60,   1.60,   1.60,   1.60,   1.60,   1.00,   2.00,   2.00,   1.60,   2.00, &
02723    2.00,   3.00,   3.00 &
02724          /)
02725 !-------------------------------------------------------------------                                                    
02726 XDATA_DICE(:,  5) = (/          &
02727  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, &
02728    0.30,   1.60,   1.00,   1.60,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02729  XUNDEF, XUNDEF, XUNDEF,   0.30, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   1.00, &
02730    0.30,   1.60,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02731    0.30,   1.00,   1.60, XUNDEF,   1.00,   1.00,   1.60, XUNDEF, XUNDEF, XUNDEF, &
02732  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.60, XUNDEF, XUNDEF, XUNDEF,   0.30,   1.00, &
02733  XUNDEF, XUNDEF,   1.60,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02734  XUNDEF, XUNDEF, XUNDEF,   0.30,   1.60, XUNDEF,   0.30,   0.80, XUNDEF, XUNDEF, &
02735  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02736  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02737  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02738  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02739  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.30, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02740  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02741  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02742  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02743  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02744  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02745  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02746  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   1.60, XUNDEF, XUNDEF, XUNDEF, &
02747  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   1.60,   1.60, &
02748    1.60,   1.60,   1.60,   2.00,   2.00,   1.60,   1.60,   1.60,   1.60, XUNDEF, &
02749  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02750  XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.60, XUNDEF, &
02751  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02752  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02753  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02754  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02755  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02756  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02757    0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25, &
02758    0.25,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.60, &
02759    1.60,   1.60,   1.60,   1.60,   1.60,   1.60,   2.00,   2.00,   2.00,   1.60, &
02760    1.60,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   2.00,   1.50, &
02761    1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.25, XUNDEF, XUNDEF, &
02762    1.60,   1.60,   1.60,   1.60,   1.60,   1.50,   1.50, XUNDEF, XUNDEF,   1.60, &
02763    1.60,   1.60,   1.60,   1.60,   1.60,   1.60, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02764  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00,   2.00,   2.00, XUNDEF,   1.60, &
02765    1.60,   2.00,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02766    2.00, XUNDEF,   1.60,   2.00, XUNDEF,   2.00, XUNDEF,   2.00, XUNDEF,   1.50, &
02767    1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02768  XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02769    1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   2.00,   2.00,   2.00, &
02770    2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02771  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   2.00, XUNDEF,   2.00,   2.00, XUNDEF,   2.00, &
02772  XUNDEF,   1.60,   1.60,   1.60,   1.60,   1.60,   1.60,   2.00,   1.60,   1.60, &
02773    1.00,   1.00,   1.00,   1.60,   1.60,   1.60, XUNDEF, XUNDEF, XUNDEF,   1.60, &
02774  XUNDEF, XUNDEF, XUNDEF,   1.60, XUNDEF, XUNDEF,   2.00,   1.60,   1.60, XUNDEF, &
02775    1.60,   1.60, XUNDEF,   1.60,   1.60, XUNDEF,   1.60,   1.60,   1.60, XUNDEF, &
02776    1.60, XUNDEF, XUNDEF,   2.00, XUNDEF,   1.50,   1.50,   1.50,   1.50, XUNDEF, &
02777  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.50,   1.50,   2.00, &
02778    2.00,   2.00,   2.00,   2.00,   2.00, XUNDEF,   2.00,   2.00,   2.00,   2.00, &
02779  XUNDEF,   2.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF,   2.00, &
02780  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02781  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02782  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.60,   0.25,   1.00,   1.00,   1.60, &
02783    1.60,   1.60,   1.60,   1.60,   1.60,   1.00,   2.00,   2.00,   1.60,   2.00, &
02784    2.00, XUNDEF,   2.00 &
02785          /)
02786 !-------------------------------------------------------------------                                                    
02787 XDATA_DICE(:,  6) = (/          &
02788  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02789  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   8.00,   5.00,   8.00,   4.00,   5.00, &
02790    8.00,   4.00,   5.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02791  XUNDEF, XUNDEF, XUNDEF,   3.00,   3.00,   3.00,   3.00,   4.00,   3.00, XUNDEF, &
02792  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   3.00, &
02793  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   5.00, XUNDEF, XUNDEF, XUNDEF, &
02794    2.40,   3.00, XUNDEF, XUNDEF,   3.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02795  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02796  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02797  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02798  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02799  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02800  XUNDEF, XUNDEF, XUNDEF,   5.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02801  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02802  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02803  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02804  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02805  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02806  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02807  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02808  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02809  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02810  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02811  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02812  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02813  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02814  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02815  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02816  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02817  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02818  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02819  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02820  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02821  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02822  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02823  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02824  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02825  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02826  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02827  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02828  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02829  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02830  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02831  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02832  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02833  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02834  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02835  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02836  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02837  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02838  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02839  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02840  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02841  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02842  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02843  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02844  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02845  XUNDEF, XUNDEF, XUNDEF &
02846          /)
02847 !-------------------------------------------------------------------                                                    
02848 XDATA_DICE(:,  7) = (/          &
02849  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02850  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02851  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02852  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF, XUNDEF, &
02853  XUNDEF,   0.80,   1.20, XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF, XUNDEF, XUNDEF, &
02854  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.80, &
02855    1.20, XUNDEF,   1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02856  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02857  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02858  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02859  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.50,   1.50,   1.50,   1.50, XUNDEF, &
02860    1.20, XUNDEF,   1.20,   1.20,   1.20,   1.20,   1.20,   0.80,   1.20,   1.50, &
02861    1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02862  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02863  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02864  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02865  XUNDEF,   1.00,   1.00,   1.00,   1.50,   1.20,   1.50,   1.20,   1.20,   1.20, &
02866    1.20,   1.20,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02867  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00,   1.20,   1.20, &
02868    1.20,   1.00,   1.20,   1.20,   1.20,   1.00,   1.20,   1.00, XUNDEF, XUNDEF, &
02869  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02870  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02871  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02872  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02873  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02874  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02875  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02876  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02877  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02878  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02879  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.25, &
02880    0.25,   0.60, XUNDEF,   0.60,   0.60, XUNDEF,   0.60,   0.60,   0.60,   1.20, &
02881  XUNDEF,   1.20,   1.20,   1.20,   1.20,   1.20, XUNDEF, XUNDEF,   1.50,   1.20, &
02882    1.20, XUNDEF,   1.00, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF,   1.00,   1.00, &
02883    1.00,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.25, XUNDEF,   0.80, &
02884    0.80, XUNDEF,   1.20,   0.80, XUNDEF,   1.00,   1.00,   1.00,   0.80,   0.80, &
02885    1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20, XUNDEF, XUNDEF, XUNDEF, &
02886  XUNDEF,   0.80, XUNDEF,   0.80, XUNDEF,   1.00,   1.00,   1.00,   0.40,   0.80, &
02887    0.80,   1.00,   1.00,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, &
02888    1.00,   1.20,   1.20,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02889    1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02890    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00, &
02891    1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02892    1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02893  XUNDEF,   1.20,   1.20,   1.20,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02894    1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.50,   1.20,   1.20, &
02895    0.60,   0.60,   0.60,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20, &
02896    1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.50,   1.20,   1.20,   1.20, &
02897    1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.50, &
02898    1.20,   1.20,   0.80,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02899    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02900    1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
02901    0.80,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF,   1.00,   1.00, &
02902  XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02903  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02904  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.80, XUNDEF, XUNDEF, XUNDEF,   1.20, &
02905    1.20,   1.20,   1.20,   1.20,   1.20,   0.60,   1.50,   1.50,   1.20,   1.50, &
02906    1.50,   1.50,   1.50 &
02907          /)
02908 !-------------------------------------------------------------------                                                    
02909 XDATA_DICE(:,  8) = (/          &
02910  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02911  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02912  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02913  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF, XUNDEF, &
02914  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF, XUNDEF, XUNDEF, &
02915  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF,   0.80, &
02916    1.20, XUNDEF,   1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02917  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02918  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02919  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02920  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.50,   1.50,   1.50, XUNDEF,   1.50, &
02921    1.20,   1.50, XUNDEF,   1.20,   1.20,   1.20,   1.20,   0.80,   1.20, XUNDEF, &
02922  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02923  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02924  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02925  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02926  XUNDEF,   1.00,   1.00,   1.00,   1.50, XUNDEF, XUNDEF,   1.20,   1.20,   1.20, &
02927  XUNDEF,   1.20,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02928  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02929  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02930  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02931  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02932  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02933  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02934  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02935  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02936  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02937  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02938  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02939  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02940  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02941  XUNDEF, XUNDEF, XUNDEF,   0.60, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, &
02942    1.20,   1.20,   1.20,   1.20, XUNDEF,   1.20, XUNDEF,   1.50,   1.50,   1.20, &
02943    1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF,   1.00, XUNDEF, &
02944  XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02945  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF, XUNDEF,   0.80, &
02946    0.80, XUNDEF,   0.80, XUNDEF,   0.80,   0.80, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02947  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00,   1.00, XUNDEF,   0.80, &
02948    0.80,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, &
02949    1.00,   0.80,   0.80,   1.00, XUNDEF,   1.00, XUNDEF,   1.00,   1.00,   1.00, &
02950    1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02951    1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02952  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00, &
02953    1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02954  XUNDEF,   1.20,   1.20,   1.20,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02955    1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.50,   1.20,   1.20, &
02956    0.60,   0.60,   0.60,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20, XUNDEF, &
02957    1.20,   1.20, XUNDEF,   1.20,   1.20,   1.20,   1.00,   1.20,   1.20,   1.20, &
02958    1.20,   1.20,   1.20,   1.20, XUNDEF,   1.20,   1.20, XUNDEF,   1.20,   1.50, &
02959  XUNDEF,   1.20,   1.20,   1.50,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF, &
02960    1.00, XUNDEF,   1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00, &
02961  XUNDEF,   1.00,   1.00,   1.00,   1.00,   1.00, XUNDEF,   1.00,   1.00,   1.00, &
02962    0.80, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
02963  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02964  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02965  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02966  XUNDEF,   1.20,   1.20,   1.20,   1.20, XUNDEF,   1.50,   1.50,   1.20,   1.50, &
02967    1.50,   1.50,   1.50 &
02968          /)
02969 !-------------------------------------------------------------------                                                    
02970 XDATA_DICE(:,  9) = (/          &
02971  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02972  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02973  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02974  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02975  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02976  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02977  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02978  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02979  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02980  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02981  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02982  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02983  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02984  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02985  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02986  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02987  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02988  XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02989  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02990  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02991  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02992  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02993  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02994  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02995  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02996  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02997  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02998  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
02999  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03000  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03001  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03002  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03003  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03004  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF,   1.50, XUNDEF, &
03005  XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03006  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03007  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03008  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, &
03009  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03010  XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
03011    1.50, XUNDEF, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03012    1.50, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03013  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03014  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03015  XUNDEF, XUNDEF,   1.20,   1.20,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
03016    1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, &
03017  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03018  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.20, XUNDEF,   1.20, &
03019  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03020  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   1.50, XUNDEF, XUNDEF, &
03021  XUNDEF,   1.50, XUNDEF,   1.50, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50, &
03022    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
03023  XUNDEF, XUNDEF,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
03024    1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03025  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03026  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03027  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF,   1.50,   1.50, XUNDEF, XUNDEF, &
03028    1.50, XUNDEF, XUNDEF &
03029          /)
03030 !-------------------------------------------------------------------                                                    
03031 XDATA_DICE(:, 10) = (/          &
03032  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.30, XUNDEF, &
03033  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03034  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03035  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03036    0.30, XUNDEF, XUNDEF, XUNDEF,   0.80,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03037  XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.30, XUNDEF, &
03038  XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03039  XUNDEF, XUNDEF, XUNDEF,   0.30,   0.80, XUNDEF,   0.30,   0.50,   1.50,   0.50, &
03040  XUNDEF, XUNDEF,   0.80,   1.20,   0.30,   0.30, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03041  XUNDEF,   1.50,   1.20, XUNDEF, XUNDEF, XUNDEF,   1.20,   0.30,   0.80,   0.30, &
03042    1.20,   1.20,   0.80,   1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03043  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03044  XUNDEF, XUNDEF,   0.30, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03045  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03046  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03047  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF,   0.80, XUNDEF, XUNDEF, &
03048  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03049  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, &
03050  XUNDEF,   1.20,   1.20,   1.20,   1.20,   1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03051  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, &
03052  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03053  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
03054    1.20,   1.20,   1.50,   1.20,   0.30,   1.00,   1.00,   0.80,   0.80,   1.00, &
03055  XUNDEF, XUNDEF,   1.50,   1.50,   1.20,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03056    1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03057  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03058  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03059  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03060  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03061  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03062    0.25,   0.25,   0.25, XUNDEF,   0.25, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03063  XUNDEF,   0.40, XUNDEF,   0.40, XUNDEF, XUNDEF,   0.40, XUNDEF,   0.40,   1.20, &
03064    1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.50,   1.50,   1.50,   1.20, &
03065    1.20,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50, &
03066    1.50,   1.50,   1.50,   0.25,   0.25,   0.25,   0.25,   0.25,   0.25,   0.80, &
03067    1.20,   1.20,   1.20,   1.20,   1.20,   1.00,   1.00,   0.50,   0.40,   1.20, &
03068    1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   0.80,   0.80,   0.40,   0.40, &
03069    0.40,   0.40,   0.40,   0.40,   0.40,   1.50,   1.50,   1.00,   0.40,   0.80, &
03070    0.80,   1.00,   1.00,   1.00,   0.40,   0.80,   0.80,   0.80,   1.00,   1.00, &
03071    1.00,   1.20,   1.20,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
03072    1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   0.50,   0.50, &
03073    0.50,   1.50,   1.50,   1.00,   0.50,   1.00,   1.00,   0.50,   0.50,   1.00, &
03074    1.00,   0.50,   0.50,   0.50,   1.00,   0.50,   0.50,   1.50,   1.50,   1.50, &
03075    1.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.25, &
03076    0.40,   1.20, XUNDEF,   1.20,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
03077    1.20,   1.20,   0.80,   0.80,   0.80,   0.80,   0.80,   1.00,   0.80,   0.80, &
03078    0.40,   0.40,   0.40,   0.80,   0.80,   0.80,   0.80,   0.80,   1.20,   1.20, &
03079    1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.00,   0.80,   0.80,   1.20, &
03080    1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.20,   1.50, &
03081    1.20,   1.20,   1.20,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
03082    1.50,   1.50,   1.50,   1.50,   0.50,   0.50,   0.50,   0.50,   0.50,   0.50, &
03083    0.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50,   1.50, &
03084    1.20,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00,   1.00, &
03085    1.00,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, &
03086    0.50,   0.50,   0.50,   0.50,   0.50,   0.25,   0.25, XUNDEF, XUNDEF, XUNDEF, &
03087  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.25,   0.60,   0.60,   1.20, &
03088    1.20,   1.20,   1.20,   1.20,   1.20,   0.60,   1.50,   1.50,   1.20,   1.50, &
03089    1.50,   1.50, XUNDEF &
03090          /)
03091 !-------------------------------------------------------------------                                                    
03092 XDATA_DICE(:, 11) = (/          &
03093  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, &
03094  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03095  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03096  XUNDEF, XUNDEF, XUNDEF,   1.50,   1.50,   1.50,   1.50, XUNDEF,   1.50,   1.20, &
03097  XUNDEF, XUNDEF, XUNDEF,   1.20, XUNDEF, XUNDEF, XUNDEF,   1.00,   1.00,   1.50, &
03098    1.50,   1.00,   1.00, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.00, XUNDEF, XUNDEF, &
03099  XUNDEF,   1.00, XUNDEF, XUNDEF,   1.50,   1.50,   1.00,   1.00,   1.00,   1.00, &
03100    1.00,   1.00,   1.00, XUNDEF, XUNDEF,   0.80, XUNDEF,   0.50, XUNDEF, XUNDEF, &
03101    1.00,   0.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.40,   1.50,   1.00,   1.50, &
03102    1.50, XUNDEF, XUNDEF,   1.20,   1.50,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03103  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03104  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03105  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03106  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03107  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03108  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03109  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03110  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03111  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03112  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03113  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03114  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03115  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03116  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03117  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03118  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03119  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03120  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03121  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03122  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03123  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03124  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03125  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, &
03126  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03127  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03128  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03129  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03130  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03131  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.80, XUNDEF,   0.80, XUNDEF, XUNDEF, &
03132  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03133  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03134  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.50, XUNDEF, &
03135  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03136  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03137  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03138  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03139  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03140  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03141  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03142  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03143  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03144  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03145  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03146  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03147  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03148  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03149  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03150  XUNDEF, XUNDEF, XUNDEF &
03151          /)
03152 !-------------------------------------------------------------------                                                    
03153 XDATA_DICE(:, 12) = (/          &
03154  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.80, XUNDEF, XUNDEF, XUNDEF, &
03155  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03156  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03157  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03158  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03159  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03160  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03161  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03162  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03163  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03164  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03165  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03166  XUNDEF, XUNDEF, XUNDEF,   3.00,   0.30, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03167  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03168  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03169    1.20,   1.50,   1.20,   1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20, &
03170    1.20, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03171  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03172  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03173  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03174  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03175  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03176  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03177  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.60,   1.60,   1.20, &
03178  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03179  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03180  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03181  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03182  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03183  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03184    0.25,   0.25, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.25, &
03185    0.25,   0.40,   0.40,   0.40,   0.40, XUNDEF,   0.40,   0.40,   0.40, XUNDEF, &
03186  XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.80, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.60, &
03187  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03188  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   0.80, &
03189    0.80,   0.80,   0.80,   0.80,   0.80,   1.00,   1.00, XUNDEF,   0.80, XUNDEF, &
03190  XUNDEF,   0.80, XUNDEF,   0.80,   0.80, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03191  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.00, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03192    0.80, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03193  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03194  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03195  XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03196  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03197  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03198  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03199    1.20, XUNDEF, XUNDEF,   1.20, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, &
03200  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20,   1.20, XUNDEF, XUNDEF, XUNDEF, &
03201    1.20, XUNDEF, XUNDEF,   1.20,   1.20, XUNDEF,   1.50,   1.20,   1.20, XUNDEF, &
03202  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.20,   1.20, XUNDEF, XUNDEF, &
03203  XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03204  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03205  XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, XUNDEF, XUNDEF, &
03206  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
03207  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, &
03208  XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF, XUNDEF,   1.50, &
03209  XUNDEF,   0.25,   1.50,   1.20,   1.20,   1.60,   0.25,   1.00,   1.00,   1.60, &
03210    1.20,   1.20,   1.20,   1.20,   1.20,   0.60,   1.50,   1.50, XUNDEF, XUNDEF, &
03211    1.50, XUNDEF, XUNDEF &
03212          /)
03213 !-------------------------------------------------------------------                                                    
03214 WHERE(XDATA_VEGTYPE(:, 9)>0.        ) TDATA_SEED(:,  9)%TDATE%DAY =10
03215 !-------------------------------------------------------------------                                                    
03216 WHERE(XDATA_VEGTYPE(:, 9)>0.        ) TDATA_SEED(:,  9)%TDATE%MONTH =05
03217 !-------------------------------------------------------------------                                                    
03218 WHERE(XDATA_VEGTYPE(:, 9)>0.        ) TDATA_REAP(:,  9)%TDATE%DAY =01
03219 !-------------------------------------------------------------------                                                    
03220 WHERE(XDATA_VEGTYPE(:, 9)>0.        ) TDATA_REAP(:,  9)%TDATE%MONTH =08
03221 !-------------------------------------------------------------------                                                    
03222 END SUBROUTINE DEFAULT_DATA_COVER_2