public override string VisitTermWithExplicitType(TermWithExplicitType t) { var rTerm = Visit(t.Term); var rType = typePrettyPrinter.Visit(t.Type); return(H.Parenthesis(rTerm + "::" + rType)); }
private int HandleAbbrevOrDef(OuterDecl d, string topLevel, TypeIsa type, string equality, Tuple <IList <Term>, Term> equation) { _sb.Append(topLevel + " ").Append(d.Name); if (type != null) { _sb.Append(" :: "); AppendInner(_typeIsaPrinter.Visit(type)); } _sb.AppendLine().Append(IsaPrettyPrinterHelper.Indent(1)).Append("where"); _sb.AppendLine().Append(IsaPrettyPrinterHelper.Indent(2)); var args = _termPrinter.VisitList(equation.Item1).SpaceAggregate(); AppendInner( () => _sb.Append(d.Name).Append(" ").Append(args).Append(" " + equality + " ") .Append(_termPrinter.Visit(equation.Item2)) ); return(0); }