Section Header
    + name := G_OUT;
    - author := "Sonntag Benoit (bsonntag@loria.fr)";
    - comment := "Output text for GUI.";
Section Inherit
    + parent_area:Expanded AREA;
    + parent_g_expr:Expanded G_EXPR;
Section Public
    + text:STRING;
    + justify:UINTEGER_8;
    - left :UINTEGER_8 :=
    - right :UINTEGER_8 :=
    - center:UINTEGER_8 :=
Width / Height
    - width_min:INTEGER <-
    - height_min:INTEGER <-
Creation.
    - create txt:ABSTRACT_STRING :SELF <-
    - create txt:ABSTRACT_STRING justify j:UINTEGER_8 :SELF <-
    - make txt:ABSTRACT_STRING justify j:UINTEGER_8 <-
Update position.
    - set_position rac:AREA at (x,y:INTEGER) size (w,h:INTEGER) <-
Display.
    - draw (x0,y0:INTEGER) to (x1,y1:INTEGER) <-