anchor.diff:      
   valid_key_sha_alg_ec(OID, Alg) -> 
       Curve = public_key:oid2ssh_curvename(OID),
  -    Alg == list_to_atom("ecdsa-sha2-" ++ binary_to_list(Curve)).
  +    try Alg == list_to_existing_atom("ecdsa-sha2-" ++ binary_to_list(Curve))
  +    catch
  +        _:_ -> false
  +    end.
       
   
   -dialyzer({no_match, public_algo/1}).
  
positive.code: sha('curve448-sha512') -> sha512;
  sha(x25519) -> sha256;
  sha(x448) -> sha512;
  sha(Str) when is_list(Str), length(Str)<50 -> sha(list_to_atom(Str)).
  
  
  mac_key_bytes('hmac-sha1')    -> 20;
  
negative.code: public_algo({ed_pub, ed448,_}) -> 'ssh-ed448';
  public_algo({#'ECPoint'{},{namedCurve,OID}}) -> 
      Curve = public_key:oid2ssh_curvename(OID),
      try list_to_existing_atom("ecdsa-sha2-" ++ binary_to_list(Curve))
      catch
          _:_ -> undefined
      end.
  
  
  sha('ssh-rsa') -> sha;
  