let
main _fmt =
if
Print
.get ()
then
!
Db
.
Occurrence
.print_all ()