############################################################
#  Max Cut with randomly generated edges (p=0.5).

param eps := 1.0e-4;

param n := 15;
param m := 15;

for {k in M} {
    let A[k,k,k] := 1;
    let b[k] := 1/4;
}

for {i in 1..n, j in i+1..n} {
    if Uniform01() > 0.1 then {
	let C[i,j] := 1;
    } else {
	let C[i,j] := 0;
    }
}
for {i in 1..n} {
    let C[i,i] := - sum {j in 1..n: j>i} C[i,j]
		  - sum {j in 1..n: j<i} C[j,i]
    ;
}

display C;