* @return Stella_Object
   */
  public static Stella_Object applyAsk(Cons body) {
    { Symbol gensymname = Stella.methodGensym("QUERY");

      return (Cons.list$(Cons.cons(Logic.SYM_LOGIC_APPLY_CACHED_ASK, Cons.cons(Cons.list$(Cons.cons(Logic.SYM_STELLA_BQUOTE, Cons.cons(body.value, Cons.cons(Stella.NIL, Stella.NIL)))), Cons.cons(Cons.list$(Cons.cons(Logic.SYM_STELLA_BQUOTE, Cons.cons(body.rest.value, Cons.cons(Stella.NIL, Stella.NIL)))), Cons.cons(Cons.cons(Logic.SYM_STELLA_CONS_LIST, ((Cons)(body.rest.rest.value)).concatenate(Stella.NIL, Stella.NIL)), Cons.cons(Cons.cons(Logic.SYM_STELLA_CONS_LIST, body.nthRest(3).concatenate(Stella.NIL, Stella.NIL)), Cons.cons(Cons.list$(Cons.cons(Logic.SYM_STELLA_QUOTE, Cons.cons(gensymname, Cons.cons(Stella.NIL, Stella.NIL)))), Cons.cons(Stella.NIL, Stella.NIL)))))))));
    }
  }