changeset 32759 | 1476fe841023 |
parent 32734 | 06c13b2e562e |
child 32740 | 9dd0a2f83429 |
--- a/src/Tools/coherent.ML Tue Sep 29 14:25:42 2009 +1000 +++ b/src/Tools/coherent.ML Tue Sep 29 14:26:33 2009 +1000 @@ -26,7 +26,7 @@ val setup: theory -> theory end; -functor CoherentFun(Data: COHERENT_DATA) : COHERENT = +functor Coherent(Data: COHERENT_DATA) : COHERENT = struct (** misc tools **)