src/LCF/ex/Ex3.ML
author oheimb
Fri Jun 02 20:38:28 2000 +0200 (2000-06-02)
changeset 9028 8a1ec8f05f14
parent 5061 f947332d5465
child 17248 81bf91654e73
permissions -rw-r--r--
added HOL/Prolog
wenzelm@4905
     1
wenzelm@4905
     2
simpset_ref() := LCF_ss;
wenzelm@4905
     3
wenzelm@4905
     4
Addsimps [p_strict,p_s];
wenzelm@4905
     5
wenzelm@5061
     6
Goal "p(FIX(s),y) = FIX(s)";
wenzelm@4905
     7
by (induct_tac "s" 1);
wenzelm@4905
     8
by (Simp_tac 1);
wenzelm@4905
     9
by (Simp_tac 1);
wenzelm@4905
    10
qed "example";
wenzelm@4905
    11