Héritage multiple : objets graphiques et géométriques

On cherche à regrouper dans une même hiérarchie de classes, différents objets géométriques. Pour cela on commence par décrire la classe abstraite geometrical_object suivante :

class virtual geometric_object () =
object
  method virtual compute_area : unit -> float
  method virtual compute_circ : unit -> float
end;;

1.

Ecrire les classes geo_rectangle dont les instances sont définies à partir 2 points et geo_circle.

2.

Ecrire les classes geo_picture (construire à partir d'une liste de points), une sous-classe geo_polygone, et geo_group à partir d'une suite d'objets géométriques. On effectuera les calculs sur la boite enveloppante des suites d'objets.

3.

Ecrire une classe gg_rectangle qui hérite des rectangle et geo_rectangle. Même question pour les classes gg_circle, gg_picture, gg_polygone et gg_group.