anchor.diff:      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
  -    }.
  
positive.code:     % Access
      , get_realm/1
      , get_uri/1
  
      % Serialize (for internal storage purposes only!)
      , to_props/1
      , of_props/1
      ]).
  
  
  
negative.code: 
  -opaque t() ::
      #t{}.
  
  
  -spec cons(realm(), uri()) ->
  