// ** This file was generated with DemFGen (vers:12/15/2010)

package csp;

import edu.neu.ccs.demeterf.Fields;
import edu.neu.ccs.demeterf.lib.ident;
import edu.neu.ccs.demeterf.lib.verbatim;
import edu.neu.ccs.demeterf.lib.*;
import edu.neu.ccs.demeterf.lib.*;
import java.lang.reflect.*;
import edu.neu.ccs.demeterf.lib.*;
import edu.neu.ccs.demeterf.lib.*;
import java.lang.reflect.*;
import scg.*;



/** Computes a String representation in CD Syntax */
public class Print extends edu.neu.ccs.demeterf.FC{
   /** Static stub method for calling print */
   public static String PrintM(Object o){
      return new edu.neu.ccs.demeterf.Traversal(new Print(),edu.neu.ccs.demeterf.Control.builtins()).<Print._LT>traverse(o).toString();
   }

   public _LT combine(byte _h_){ return empty.append(new _S(""+_h_)); }
   public _LT combine(short _h_){ return empty.append(new _S(""+_h_)); }
   public _LT combine(int _h_){ return empty.append(new _S(""+_h_)); }
   public _LT combine(long _h_){ return empty.append(new _S(""+_h_)); }
   public _LT combine(float _h_){ return empty.append(new _S(""+_h_)); }
   public _LT combine(double _h_){ return empty.append(new _S(""+_h_)); }
   public _LT combine(char _h_){ return empty.append(new _S("\'"+escape(""+_h_)+"\'")); }
   public _LT combine(boolean _h_){ return empty.append(new _S(""+_h_)); }
   public _LT combine(String _h_){ return empty.append(new _S("\""+escape(""+_h_)+"\"")); }
   public _LT combine(ident _h_){ return empty.append(new _S(""+_h_)); }
   public _LT combine(verbatim _h_){ return empty.append(new _S(""+_h_)); }

   static _LT empty = new _LT();
   public  static class _LT{
     edu.neu.ccs.demeterf.lib.List<_T> l;
     public _LT(){ l = new edu.neu.ccs.demeterf.lib.Empty<_T>(); }
     public _LT(edu.neu.ccs.demeterf.lib.List<_T> ll){ l = ll; }
     public _LT push(_T t){ return new _LT(l.push(t)); }
     public _LT append(_T t){ return new _LT(l.append(t)); }
     public _LT append(_LT t){ return new _LT(l.append(t.l)); }
     public String toString(){ return l.fold(new _F(),""); }
     public _LT compress(){ return l.isEmpty()?this:compress(new _E(), l); }
     public static _LT compress(_S s, edu.neu.ccs.demeterf.lib.List<_T> r){
        if(r.isEmpty())return (s.isE())?empty:empty.push(s);
          _T top = r.top();
          if(top.isS())return compress(s.append((_S)top), r.pop());
          if(s.isE())return compress(s, r.pop()).push(top);
          return compress(new _E(), r.pop()).push(top).push(s);
     }
   }
   public static class _T{
     public boolean isS(){ return false; }
     public boolean isE(){ return false; }
   }
   public static class _P extends _T{ public static _P p = new _P(); }
   public static class _M extends _T{ public static _M m = new _M(); }
   public static class _N extends _T{ public static _N n = new _N(); }
   public static class _R extends _T{ public static _R r = new _R(); }
   public static class _S extends _T{
     public StringBuffer s;
     public _S(String ss){ s = new StringBuffer(ss); }
     public _S append(_S ss){ s.append(ss.s); return this; }
     public  boolean isS(){ return true; }
   }
   public static class _E extends _S{
     public _E(){ super("");}
     public  boolean isS(){ return true; }
   }
   public static class _F extends edu.neu.ccs.demeterf.lib.List.Fold<_T,String>{
     int idt = 0;
     public  String fold(_T t, String s){
        if(t == _P.p)plus();
        else if(t == _M.m)minus();
        else if(t == _R.r)s += "\r";
        else if(t == _N.n)s += "\n"+indent();
        else s += ((_S)t).s;
        return s;
     }
     void plus(){ idt++; }
     void minus(){ idt--; }
     String indent(){ return indent(idt); }
     static String indent(int i){ return (i <= 0)?"":"   "+indent(i-1); }
   }
   public static String escape(String s){
      char str[] = s.toCharArray();
      StringBuffer ret = new StringBuffer("");
      for(char c:str)ret.append(escape(c));
      return ret.toString();
   }
   public static String escape(char c){
      switch(c){
      case '\n':return "\\n";  case '\t':return "\\t";
      case '\b':return "\\b";  case '\r':return "\\r";
      case '\f':return "\\f";  case '\\':return "\\\\";
      case '\'':return "\\'"; case '\"':return "\\\"";
      default: return ""+c;
      }
   }
   public _LT combine(CSPInstance _h_, _LT vars, _LT clauses){
      return empty.append(vars).append(new _S(" ")).append(clauses).compress();
   }
   public _LT combine(Clause _h_, _LT relnum, _LT weight, _LT vars){
      return empty.append(new _S("(")).append(relnum).append(new _S(" ")).append(new _S("{")).append(weight).append(new _S("}")).append(new _S(" ")).append(vars).append(new _S(")")).compress();
   }
   public _LT combine(CSPSolution _h_, _LT assign){
      return empty.append(assign).compress();
   }
   public _LT combine(Var _h_, _LT id){
      return empty.append(id).compress();
   }
   public _LT combine(CSPInstanceSet _h_, _LT type){
      return empty.append(new _S("(")).append(type).append(new _S(")")).compress();
   }
   public _LT combine(CSPDomain _h_){
      return empty;
   }
   public _LT combine(FullyQualifiedClassName _h_, _LT name, _LT rest){
      return empty.append(name).append(rest).compress();
   }
   public _LT combine(Qualifier _h_, _LT name){
      return empty.append(new _S(".")).append(name).compress();
   }
   public _LT combine(Instance _h_, _LT instanceClassName, _LT instance, _LT instanceSpec){
      return empty.append(instanceClassName).append(instance).append(instanceSpec).compress();
   }
   public _LT combine(InstanceSet _h_, _LT instanceSetClassName, _LT instanceSet, _LT instanceSetSpec){
      return empty.append(instanceSetClassName).append(instanceSet).append(instanceSetSpec).compress();
   }
   public _LT combine(Solution _h_, _LT solutionClassName, _LT solution, _LT solutionSpec){
      return empty.append(solutionClassName).append(solution).append(solutionSpec).compress();
   }
   public _LT combine(Claim _h_, _LT instanceSet, _LT protocolClassName, _LT protocol, _LT quality){
      return empty.append(instanceSet).append(protocolClassName).append(protocol).append(quality).compress();
   }
   public _LT combine(ProtocolSpec _h_, _LT steps){
      return empty.append(steps).compress();
   }
   public _LT combine(Step _h_, _LT action, _LT role){
      return empty.append(action).append(new _S("from")).append(role).compress();
   }
   public _LT combine(Alice _h_){
      return empty.append(new _S("Alice")).compress();
   }
   public _LT combine(Bob _h_){
      return empty.append(new _S("Bob")).compress();
   }
   public _LT combine(ProvideAction _h_){
      return empty.append(new _S("instance")).compress();
   }
   public _LT combine(SolveAction _h_, _LT stepNo){
      return empty.append(new _S("solution")).append(new _S("of")).append(stepNo).compress();
   }
   public _LT combine(PlayerRequest _h_, _LT request){
      return empty.append(new _S("request[")).append(request).append(new _S("]")).compress();
   }
   public _LT combine(PlayerResponse _h_, _LT transaction){
      return empty.append(new _S("transaction[")).append(transaction).append(new _S("]")).compress();
   }
   public _LT combine(ProposeRequest _h_, _LT forbidden){
      return empty.append(new _S("propose")).append(forbidden).compress();
   }
   public _LT combine(OpposeRequest _h_, _LT claims){
      return empty.append(new _S("oppose")).append(claims).compress();
   }
   public _LT combine(ProvideRequest _h_, _LT claim){
      return empty.append(new _S("provide")).append(claim).compress();
   }
   public _LT combine(SolveRequest _h_, _LT instance, _LT claim){
      return empty.append(new _S("solve")).append(instance).append(claim).compress();
   }
   public _LT combine(ProposeResponse _h_, _LT claims){
      return empty.append(new _S("propose")).append(claims).compress();
   }
   public _LT combine(OpposeResponse _h_, _LT oppositions){
      return empty.append(new _S("oppose")).append(oppositions).compress();
   }
   public _LT combine(NoOpposition _h_){
      return empty.append(new _S("no")).append(new _S("opposition")).compress();
   }
   public _LT combine(Strengthening _h_, _LT newQuality){
      return empty.append(new _S("strengthening")).append(newQuality).compress();
   }
   public _LT combine(Refuting _h_){
      return empty.append(new _S("refuting")).compress();
   }
   public _LT combine(ProvideResponse _h_, _LT instance){
      return empty.append(new _S("provide")).append(instance).compress();
   }
   public _LT combine(SolveResponse _h_, _LT instance){
      return empty.append(new _S("solve")).append(instance).compress();
   }
   public _LT combine(RED _h_){
      return empty.append(new _S("red")).compress();
   }
   public _LT combine(BLACK _h_){
      return empty.append(new _S("black")).compress();
   }

   public _LT combine(Empty _h_){
      return empty;
   }
   public _LT combine(Cons _h_, _LT first, _LT rest){
      return empty.append(first).append(new _S(" ")).append(rest).compress();
   }
   public _LT combine(None _h_){
      return empty;
   }
   public _LT combine(Some _h_, _LT just){
      return empty.append(just).compress();
   }
   public _LT combine(ListSet _h_, _LT list){
      return empty.append(list).compress();
   }
   public _LT combine(Wrap _h_, _LT x){
      return empty.append(x).compress();
   }
   public _LT combine(ListMap _h_, _LT list){
      return empty.append(new _S("[")).append(new _S(" ")).append(list).append(new _S(" ")).append(new _S("]")).compress();
   }
   public _LT combine(Entry _h_, _LT key, _LT val){
      return empty.append(new _S("(")).append(key).append(new _S(" ")).append(new _S("->")).append(new _S(" ")).append(val).append(new _S(")")).compress();
   }


}


