r_create_top_rhs.od 260 B

12345678910
  1. # We create the 'Top'-class with a GlobalCondition, because that's the only way we can control the name of the object to be created.
  2. Top:RAM_Class {
  3. RAM_abstract = `True`;
  4. }
  5. generic_link:RAM_Association (Top -> Top)
  6. :RAM_Inheritance (generic_link -> Top)