1/* @(#)chatops.pl	24.1 2/23/88 */
    2
    3/* 
    4	Copyright 1986, Fernando C.N. Pereira and David H.D. Warren,
    5
    6			   All Rights Reserved
    7*/
    8:- op(900,xfx,~=).    9:- op(900,xfx,=+).   10:- op(900,xfx,=:).   11:- op(450,xfy,:).   12:- op(400,xfy,&).   13:- op(300,fx,~).   14:- op(200,xfx,--).   15:- op(359,xf,ject).   16
   17:- op( 1150,fx,(mode)).