anchor.diff:      % Access
       , get_realm/1
       , get_uri/1
  -
  -    % Serialize (for internal storage purposes only!)
  -    , to_props/1
  -    , of_props/1
       ]).
   
   
  
positive.code:     uri().
  get_uri(#t{uri=URI}) ->
      URI.
  
  -spec to_props(t()) ->
      [{binary(), binary()}].
  to_props(#t{realm = <<Realm/binary>>, uri=URI}) ->
      [ {?SERIALIZATION_KEY_REALM , Realm}
      , {?SERIALIZATION_KEY_URI   , oauth1_uri:to_bin(URI)}
      ].
  
  -spec of_props([{binary(), binary()}]) ->
      t().
  of_props(Props1) ->
      KeyRealm = ?SERIALIZATION_KEY_REALM,
      KeyURI   = ?SERIALIZATION_KEY_URI,
      {value, {KeyRealm, Realm },  Props2} = lists:keytake(KeyRealm, 1, Props1),
      {value, {KeyURI  , URIBin}, _Props3} = lists:keytake(KeyURI  , 1, Props2),
      {ok, URI} = oauth1_uri:of_bin(URIBin),
      #t
      { realm = Realm
      , uri   = URI
      }.
  
negative.code: 
  -opaque t() ::
      #t{}.
  
  
  -spec cons(realm(), uri()) ->
  