;@ map s 2 LVLlev LVLpos
;@ map d BUT002

;@ args ii,,k
opcode Constant, 0, kii
    ; TODO: unipolar/bipolar switch
    kVal, iPolSw, izOut xin
    zkw kVal, izOut
endop
