Lisaac prototype interface

Section Header
+ name := AI_LAYER;
- comment := "Layer of a AI document.";
- version := 1;
Section Inherit
- parent_object:OBJECT :=
Section Public
+ color:AI_COLOR;
+ operation:LINKED_LIST[AI_OPERATION];
+ is_fill:BOOLEAN;
+ is_stroke:BOOLEAN;
Creation.
- create lst_op:LINKED_LIST[AI_OPERATION] color col:AI_COLOR fill f:BOOLEAN stroke s:BOOLEAN :SELF <-
- make lst_op:LINKED_LIST[AI_OPERATION] color col:AI_COLOR fill f:BOOLEAN stroke s:BOOLEAN <-
Draw
- draw b:BITMAP scale s:REAL_16_16 <-