Bitcoin/public point to address: Difference between revisions
→{{header|Nim}}: insert Mathematica solution
m (→{{header|Phix}}: added without js and ripemd160.js comment, removed accidental "output:") |
(→{{header|Nim}}: insert Mathematica solution) |
||
Line 661:
{{out}}
<pre>6UwLL9Risc3QfPqBUvKofHmBQ7wMtjvM</pre>
=={{header|Wolfram Language|Mathematica}}==
<lang Mathematica>BlockchainKeyEncode[
PublicKey[
<|
"Type" -> "EllipticCurve",
"PublicCurvePoint" -> (
FromDigits[#, 16] & /@ {
"50863AD64A87AE8A2FE83C1AF1A8403CB53F53E486D8511DAD8A04887E5B2352",
"2CD470243453A299FA9E77237716103ABC11A1DF38855ED6F2EE187E9C582BA6"
}
)
|>
], "Address", BlockchainBase -> "Bitcoin"]</lang>
{{output}}
<pre>16UwLL9Risc3QfPqBUvKofHmBQ7wMtjvM</pre>
=={{header|Nim}}==
| |||