open Ascent;;

val fCOMMAND_LIST : ct_COMMAND_LIST -> unit;;
val fCOMMAND : ct_COMMAND -> unit;;
val fTACTIC_COM : ct_TACTIC_COM -> unit;;
val fFORMULA : ct_FORMULA -> unit;;
val fID : ct_ID -> unit;;
val fSTRING : ct_STRING -> unit;;
val fINT : ct_INT -> unit;;
val fRULE_LIST : ct_RULE_LIST -> unit;;
val fRULE : ct_RULE -> unit;;
val fSIGNED_INT_LIST : ct_SIGNED_INT_LIST -> unit;;
val fPREMISES_LIST : ct_PREMISES_LIST -> unit;;
val fID_LIST : ct_ID_LIST -> unit;;
val fTEXT : ct_TEXT -> unit;;