param NProd := 6; param NBlck := 1; param T := 15; param C default 728; param RHO : 1 := 1 0.50 2 0.70 3 0.90 4 1.10 5 1.30 6 1.50 ; param H := 1 5.00 2 5.00 3 1.00 4 3.00 5 2.00 6 1.00 ; param ST : 1 := 1 40. 2 20. 3 20. 4 20. 5 40. 6 50. ; param F := 1 800. 2 800. 3 600. 4 400. 5 400. 6 800. ; param DEM (tr) : 1 2 3 4 5 6 := 1 119 85 0 102 84 89 2 76 0 77 101 111 0 3 116 95 124 92 87 0 4 102 0 106 0 94 83 5 109 101 79 118 91 86 6 100 120 123 108 90 118 7 93 99 107 95 111 108 8 98 120 85 78 106 83 9 93 114 98 108 117 79 10 118 94 105 84 105 80 11 83 78 119 111 91 99 12 122 91 98 121 97 92 13 77 86 125 122 107 98 14 123 104 114 102 83 78 15 125 97 109 80 103 95 ; end;