anchor.diff:        erlang:binary_to_term(CoreModule)
     end.
   
  +%% @private
   -spec core_chunk() -> string().
   core_chunk() -> ?CORE_CHUNK.
   
  
positive.code: location_to_binary(_) ->
    <<?NO_SOURCE, ":?:?: ">>.
  
  -spec 'rem'(number(), number()) -> number().
  'rem'(X, Y) when is_integer(X), is_integer(Y) ->
    X rem Y;
  'rem'(X, Y) ->
    Q = trunc(X / Y),
    X - Q * Y.
  
  -spec quotient(number(), number()) -> number().
  quotient(X, Y) when is_integer(X), is_integer(Y) ->
    X div Y;
  quotient(X, Y) ->
    quotient(trunc(X), trunc(Y)).
  
  -spec floor(number()) -> integer().
  floor(X) when X < 0 ->
    T = trunc(X),
    case X - T == 0 of
      true  -> T;
      false -> T - 1
    end;
  floor(X) ->
    trunc(X).
  
  -spec ceil(number()) -> integer().
  ceil(X) when X < 0 ->
    trunc(X);
  ceil(X) ->
    T = trunc(X),
    case X - T == 0 of
      true  -> T;
      false -> T + 1
    end.
  
  -spec signum(number()) -> number().
  signum(X) when X < 0 -> -1;
  signum(X) when X >= 0 -> 1.
  
  -spec bnand(number(), number()) -> number().
  bnand(X, Y) -> bnot(X band Y).
  
  -spec ets_get(atom() | ets:tid(), term()) -> term().
  ets_get(Table, Id) ->
    ets_get(Table, Id, ?NIL).
  
  -spec ets_get(atom() | ets:tid(), term(), term()) -> term().
  ets_get(Table, Id, Default) ->
    case ets:lookup(Table, Id) of
      [] -> Default;
      [Value] -> Value
    end.
  
  -spec ets_save(ets:tid() | atom(), term()) -> term().
  ets_save(Table, Value) ->
    true = ets:insert(Table, Value),
    Value.
  
  -spec resource_to_ns(binary()) -> binary().
  resource_to_ns(Resource) ->
    Ns = binary:replace(Resource, <<"/">>, <<".">>, [global]),
    binary:replace(Ns, <<"_">>, <<"-">>, [global]).
  
  -spec ns_to_resource(binary()) -> binary().
  ns_to_resource(NsName) ->
    Resource = binary:replace(NsName, <<".">>, <<"/">>, [global]),
    binary:replace(Resource, <<"-">>, <<"_">>, [global]).
  
  -spec record_hash(map()) -> integer().
  record_hash(#{?TYPE := _, '__extmap' := ExternalMap} = Record) ->
    MapFields = maps:without([?TYPE, '__extmap', '__meta'], Record),
    AllFields = case ExternalMap of
                  ?NIL -> MapFields;
                  _ -> maps:merge(MapFields, ExternalMap)
                end,
    clj_rt:hash(AllFields).
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  %% The MIT License (MIT)
  
  
negative.code:       end
    end.
  
  %% @private
  -spec core_from_binary(binary()) ->
    cerl:cerl() | {error, missing_abstract_code}.
  core_from_binary(Binary) ->
  