### Rämö Janne ###
# Bollandsås et al. (2008) kasvumalli #

reset;
model norwaysp.mod.txt; 
data norwaysp.dat.txt;
option solver knitroampl;
option display_1col 10;
option knitro_options "maxit=3000 opttol=1.0e-6 ms_enable=1 ms_maxsolves=4 outlev=2 xtol=1.0e-20";

let i:=0;

repeat while i<=maxt {
  let Hbool[i] := 1;
  let i:=i+(5*s);
  }

let i:=0;
  
solve;

display s, pl, r, maxt, SI;

option display_1col 0;
close;