Section Header
    + name := AI_BEZIER;
    - comment := "Operation: bezier";
    - version := 1;
Section Inherit
    - parent_ai_operation:AI_OPERATION :=
Section Public
    + wx1:REAL_16_16;
    + wy1:REAL_16_16;
    + wx2:REAL_16_16;
    + wy2:REAL_16_16;
    + x:REAL_16_16;
    + y:REAL_16_16;
Creation.
    - create_w1 (lx1,ly1:REAL_16_16) w2 (lx2,ly2:REAL_16_16) to (lx3,ly3:REAL_16_16) :SELF <-
    - make_w1 (lx1,ly1:REAL_16_16) w2 (lx2,ly2:REAL_16_16) to (lx3,ly3:REAL_16_16) <-
Draw
    - draw_stroke b:BITMAP scale s:REAL_16_16 <-
    - draw_fill b:BITMAP scale s:REAL_16_16 <-
Display.
    - display <-