WFormula_p WFormulaParse(Scanner_p in, TB_p terms)
{
WFormula_p wform = NULL;
if(ClausesHaveDisjointVariables)
{
VarBankClearExtNamesNoReset(terms->vars);
}
switch(ScannerGetFormat(in))
{
case LOPFormat:
Error("LOP currently does not support full FOF!", OTHER_ERROR);
break;
case TPTPFormat:
wform = WFormulaTPTPParse(in, terms);
break;
case TSTPFormat:
wform = WFormulaTSTPParse(in, terms);
break;
default:
assert(false);
break;
}
/* WFormulaPrint(stdout, wform, true);
printf("\n"); */
return wform;
}
void VarBankClearExtNames(VarBank_p vars)
{
VarBankClearExtNamesNoReset(vars);
vars->v_count = 0;
}