/tutorial/triangle/version4/example4.e

 1class EXAMPLE4
 2
 3create {ANY}
 4   main
 5
 6feature {ANY}
 7   main
 8      local
 9         x, y, z: POINT; t1, t2: TRIANGLE
10      do
11         create x.make(1.0, 2.0)
12         create y.make(1.0, 2.0)
13         create z.make(3.0, 4.0)
14         check
15            x /= y
16            x.is_equal(y)
17         end
18         create t1.make(x, y, z)
19         create t2.make(x.twin, y.twin, z.twin)
20         check
21            t1 /= t2
22            t1.is_equal(t2)
23         end
24         -- It is now time to have a look at version4 of class
25         -- TRIANGLE to get rid of this problem.
26      end
27
28end -- class EXAMPLE4