ampl data: solve;
MINOS 5.4: optimal solution found.
3 iterations, objective 13.48314607

ampl: display X;
X :=
m1 p1   0.842697
m1 p2   0
m1 p3   0.157303
m2 p1   0
m2 p2   0.674157
m2 p3   0.325843

ampl: display P;
P [*] :=
p1  6.74157
p2  3.37079
p3  3.37079