Update from HH
[Flyspeck/.git] / development / thales / session / cleanup.hl
1
2 let searchd pat =
3   searchl (map (fun t -> ("",t)) (definitions())) pat;;
4
5 constants();;
6