DATE     94/01/10

    Opérateur NEG                              See also :EGA < 
    -------------                                        > <EG 
                                                         >EG 
    LOG1 =  OBJET1  NEG  OBJET2 (FLOT1) ;

                                    OBJET1=ENTIER,FLOTTANT,LISTENTI
                                           MOT,TEXTE,POINT,LOGIQUE
    Description :
    ____________

    The NEG operator compares the OBJET1 and OBJET2 objects.


    Contents :
    _________

    OBJETi   : objects to be compared
               The possible types for OBJET1 and OBJET2 are :

                              ENTIER
                              FLOTTANT
                              POINT
                              LISTENTI
                              MOT
                              TEXTE
                              LOGIQUE

    FLOT1    : comparison criterion (FLOTTANT type) between two
               points or two floatings. In this last case, the
               criterion equals 0. by default

    LOG1     : logical result (LOGIQUE type) ; its value is FAUX
               (false) if the two objects are equal and VRAI (true)
               if not

    Note :
    ________

    Two points are said to be "equal" if they have the same position 
 in space to within about the FLOT1 criterion.

    By default the criterion equals 1/10th of the point densities, or
 1/10th of the current density if the point densities are null.


    CAUTION |
    ________

    If the objects are MOTs, the following order will have to
 be maintained :

                LOG1 = NEG  MOT1  MOT2  ;