public static Stella_Object access_Fault_Slot_Value(Fault self, Symbol slotname, Stella_Object value, boolean setvalueP) {
    if (slotname == SoapEnv.SYM_SOAP_ENV_faultcode) {
      if (setvalueP) {
        self.faultcode = ((faultcode)(value));
      }
      else {
        value = self.faultcode;
      }
    }
    else if (slotname == SoapEnv.SYM_SOAP_ENV_faultstring) {
      if (setvalueP) {
        self.faultstring = ((faultstring)(value));
      }
      else {
        value = self.faultstring;
      }
    }
    else if (slotname == SoapEnv.SYM_SOAP_ENV_faultactor) {
      if (setvalueP) {
        self.faultactor = ((faultactor)(value));
      }
      else {
        value = self.faultactor;
      }
    }
    else if (slotname == SoapEnv.SYM_SOAP_ENV_detail) {
      if (setvalueP) {
        self.detail = ((detail)(value));
      }
      else {
        value = self.detail;
      }
    }
    else {
      { OutputStringStream STREAM_000 = OutputStringStream.newOutputStringStream();

        STREAM_000.nativeStream.print("`" + slotname + "' is not a valid case option");
        throw ((StellaException)(StellaException.newStellaException(STREAM_000.theStringReader()).fillInStackTrace()));
      }
    }
    return (value);
  }