This commit is contained in:
swrup 2026-02-27 02:19:32 +01:00
parent f56ef6b544
commit 2b2a8da540

View file

@ -108,3 +108,10 @@ let () =
List.iter round_trip s_l; List.iter round_trip s_l;
() ()
let () =
let rsa_pub = "040000Y4J0J917YF81MQP5668F5FXCT29FDSYC5DRXG7KEZ7HKX5P4V0EZDRWC3NMX60WC13TPJN0BABH9XXMGHN8EGZD25Z47485QD7WN0BWWQ7XNB3391RGGADFFJEQDF137CP7AAEF2FSCK2ZYM89D7K8MA8D3TB3DCCGA55TZ6K63PAJ56ZPHRWDD9QKGRJ2YMDHXA8D2VBH4B9WBVSNH7JSHM1NBZDH2751YNXE25SJBDEH4AQCB61D99VE4EMSX9W6Y49BA1FCZ46CA3QGC4642SP4S5SRGCS02CBT3Z3WSX4B6RYNDPHQ21PCTG85M12ZFBEBXD382JK0ACM6KQJ56S8318E8YPD1F7DXE52S53ACC1T03DBXBBD4A2T32XMSZ9SHXPJBBGNNR9DD3NQGT3SH04002" in
let h_pub = "
Fmt.epr "h_pub: %s@."
(B32.encode @@ Hash.DenominationHash.to_octets h_pub);