⎕ 'Object Oriented Programming Example'

⍢ OWL                   // base class
    ⍢.s x,y             // simple constructor
    a = 0               // static
    ⍢ m1                // method
        ⎕ 'm1'
        ⍔ ⍵
    ⍢ init
        'init ∆' ⎕ ∆
⍢ FS : OWL              // derived class
    ⍢.c fs,x,y          // general constructor
        super(x,y)      // call superclass
        ⍢.t fs          // init 'this' from list
        ⎕ 'cFS'
    ⍢ m1a               // method
        ⎕ 'm1a'
        ⎕ ∆.fs
        ⍔ ⍵
s1 = [ 1 2 3 ] ⍙.n FS
⎕ s1.m1 11
⎕ s1.m1a 22
's1' ⎕ ⍕.j s1

⎕ 'OWL done'

/// stop

∇ foo : w
    ⍛.css 'owl.css'
    w = 'class1' ⍛.el 'div'
    // w ⍛ '<p>ok<p><button>done</button>'
    ⍛.d w
    w ⍛.html 't.html'

//             foo 0

// end