Section Header
    + name := G_WIN_IN;
    - author := "Sonntag Benoit (bsonntag@loria.fr)";
    - comment := "Group elements for GUI.";
Section Inherit
    + parent_area:Expanded AREA;
    + parent_g_expr:Expanded G_EXPR;
Section Public
    + win_in:G_WIN_IN_INTERN;
Creation.
    - create (w,h:INTEGER) with elt:G_EXPR :G_WIN_IN <-
    - make (w,h:INTEGER) with elt:G_EXPR <-
Fix position.
    - set_top <-
    - set_bottom <-
    - set_right <-
    - set_left <-
Size.
    + width_min:INTEGER;
    + height_min:INTEGER;
Update position.
    - refresh_in <-
    - 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) <-
    - draw (x0,y0:INTEGER) to (x1,y1:INTEGER) <-
Event manager.
    - receive msg:EVENT <-