author | Christian Urban <christian dot urban at kcl dot ac dot uk> |
Wed, 31 Jul 2013 13:15:29 +0100 | |
changeset 3221 | ea327a4c4f43 |
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 ())))) *} |