public Cons vizGetBinaryRelationsOf(LogicObject concept) {
    { VizInfo self = this;

      { MemoizationTable memoTable000 = null;
        Cons memoizedEntry000 = null;
        Stella_Object memoizedValue000 = null;

        if (Stella.$MEMOIZATION_ENABLEDp$) {
          memoTable000 = ((MemoizationTable)(OntosaurusUtil.SGT_ONTOSAURUS_M_VIZ_INFOdVIZ_GET_BINARY_RELATIONS_OF_MEMO_TABLE_000.surrogateValue));
          if (memoTable000 == null) {
            Surrogate.initializeMemoizationTable(OntosaurusUtil.SGT_ONTOSAURUS_M_VIZ_INFOdVIZ_GET_BINARY_RELATIONS_OF_MEMO_TABLE_000, "(:MAX-VALUES 1000 :TIMESTAMPS (:META-KB-UPDATE))");
            memoTable000 = ((MemoizationTable)(OntosaurusUtil.SGT_ONTOSAURUS_M_VIZ_INFOdVIZ_GET_BINARY_RELATIONS_OF_MEMO_TABLE_000.surrogateValue));
          }
          memoizedEntry000 = MruMemoizationTable.lookupMruMemoizedValue(((MruMemoizationTable)(memoTable000)), concept, ((Context)(Stella.$CONTEXT$.get())), Stella.MEMOIZED_NULL_VALUE, null, -1);
          memoizedValue000 = memoizedEntry000.value;
        }
        if (memoizedValue000 != null) {
          if (memoizedValue000 == Stella.MEMOIZED_NULL_VALUE) {
            memoizedValue000 = null;
          }
        }
        else {
          memoizedValue000 = Logic.applyCachedRetrieve(Cons.list$(Cons.cons(OntosaurusUtil.SYM_LOGIC_pRELATION, Cons.cons(OntosaurusUtil.SYM_ONTOSAURUS_pDOMAIN, Cons.cons(Stella.NIL, Stella.NIL)))), Cons.list$(Cons.cons(OntosaurusUtil.SYM_STELLA_AND, Cons.cons(Cons.list$(Cons.cons(OntosaurusUtil.SYM_PL_KERNEL_KB_NTH_DOMAIN, Cons.cons(OntosaurusUtil.SYM_LOGIC_pRELATION, Cons.cons(IntegerWrapper.wrapInteger(0), Cons.cons(OntosaurusUtil.SYM_ONTOSAURUS_pDOMAIN, Cons.cons(Stella.NIL, Stella.NIL)))))), Cons.cons(Cons.list$(Cons.cons(OntosaurusUtil.SYM_ONTOSAURUS_BINARY_RELATION, Cons.cons(OntosaurusUtil.SYM_LOGIC_pRELATION, Cons.cons(Stella.NIL, Stella.NIL)))), Cons.cons(Stella.NIL, Stella.NIL))))), Cons.consList(Cons.cons(null, Cons.cons(concept, Stella.NIL))), Cons.consList(Cons.cons(OntosaurusUtil.KWD_SINGLETONSp, Cons.cons(Stella.TRUE_WRAPPER, Cons.cons(OntosaurusUtil.KWD_INFERENCE_LEVEL, Cons.cons(OntosaurusUtil.KWD_SHALLOW, Stella.NIL))))), OntosaurusUtil.SYM_ONTOSAURUS_M_VIZ_INFOdVIZ_GET_BINARY_RELATIONS_OF_QUERY_001, new Object[2]);
          if (Stella.$MEMOIZATION_ENABLEDp$) {
            memoizedEntry000.value = ((memoizedValue000 == null) ? Stella.MEMOIZED_NULL_VALUE : memoizedValue000);
          }
        }
        { Cons value000 = ((Cons)(memoizedValue000));

          return (value000);
        }
      }
    }
  }