set C := Wheat Corn Beans;

set S := 1 2 3;
param p := 
1 0.333333
2 0.333333
3 0.333333 ;

param x := 
Wheat 100
Corn 25
Beans 375 ;

param Yield := 
Wheat 1 2
Corn 1 2.4
Beans 1 16
Wheat 2 2.5
Corn 2 3
Beans 2 20
Wheat 3 3
Corn 3 3.6
Beans 3 24 ;

param:    PlantingCost SalePrice :=
   Wheat       150         170
   Corn        230         150
   Beans       260          36 ;

param: MaxAtGoodPrice LowSalePrice :=
   Beans 6000 10;

param: PurchasePrice MinReq :=
   Wheat 238 200
   Corn  210 240 ;

param TotalAcres := 500;