anchor.diff:  	    case verify_host_key(Ssh0, PeerPubHostKey, H, H_SIG) of
   		ok ->
   		    {SshPacket, Ssh} = ssh_packet(#ssh_msg_newkeys{}, Ssh0),
  -		    {ok, SshPacket, Ssh#ssh{shared_secret  = K,
  +		    {ok, SshPacket, Ssh#ssh{shared_secret  = ssh_bits:mpint(K),
   					    exchanged_hash = H,
   					    session_id = sid(Ssh, H)}};
   		Error ->
  
positive.code: 		    case verify_host_key(Ssh0, PeerPubHostKey, H, H_SIG) of
  			ok ->
  			    {SshPacket, Ssh} = ssh_packet(#ssh_msg_newkeys{}, Ssh0),
  			    {ok, SshPacket, Ssh#ssh{shared_secret  = K,
  						    exchanged_hash = H,
  						    session_id = sid(Ssh, H)}};
  			_Error ->
  
negative.code: 			ssh_packet(#ssh_msg_kex_dh_gex_reply{public_host_key = MyPubHostKey,
  							     f = Public,
  							     h_sig = H_SIG}, Ssh0),
  		    {ok, SshPacket, Ssh#ssh{shared_secret = ssh_bits:mpint(K),
  					    exchanged_hash = H,
  					    session_id = sid(Ssh, H)
  					   }};
  