**//STATIC-COMPENSATOR-FLIPPER//**

Package ''FLIP'' contains a symbol  ''FLIPPER-POS'', which evaluates to NIL, but internally represents control axis of the device.

''POS''

With zero arguments, returns the last known position of the static compensator flipper. One argument must be number 1, 2 or 3, for positions mirror, ZnSe or Si (respectively). 


<code lisp>
>(flip::pos)
1

>(flip::pos 3)
3
</code>

''MOVING?''

Usual "busy" predicate. No arguments.