find : string -> data list
- DB.find "inc"; > val it = [(("arithmetic", "MULT_INCREASES"), (|- !m n. 1 < m /\ 0 < n ==> SUC n <= m * n, Thm)), (("bool", "BOOL_EQ_DISTINCT"), (|- ~(T = F) /\ ~(F = T), Thm)), (("list", "list_distinct"), (|- !a1 a0. ~([] = a0::a1), Thm)), (("sum", "sum_distinct"), (|- !x y. ~(INL x = INR y), Thm)), (("sum", "sum_distinct1"), (|- !x y. ~(INR y = INL x), Thm))] : ((string * string) * (thm * class)) list