public static void pprintStellaCons(Cons self, org.powerloom.PrintableStringWriter stream) {
    stream.print("(");
    Native.setIntSpecial(OntosaurusUtil.$PPRINT_INDENT$, ((Integer)(OntosaurusUtil.$PPRINT_INDENT$.get())).intValue() + 1);
    switch (self.length()) {
      case 0:
      break;
      case 1:
        OntosaurusUtil.pprintObject(self.value, stream);
      break;
      case 2:
        OntosaurusUtil.pprintObject(self.value, stream);
        stream.print(" ");
        OntosaurusUtil.pprintObject(self.rest.value, stream);
      break;
      case 3:
        OntosaurusUtil.pprintObject(self.value, stream);
        stream.print(" ");
        OntosaurusUtil.pprintObject(self.rest.value, stream);
        stream.print(" ");
        OntosaurusUtil.pprintObject(self.rest.rest.value, stream);
      break;
      case 4:
      case 5:
        OntosaurusUtil.pprintObject(self.value, stream);
        { Stella_Object obj = null;
          Cons iter000 = self.rest;

          for (;!(iter000 == Stella.NIL); iter000 = iter000.rest) {
            obj = iter000.value;
            if (((Integer)(OntosaurusUtil.$PPRINT_INDENT$.get())).intValue() > 2) {
              OntosaurusUtil.pprintNewline(stream);
            }
            else {
              stream.print(" ");
            }
            OntosaurusUtil.pprintObject(obj, stream);
          }
        }
      break;
      default:
        OntosaurusUtil.pprintObject(self.value, stream);
        { Stella_Object obj = null;
          Cons iter001 = self.rest;

          for (;!(iter001 == Stella.NIL); iter001 = iter001.rest) {
            obj = iter001.value;
            OntosaurusUtil.pprintNewline(stream);
            OntosaurusUtil.pprintObject(obj, stream);
          }
        }
      break;
    }
    stream.print(")");
    Native.setIntSpecial(OntosaurusUtil.$PPRINT_INDENT$, ((Integer)(OntosaurusUtil.$PPRINT_INDENT$.get())).intValue() - 1);
  }