set sources := NZ WA MI;
set factories := StPaul Seattle Sacramento Chattanooga Buffalo;
set demandcenters := Dallas SaltLake Toronto KansasCity Fresno Birmingham Philadelphia;

set raw := apples wheat;
set finished := namebrand generic;

set finarcs :=
StPaul Dallas
StPaul SaltLake
StPaul Toronto
StPaul KansasCity
StPaul Birmingham
Seattle SaltLake
Seattle KansasCity
Seattle Fresno
Sacramento KansasCity
Sacramento Fresno
Sacramento SaltLake
Sacramento Dallas
Chattanooga Dallas
Chattanooga KansasCity
Chattanooga Birmingham
Chattanooga Philadelphia
Buffalo Toronto
Buffalo Birmingham
Buffalo Philadelphia;

param: rawarcs: rawarctime :=
NZ StPaul 1 NZ Seattle 1 NZ Sacramento 1 NZ Chattanooga 1 NZ Buffalo 1
WA StPaul 0 WA Seattle 0 WA Sacramento 0
MI StPaul 0 MI Chattanooga 0 MI Buffalo 0;

param T := 6;

param rawarccost :=
[apples, *, *]
NZ StPaul 300 NZ Seattle 300 NZ Sacramento 300 NZ Chattanooga 300 NZ Buffalo 300
WA StPaul 100 WA Seattle 100 WA Sacramento 100
MI StPaul 100 MI Chattanooga 100 MI Buffalo 100
[wheat, *, *]
NZ StPaul 300 NZ Seattle 300 NZ Sacramento 300 NZ Chattanooga 400 NZ Buffalo 300
WA StPaul 100 WA Seattle 100 WA Sacramento 100
MI StPaul 100 MI Chattanooga 100 MI Buffalo 100;

param finarccost :=
[namebrand, *, *]
StPaul Dallas 7
StPaul SaltLake 6
StPaul Toronto 5
StPaul KansasCity 6
StPaul Birmingham 8
Seattle SaltLake 8
Seattle KansasCity 7
Seattle Fresno 7
Sacramento Dallas 7
Sacramento SaltLake 7
Sacramento KansasCity 7
Sacramento Fresno 6
Chattanooga Dallas 8
Chattanooga KansasCity 7
Chattanooga Birmingham 6
Chattanooga Philadelphia 7
Buffalo Toronto 7
Buffalo Birmingham 6
Buffalo Philadelphia 7
[generic, *, *]
StPaul Dallas 4
StPaul SaltLake 3
StPaul Toronto 3
StPaul KansasCity 3
StPaul Birmingham 5
Seattle SaltLake 4
Seattle KansasCity 4
Seattle Fresno 4
Sacramento Dallas 4
Sacramento SaltLake 4
Sacramento KansasCity 4
Sacramento Fresno 3
Chattanooga Dallas 4
Chattanooga KansasCity 4
Chattanooga Birmingham 3
Chattanooga Philadelphia 4
Buffalo Toronto 4
Buffalo Birmingham 3
Buffalo Philadelphia 4
;

param rawsourcecost :=
apples NZ 200
apples WA 400
apples MI 500
wheat NZ 0
wheat WA 200
wheat MI 200
;
param rawsourcesupply :=
apples NZ 280
apples WA 250
apples MI 210
wheat NZ 0
wheat WA 250
wheat MI 340
;

param demand :=
[namebrand,*,*]
Dallas 1 2000
Dallas 2 1000
Dallas 3 1000
Dallas 4 1500
Dallas 5 1500
Dallas 6 1000
SaltLake 1 3000
SaltLake 2 3000
SaltLake 3 3000
SaltLake 4 3500
SaltLake 5 3500
SaltLake 6 3000
Toronto 1 2000
Toronto 2 2000
Toronto 3 2000
Toronto 4 2500
Toronto 5 2500
Toronto 6 2000
KansasCity 1 3500
KansasCity 2 4500
KansasCity 3 2500
KansasCity 4 3000
KansasCity 5 3000
KansasCity 6 3500
Fresno 1 1000
Fresno 2 2000
Fresno 3 2000
Fresno 4 1500
Fresno 5 2500
Fresno 6 1000
Birmingham 1 4000
Birmingham 2 4000
Birmingham 3 2000
Birmingham 4 1500
Birmingham 5 2500
Birmingham 6 4000
Philadelphia 1 2000
Philadelphia 2 3000
Philadelphia 3 2000
Philadelphia 4 2500
Philadelphia 5 3500
Philadelphia 6 3000
[generic,*,*]
Dallas 1 5000
Dallas 2 4000
Dallas 3 6000
Dallas 4 5500
Dallas 5 4500
Dallas 6 5000
SaltLake 1 3000
SaltLake 2 3000
SaltLake 3 3000
SaltLake 4 3500
SaltLake 5 3500
SaltLake 6 3000
Toronto 1 2000
Toronto 2 2000
Toronto 3 2000
Toronto 4 2500
Toronto 5 2500
Toronto 6 2000
KansasCity 1 5500
KansasCity 2 4500
KansasCity 3 6500
KansasCity 4 5000
KansasCity 5 4000
KansasCity 6 5500
Fresno 1 1000
Fresno 2 2000
Fresno 3 2000
Fresno 4 1500
Fresno 5 2500
Fresno 6 1000
Birmingham 1 4000
Birmingham 2 4000
Birmingham 3 2000
Birmingham 4 4500
Birmingham 5 2500
Birmingham 6 4000
Philadelphia 1 2000
Philadelphia 2 3000
Philadelphia 3 4000
Philadelphia 4 3500
Philadelphia 5 3500
Philadelphia 6 3000
;

param findcvalue :=
[namebrand, *]
Dallas 37 SaltLake 37 Toronto 37 KansasCity 37 Fresno 37 Birmingham 37 Philadelphia 37
[generic, *]
Dallas 16 SaltLake 16 Toronto 16 KansasCity 16 Fresno 16 Birmingham 16 Philadelphia 16
;

param findccost :=
[namebrand, *]
Dallas 5 SaltLake 5 Toronto 5 KansasCity 5 Fresno 5 Birmingham 5 Philadelphia 5
[generic, *]
Dallas 3 SaltLake 3 Toronto 3 KansasCity 3 Fresno 3 Birmingham 3 Philadelphia 3
;

param manucombine :=
apples namebrand 40   apples generic 100
wheat namebrand 60    wheat generic  100
;

param manucost :=
namebrand StPaul 0
namebrand Seattle 0
namebrand Sacramento 0
namebrand Chattanooga 0
namebrand Buffalo 0
generic StPaul 0
generic Seattle 0
generic Sacramento 0
generic Chattanooga 0
generic Buffalo 0
;

param rawfactor :=
apples 1
wheat 1
;
param faccap :=
StPaul 260
Seattle 200
Sacramento 240
Chattanooga 240
Buffalo 200
;

param safetyfac :=
[apples, *]
StPaul 20 Seattle 15 Sacramento 20 Chattanooga 10 Buffalo 15
[wheat, *]
StPaul 20 Seattle 15 Sacramento 20 Chattanooga 10 Buffalo 15
;

param safetydc :=
[*, Dallas]
namebrand 0 generic 0
[*, SaltLake]
namebrand 0 generic 0
[*, Toronto]
namebrand 0 generic 0
[*, KansasCity]
namebrand 0 generic 0
[*, Fresno]
namebrand 0 generic 0
[*, Birmingham]
namebrand 0 generic 0
[*, Philadelphia]
namebrand 0 generic 0
;

param invcostrawfac :=
[apples, *]
StPaul 10 Seattle 10 Sacramento 10 Chattanooga 10 Buffalo 10
[wheat, *]
StPaul 10 Seattle 10 Sacramento 10 Chattanooga 10 Buffalo 10
;

param invcostfinfac :=
[namebrand, *]
StPaul 0.2 Seattle 0.2 Sacramento 0.2 Chattanooga 0.2 Buffalo 0.2
[generic, *]
StPaul 0.1 Seattle 0.1 Sacramento 0.1 Chattanooga 0.1 Buffalo 0.1
;

param invcostfindc :=
[namebrand, *]
Dallas 0.2 SaltLake 0.2 Toronto 0.2 KansasCity 0.2 Fresno 0.2 Birmingham 0.2 Philadelphia 0.2
[generic, *]
Dallas 0.1 SaltLake 0.1 Toronto 0.1 KansasCity 0.1 Fresno 0.1 Birmingham 0.1 Philadelphia 0.1
;

param initialraw :=
[apples, *]
StPaul 95 Seattle 60 Sacramento 90 Chattanooga 90 Buffalo 65
[wheat, *]
StPaul 70 Seattle 45 Sacramento 50 Chattanooga 60 Buffalo 45 ;

param initialfin :=
[*, Dallas]
namebrand 2000 generic 5000
[*, SaltLake]
namebrand 3000 generic 3000
[*, Toronto]
namebrand 2000 generic 2000
[*, KansasCity]
namebrand 3500 generic 5500
[*, Fresno]
namebrand 1000 generic 1000
[*, Birmingham]
namebrand 4000 generic 4000
[*, Philadelphia]
namebrand 2000 generic 2000
;