sets: p/1..4/:path; CITIES /1..10/: F; ROADS( CITIES, CITIES)/ 1,2 1,3 1,4 2,5 2,6 2,7 3,5 3,6 3,7 4,5 4,6 5,8 5,9 6,8 6,9 7,8 7,9 8,10 9,10/: D; ! D( i, j) is the distance from city i to j; ENDSETS DATA: ! Here are the distances that correspond to the above links; D = 1 5 2 13 12 11 6 10 4 12 14 3 9 6 5 8 10 5 2; @text('c:\zms')=d; @text('c:\zms1')=f; ENDDATA 

F( @SIZE( CITIES)) = 0; @FOR( CITIES( i)| i #LT# @SIZE( CITIES): F( i) = @MIN( ROADS( i, j): D( i, j) + F( j))); END