* ecu2019tfp-data2.inc



DISPLAY "#### START: ecu2019tfp-sim.inc";    


capest=2;

toreal=2;

* start: define additional sets for land use




* land01 signals if land use data is empty or not 
$SETGLOBAL land01 



$ONMULTI

SET
  lnd 
  /
fortot  
fornprod
forplant
agrtot
crops
livestock
  /
  
  lndfortot
  /
fortot  
  /
  
  lndfornprod
  /
fornprod  
  /
  
  lndforplant
  /
forplant  
  /
  
  lndagrtot
  /
agrtot  
  /
  
  lndcro
  /
crops  
  /
  
  lndliv  
  /
livestock  
  /

mfforlndforplant
  /
f-nrfor.forplant
  /

mlndfornprodlndforplant
  /
fornprod.forplant
  /

mlndfornprodlndfortot
  /
fornprod.fortot
  /

mlndforplantlndfortot
  /
forplant.fortot
  /

mflandlndcro
  /
f-land.crops
  /

mflandlndliv
  /
f-nrlivestock.livestock
  /

mlndcrolndagrtot
  /
crops.agrtot
  /

mlndlivlndagrtot
  /
livestock.agrtot
  /

mflandlndfortot
  /
f-land.fortot
f-nrlivestock.fortot

  /
;  



$ONTEXT
$LOADDC lnd
$LOADDC lndfortot
$LOADDC lndfornprod
$LOADDC lndforplant
$LOADDC lndagrtot
$LOADDC lndcro
$LOADDC lndliv
$LOADDC mfforlndforplant
$LOADDC mlndfornprodlndforplant
$LOADDC mlndfornprodlndfortot
$LOADDC mlndforplantlndfortot
$LOADDC mflandlndcro
$LOADDC mflandlndliv
$LOADDC mlndcrolndagrtot
$LOADDC mlndlivlndagrtot
$LOADDC mflandlndfortot
$OFFTEXT

$LOADDC qfor0

$OFFMULTI

deforelas(lndfortot) = 0;

* end: define additional sets for land use





DISPLAY "#### END: ecu2019tfp-sim.inc";    
