anchor.diff:  sophia_oracles_qfee__init_and_register_and_query_(Init, RegisterOracle, CreateQuery) ->
       {OracleAcc, CallingCt} = call(Init, []),
       S0 = state(),
  -    ok = call(RegisterOracle, [CallingCt, OracleAcc]),
  +    OracleAcc = <<(call(RegisterOracle, [CallingCt, OracleAcc])):256>>,
       S1 = state(),
       R = call(CreateQuery, [CallingCt, OracleAcc]),
       {R,
  
positive.code: oracle_register_from_contract(OperatorAcc, OCt, OCt, Opts, TxOpts, S) ->
      QueryFee = maps:get(qfee, Opts),
      OTtl = ?CHAIN_RELATIVE_TTL_MEMORY_ENCODING(maps:get(ottl, Opts, 15)),
      <<OCtId:256>> = OCt,
      {OCtId, S1} = call_contract(OperatorAcc, OCt, registerOracle, word, {OCt, 0, QueryFee, OTtl}, TxOpts, S),
      {ok, S1}.
  
  oracle_register_from_remote_contract(OperatorAcc, RCt, OCt, Opts, TxOpts, S) ->
      QueryFee = maps:get(qfee, Opts),
      OTtl = ?CHAIN_RELATIVE_TTL_MEMORY_ENCODING(maps:get(ottl, Opts, 15)),
      <<OCtId:256>> = OCt,
      {OCtId, S1} = call_contract(OperatorAcc, RCt, callRegisterOracle, word, {OCt, OCt, 0, QueryFee, OTtl}, TxOpts, S),
      {ok, S1}.
  
  oracle_query_from_contract(UserAcc, OCt, OCt, Opts, TxOpts, S) ->
      oracle_query_from_contract_(createQuery, UserAcc, OCt, OCt, Opts, TxOpts, S).
  
negative.code:       S1] %% State after oracle registration.
      } = sophia_oracles_qfee__init_and_register_and_query_(Init, RegisterOracle, CreateQuery),
      S2 = state(),
      {} = call(RespondQuery, [CallingCt, OracleAcc, QId]),
      {{OracleAcc, CallingCt},
       [S0, S1, S2]}.
  
  