* n = 20, 40, 60, 100 
$set n 60
set job /1*%n%/;
set k /p1*p%n%/;
set times /release,duration,due/;
option seed = 101;
* L = 0.5, 0.7, R = 0.4, 0.8, 1.4
scalar P, L /0.5/, R /0.4/, Q /0.4/;
parameter data(times,job);
* data('duration',job) = uniformint(1,100);
data('duration',job) = uniformint(1,10);
* should sort these times
P = sum(job, data('duration',job));
data('due',job) = uniformint(floor(P*(L-R/2)),ceil(P*(L+R/2)));
data('release',job) = uniformint(0,ceil(Q*P));

execute_unload "scheddata.gdx" job, times, data, k;