Section Header
    + name := G_WIN_OUT_TRANS_TEST;
****** WARNING : JUST TEST ***********
    - author := "Sonntag Benoit (bsonntag@loria.fr)";
    - comment := "Group elements for GUI.";
Section Inherit
    + parent_window:Expanded AREA_MASK;
    + parent_g_expr:Expanded G_EXPR;
Section Public
    + title_len:INTEGER;
    + title:ABSTRACT_STRING;
    + stat:INTEGER_8;
    - is_open:BOOLEAN <-
    - open_by src:G_GROUP <-
    - close <-
Creation.
    - create t:ABSTRACT_STRING with elt:G_EXPR :SELF <-
    - make t:ABSTRACT_STRING with elt:G_EXPR <-
Size.
Update position.
    - set_position rac:AREA at (x,y:INTEGER) size (w,h:INTEGER) <-
Display.
    - draw_slave bmp:ABSTRACT_BITMAP from (x0,y0:INTEGER) to (x1,y1:INTEGER) <-
********** UPDATE ********
    - draw (x0,y0:INTEGER) to (x1,y1:INTEGER) <-
    - slave_pixel_hard (x,y:INTEGER) color col:UINTEGER_32 <-
    - slave_line_h_hard (x1,y:INTEGER) until x2:INTEGER color col:UINTEGER_32 <-
    - slave_line_h_hard (x1,y:INTEGER) until x2:INTEGER
image line:ABSTRACT_BMP_LINE offset ofs:INTEGER <-
Event.
    - receive msg:EVENT <-
    - get_object (x,y:INTEGER) :AREA <-