* Stern results

Put / "Run with Stern double discounting";
Put / "year";
Loop (tearly, put year(tearly)::0);
Put / "output";
Loop (tearly, put stern_y(tearly)::3);
Put / "pccon";
Loop (tearly, put stern_cpc(tearly)::3);
Put / "savrate";
Loop (tearly, put stern_s(tearly)::4);
Put / "indem";
Loop (tearly, put stern_indem(tearly)::4);
Put / "sigma";
Loop (tearly, put stern_sigma(tearly)::4);
Put / "temp";
Loop (tearly, put stern_tatm(tearly)::3);
Put / "conc";
Loop (tearly, put stern_mat(tearly)::3);
Put / "soc cost carbon";
Loop (tearly, put stern_tax(tearly)::2);
Put / "intrate";
Loop (tearly, put stern_ri(tearly)::3);
Put / "discrate";
Loop (tearly, put stern_rr(tearly)::5);
Put / "prod";
Loop (tearly, put stern_al(tearly)::5);
Put / "exogforc";
Loop (tearly, put stern_forcoth(tearly)::3);
Put / "pop";
Loop (tearly, put stern_l(tearly)::3);
Put / "carbon tax";
Loop (tearly, put stern_mcemis(tearly)::4);
Put / "margy";
Loop (tearly, put stern_yy(tearly)::3);
Put / "margc";
Loop (tearly, put stern_cc(tearly)::3);
Put / "miu";
Loop (tearly, put stern_miu(tearly)::3);
Put / "total emissions";
Loop (tearly, put stern_wem(tearly)::3);
Put / "interest rate";
Loop (tearly, put stern_ri(tearly)::4);
Put / "damages";
Loop (tearly, put stern_dam(tearly)::5);
Put / "abatement cost";
Loop (tearly, put stern_abate(tearly)::5);
Put /"objective function";
Put stern_utility::3;