author | Christian Urban <christian dot urban at kcl dot ac dot uk> |
Tue, 08 Jul 2014 11:18:31 +0100 | |
changeset 3238 | b2e1a7b83e05 |
parent 2871 | b58073719b06 |
permissions | -rw-r--r-- |
2871
b58073719b06
Update Quotient/TODO and remove some attic code
Cezary Kaliszyk <kaliszyk@in.tum.de>
parents:
948
diff
changeset
|
1 |
(* Could go in the programming tutorial *) |
379
57bde65f6eb2
Removed unused things from QuotMain.
Cezary Kaliszyk <kaliszyk@in.tum.de>
parents:
diff
changeset
|
2 |
|
2871
b58073719b06
Update Quotient/TODO and remove some attic code
Cezary Kaliszyk <kaliszyk@in.tum.de>
parents:
948
diff
changeset
|
3 |
ML_prf {* val qtm = #concl (fst (Subgoal.focus @{context} 1 (#goal (Isar.goal ())))) *} |