doc-src/Tutorial/Datatype/abevalb
author wenzelm
Sun, 16 Jul 2000 20:56:14 +0200
changeset 9366 a83f3abbfc93
parent 5851 15ce4c1c8313
permissions -rw-r--r--
use pair_tac;

  "evalb env (Less a1 a2) = (evala env a1 < evala env a2)"
  "evalb env (And b1 b2) = (evalb env b1 & evalb env b2)"
  "evalb env (Neg b) = (~ evalb env b)"