Section Header
    + name := BITMAP[E];
    - comment := "Generic Bitmap.";
Section Inherit
    + parent_abstract_bitmap:Expanded ABSTRACT_BITMAP;
Section Public
    - get_y_line y:INTEGER :ABSTRACT_BMP_LINE <-
Data.
    - pixel_geometry:PIXEL <-
Creation.
    - make (w,h:INTEGER) <-
    - make (w,h:INTEGER) at offset_begin:UINTEGER_32 bytes_per_line lx:INTEGER <-
****************************************************************************
* PutImage *
****************************************************************************
    - put_bitmap bmp:ABSTRACT_BITMAP to (x,y:INTEGER) <-
    - put_bitmap bmp:ABSTRACT_BITMAP to (x,y:INTEGER) scale (scale_x,scale_y:REAL_16_16) <-
Section Public
Low level.
    - pixel_hard (x,y:INTEGER) color col:UINTEGER_32 <-
    - line_h_hard (x,y:INTEGER) until x1:INTEGER color col:UINTEGER_32 <-
    - line_h_hard (x,y:INTEGER) until x1:INTEGER image line:ABSTRACT_BMP_LINE offset ofs:INTEGER <-
    - get_pixel_hard (x,y:INTEGER) :PIXEL <-