public static Cons clTranslateFixedSlotValueSetterTree(Cons tree) {
    { Surrogate objtype = ((Surrogate)(tree.rest.value));
      Symbol slotname = Symbol.trueSlotName(((Symbol)(tree.rest.rest.value)), objtype);
      Stella_Object objref = Stella_Object.clTranslateATree(tree.fourth());
      Stella_Object valueref = Stella_Object.clTranslateATree(tree.fifth());
      Cons otree = Symbol.yieldSlotValueWriterTree(slotname, objref, objtype, valueref);

      return (otree);
    }
  }