data; param I := 15; param J := 10; param d := 5.3; param p := 2; param q := 2; param Obstacle : 1 2 3 4 5 6 7 8 9 10 := 1 0 0 0 0 0 1 1 1 1 1 2 0 0 0 0 0 1 1 1 1 1 3 0 0 0 0 0 1 1 0 0 0 4 0 0 1 1 1 1 1 0 0 0 5 0 0 1 1 1 1 1 0 0 0 6 0 0 0 0 0 1 1 0 0 0 7 0 0 0 0 0 1 1 1 0 0 8 0 0 0 0 0 1 1 1 0 0 9 0 0 0 0 0 1 1 1 0 0 10 0 0 0 0 0 0 0 0 0 0 11 0 1 1 1 1 1 1 1 0 0 12 0 1 1 0 0 0 0 1 0 0 13 0 1 1 0 0 0 0 1 0 0 14 0 1 1 1 0 1 0 1 0 0 15 0 1 1 1 0 1 1 1 0 0 ; end;