<function>
<fname property="Applicative Order / LEVEL: 0">
= , Equ, Neq, Lt , Gt , Lteq, Gteq
</fname>
<prototype>
LISP`

(= exp1 exp2)
(Equ exp1 exp2)
(Neq exp1 exp2)
(Lt exp1 exp2)
(Gt exp1 exp2)
(Lteq exp1 exp2)
(Gteq exp1 exp2)

XML`

<Equ> exp1 exp2</Equ>
<Neq> exp1 exp2</Neq>
<Lt> exp1 exp2</Lt>
<Gt> exp1 exp2</Gt>
<Lteq> exp1 exp2</Lteq>
<Gteq> exp1 exp2</Gteq>
</prototype>
<prototype>
C֐錾

int cEqu(XLtype * exp1,XLtype * exp2);
</prototype>
<explanation>
exp1exp20,exp1 &gt; exp2 Ȃ1ȂȂ-1
ԂB召ȂAȂꍇ-2ԂB

exp1 exp2̔rĖ߂lƂB^UĺAIntegerŁA0UAȊO͐^Ɖ߂B

<table border=1 cellspacing=0 cellpadding=0 width=337>
    <tr> 
      <td valign=bottom > 
        <p>=,Equ</p>
      </td>
      <td valign=bottom > 
        <p>Ƃ^</p>
      </td>
    </tr>
    <tr> 
      <td valign=bottom > 
        <p>Neq</p>
      </td>
      <td   valign=bottom > 
        <p>ȂƂ^</p>
      </td>
    </tr>
    <tr> 
      <td valign=bottom > 
        <p>Lt</p>
      </td>
      <td   valign=bottom > 
        <p>ȂBexp1Ƃ^</p>
      </td>
    </tr>
    <tr> 
      <td valign=bottom > 
        <p>Gt</p>
      </td>
      <td   valign=bottom > 
        <p>ȂBexp1傫Ƃ^</p>
      </td>
    </tr>
    <tr> 
      <td valign=bottom > 
        <p>Lteq</p>
      </td>
      <td   valign=bottom > 
        <p>(Or 
          (= exp1 exp2) (Lt exp1 exp2)) Ɠ</p>
      </td>
    </tr>
    <tr> 
      <td valign=bottom > 
        <p>Gteq</p>
      </td>
      <td valign=bottom > 
        <p>(Or 
          (= exp1 exp2) (Gt exp1 exp2)) Ɠ</p>
      </td>
    </tr>
  </table>
</explanation>
</function>
