Artifact [73cf5b5e94]

Artifact 73cf5b5e94649ec955e7f9df96bb94d7616f0ab785532557909f5864bec0c45d:


# Auto generated from "SHA3_512ShortMsg.rsp"
lappend auto_path [file dirname [file dirname [file dirname [file dirname [file join [pwd] [info script]]]]]]
package require tls
package require tcltest

tcltest::testConstraint SHA3_512 [expr {[lsearch -nocase [tls::digests] SHA3-512] > -1}]
catch {tls::provider legacy}

tcltest::test Hash_SHA3-512-2.1 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data ""} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result a69f73cca23a9ac5c8b567dc185a756e97c982164fe25859e0d1dcc1475c80a615b2123af1f5f94c11e3e9402c3ac558f500199d95b6d3e301758586281dcd26

tcltest::test Hash_SHA3-512-2.2 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex e5]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 150240baf95fb36f8ccb87a19a41767e7aed95125075a2b2dbba6e565e1ce8575f2b042b62e29a04e9440314a821c6224182964d8b557b16a492b3806f4c39c1

tcltest::test Hash_SHA3-512-2.3 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex ef26]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 809b4124d2b174731db14585c253194c8619a68294c8c48947879316fef249b1575da81ab72aad8fae08d24ece75ca1be46d0634143705d79d2f5177856a0437

tcltest::test Hash_SHA3-512-2.4 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 37d518]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 4aa96b1547e6402c0eee781acaa660797efe26ec00b4f2e0aec4a6d10688dd64cbd7f12b3b6c7f802e2096c041208b9289aec380d1a748fdfcd4128553d781e3

tcltest::test Hash_SHA3-512-2.5 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex fc7b8cda]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 58a5422d6b15eb1f223ebe4f4a5281bc6824d1599d979f4c6fe45695ca89014260b859a2d46ebf75f51ff204927932c79270dd7aef975657bb48fe09d8ea008e

tcltest::test Hash_SHA3-512-2.6 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 4775c86b1c]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result ce96da8bcd6bc9d81419f0dd3308e3ef541bc7b030eee1339cf8b3c4e8420cd303180f8da77037c8c1ae375cab81ee475710923b9519adbddedb36db0c199f70

tcltest::test Hash_SHA3-512-2.7 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 71a986d2f662]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result def6aac2b08c98d56a0501a8cb93f5b47d6322daf99e03255457c303326395f765576930f8571d89c01e727cc79c2d4497f85c45691b554e20da810c2bc865ef

tcltest::test Hash_SHA3-512-2.8 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex ec83d707a1414a]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 84fd3775bac5b87e550d03ec6fe4905cc60e851a4c33a61858d4e7d8a34d471f05008b9a1d63044445df5a9fce958cb012a6ac778ecf45104b0fcb979aa4692d

tcltest::test Hash_SHA3-512-2.9 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex af53fa3ff8a3cfb2]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 03c2ac02de1765497a0a6af466fb64758e3283ed83d02c0edb3904fd3cf296442e790018d4bf4ce55bc869cebb4aa1a799afc9d987e776fef5dfe6628e24de97

tcltest::test Hash_SHA3-512-2.10 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 3d6093966950abd846]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 53e30da8b74ae76abf1f65761653ebfbe87882e9ea0ea564addd7cfd5a6524578ad6be014d7799799ef5e15c679582b791159add823b95c91e26de62dcb74cfa

tcltest::test Hash_SHA3-512-2.11 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 1ca984dcc913344370cf]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 6915ea0eeffb99b9b246a0e34daf3947852684c3d618260119a22835659e4f23d4eb66a15d0affb8e93771578f5e8f25b7a5f2a55f511fb8b96325ba2cd14816

tcltest::test Hash_SHA3-512-2.12 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex fc7b8cdadebe48588f6851]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result c8439bb1285120b3c43631a00a3b5ac0badb4113586a3dd4f7c66c5d81012f7412617b169fa6d70f8e0a19e5e258e99a0ed2dcfa774c864c62a010e9b90ca00d

tcltest::test Hash_SHA3-512-2.13 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex ecb907adfb85f9154a3c23e8]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 94ae34fed2ef51a383fb853296e4b797e48e00cad27f094d2f411c400c4960ca4c610bf3dc40e94ecfd0c7a18e418877e182ca3ae5ca5136e2856a5531710f48

tcltest::test Hash_SHA3-512-2.14 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex d91a9c324ece84b072d0753618]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result fb1f06c4d1c0d066bdd850ab1a78b83296eba0ca423bb174d74283f46628e6095539214adfd82b462e8e9204a397a83c6842b721a32e8bb030927a568f3c29e6

tcltest::test Hash_SHA3-512-2.15 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex c61a9188812ae73994bc0d6d4021]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 069e6ab1675fed8d44105f3b62bbf5b8ff7ae804098986879b11e0d7d9b1b4cb7bc47aeb74201f509ddc92e5633abd2cbe0ddca2480e9908afa632c8c8d5af2a

tcltest::test Hash_SHA3-512-2.16 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex a6e7b218449840d134b566290dc896]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 3605a21ce00b289022193b70b535e6626f324739542978f5b307194fcf0a5988f542c0838a0443bb9bb8ff922a6a177fdbd12cf805f3ed809c48e9769c8bbd91

tcltest::test Hash_SHA3-512-2.17 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 054095ba531eec22113cc345e83795c7]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result f3adf5ccf2830cd621958021ef998252f2b6bc4c135096839586d5064a2978154ea076c600a97364bce0e9aab43b7f1f2da93537089de950557674ae6251ca4d

tcltest::test Hash_SHA3-512-2.18 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 5b1ec1c4e920f5b995b6a788b6e989ac29]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 135eea17ca4785482c19cd668b8dd2913216903311fa21f6b670b9b573264f8875b5d3c071d92d63556549e523b2af1f1a508bd1f105d29a436f455cd2ca1604

tcltest::test Hash_SHA3-512-2.19 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 133b497b00932773a53ba9bf8e61d59f05f4]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 783964a1cf41d6d210a8d7c81ce6970aa62c9053cb89e15f88053957ecf607f42af08804e76f2fbdbb31809c9eefc60e233d6624367a3b9c30f8ee5f65be56ac

tcltest::test Hash_SHA3-512-2.20 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 88c050ea6b66b01256bda299f399398e1e3162]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 6bf7fc8e9014f35c4bde6a2c7ce1965d9c1793f25c141021cc1c697d111363b3854953c2b4009df41878b5558e78a9a9092c22b8baa0ed6baca005455c6cca70

tcltest::test Hash_SHA3-512-2.21 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex d7d5363350709e96939e6b68b3bbdef6999ac8d9]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 7a46beca553fffa8021b0989f40a6563a8afb641e8133090bc034ab6763e96d7b7a0da4de3abd5a67d8085f7c28b21a24aefb359c37fac61d3a5374b4b1fb6bb

tcltest::test Hash_SHA3-512-2.22 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 54746a7ba28b5f263d2496bd0080d83520cd2dc503]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result d77048df60e20d03d336bfa634bc9931c2d3c1e1065d3a07f14ae01a085fe7e7fe6a89dc4c7880f1038938aa8fcd99d2a782d1bbe5eec790858173c7830c87a2

tcltest::test Hash_SHA3-512-2.23 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 73df7885830633fc66c9eb16940b017e9c6f9f871978]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 0edee1ea019a5c004fd8ae9dc8c2dd38d4331abe2968e1e9e0c128d2506db981a307c0f19bc2e62487a92992af77588d3ab7854fe1b68302f796b9dcd9f336df

tcltest::test Hash_SHA3-512-2.24 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 14cb35fa933e49b0d0a400183cbbea099c44995fae1163]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result af2ef4b0c01e381b4c382208b66ad95d759ec91e386e953984aa5f07774632d53b581eba32ed1d369c46b0a57fee64a02a0e5107c22f14f2227b1d11424becb5

tcltest::test Hash_SHA3-512-2.25 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 75a06869ca2a6ea857e26e78bb78a139a671ccb098d8205a]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 88be1934385522ae1d739666f395f1d7f99978d62883a261adf5d618d012dfab5224575634446876b86b3e5f7609d397d338a784b4311027b1024ddfd4995a0a

tcltest::test Hash_SHA3-512-2.26 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex b413ab364dd410573b53f4c2f28982ca07061726e5d999f3c2]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 289e889b25f9f38facfccf3bdbceea06ef3baad6e9612b7232cd553f4884a7a642f6583a1a589d4dcb2dc771f1ff6d711b85f731145a89b100680f9a55dcbb3f

tcltest::test Hash_SHA3-512-2.27 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex d7f9053984213ebabc842fd8ce483609a9af5dc140ecdbe63336]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result f167cb30e4bacbdc5ed53bc615f8c9ea19ad4f6bd85ca0ff5fb1f1cbe5b576bda49276aa5814291a7e320f1d687b16ba8d7daab2b3d7e9af3cd9f84a1e9979a1

tcltest::test Hash_SHA3-512-2.28 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 9b7f9d11be48e786a11a472ab2344c57adf62f7c1d4e6d282074b6]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 82fa525d5efaa3cce39bffef8eee01afb52067097f8965cde71703345322645eae59dbaebed0805693104dfb0c5811c5828da9a75d812e5562615248c03ff880

tcltest::test Hash_SHA3-512-2.29 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 115784b1fccfabca457c4e27a24a7832280b7e7d6a123ffce5fdab72]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result ec12c4ed5ae84808883c5351003f7e26e1eaf509c866b357f97472e5e19c84f99f16dbbb8bfff060d6c0fe0ca9c34a210c909b05f6a81f441627ce8e666f6dc7

tcltest::test Hash_SHA3-512-2.30 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex c3b1ad16b2877def8d080477d8b59152fe5e84f3f3380d55182f36eb5f]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 4b9144edeeec28fd52ba4176a78e080e57782d2329b67d8ac8780bb6e8c2057583172af1d068922feaaff759be5a6ea548f5db51f4c34dfe7236ca09a67921c7

tcltest::test Hash_SHA3-512-2.31 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 4c66ca7a01129eaca1d99a08dd7226a5824b840d06d0059c60e97d291dc4]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 567c46f2f636223bd5ed3dc98c3f7a739b42898e70886f132eac43c2a6fadabe0dd9f1b6bc4a9365e5232295ac1ac34701b0fb181d2f7f07a79d033dd426d5a2

tcltest::test Hash_SHA3-512-2.32 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 481041c2f56662316ee85a10b98e103c8d48804f6f9502cf1b51cfa525cec1]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 46f0058abe678195b576df5c7eb8d739468cad1908f7953ea39c93fa1d96845c38a2934d23804864a8368dae38191d983053ccd045a9ab87ef2619e9dd50c8c1

tcltest::test Hash_SHA3-512-2.33 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 7c1688217b313278b9eae8edcf8aa4271614296d0c1e8916f9e0e940d28b88c5]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 627ba4de74d05bb6df8991112e4d373bfced37acde1304e0f664f29fa126cb497c8a1b717b9929120883ec8898968e4649013b760a2180a9dc0fc9b27f5b7f3b

tcltest::test Hash_SHA3-512-2.34 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 785f6513fcd92b674c450e85da22257b8e85bfa65e5d9b1b1ffc5c469ad337d1e3]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 5c11d6e4c5c5f76d26876c5976b6f555c255c785b2f28b6700ca2d8b3b3fa585636239277773330f4cf8c5d5203bcc091b8d47e7743bbc0b5a2c54444ee2acce

tcltest::test Hash_SHA3-512-2.35 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 34f4468e2d567b1e326c0942970efa32c5ca2e95d42c98eb5d3cab2889490ea16ee5]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 49adfa335e183c94b3160154d6698e318c8b5dd100b0227e3e34cabea1fe0f745326220f64263961349996bbe1aae9054de6406e8b350408ab0b9f656bb8daf7

tcltest::test Hash_SHA3-512-2.36 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 53a0121c8993b6f6eec921d2445035dd90654add1298c6727a2aed9b59bafb7dd62070]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 918b4d92e1fcb65a4c1fa0bd75c562ac9d83186bb2fbfae5c4784de31a14654546e107df0e79076b8687bb3841c83ba9181f9956cd43428ba72f603881b33a71

tcltest::test Hash_SHA3-512-2.37 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex d30fa4b40c9f84ac9bcbb535e86989ec6d1bec9b1b22e9b0f97370ed0f0d566082899d96]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 39f104c1da4af314d6bceb34eca1dfe4e67484519eb76ba38e4701e113e6cbc0200df86e4439d674b0f42c72233360478ba5244384d28e388c87aaa817007c69

tcltest::test Hash_SHA3-512-2.38 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex f34d100269aee3ead156895e8644d4749464d5921d6157dffcbbadf7a719aee35ae0fd4872]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 565a1dd9d49f8ddefb79a3c7a209f53f0bc9f5396269b1ce2a2b283a3cb45ee3ae652e4ca10b26ced7e5236227006c94a37553db1b6fe5c0c2eded756c896bb1

tcltest::test Hash_SHA3-512-2.39 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 12529769fe5191d3fce860f434ab1130ce389d340fca232cc50b7536e62ad617742e022ea38a]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result daee10e815fff0f0985d208886e22f9bf20a3643eb9a29fda469b6a7dcd54b5213c851d6f19338d63688fe1f02936c5dae1b7c6d5906a13a9eeb934400b6fe8c

tcltest::test Hash_SHA3-512-2.40 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex b2e3a0eb36bf16afb618bfd42a56789179147effecc684d8e39f037ec7b2d23f3f57f6d7a7d0bb]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 04029d6d9e8e394afa387f1d03ab6b8a0a6cbab4b6b3c86ef62f7142ab3c108388d42cb87258b9e6d36e5814d8a662657cf717b35a5708365e8ec0396ec5546b

tcltest::test Hash_SHA3-512-2.41 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 25c4a5f4a07f2b81e0533313664bf615c73257e6b2930e752fe5050e25ff02731fd2872f4f56f727]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result ec2d38e5bb5d7b18438d5f2029c86d05a03510db0e66aa299c28635abd0988c58be203f04b7e0cc25451d18f2341cd46f8705d46c2066dafab30d90d63bf3d2c

tcltest::test Hash_SHA3-512-2.42 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 134bb8e7ea5ff9edb69e8f6bbd498eb4537580b7fba7ad31d0a09921237acd7d66f4da23480b9c1222]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 8f966aef96831a1499d63560b2578021ad970bf7557b8bf8078b3e12cefab122fe71b1212dc704f7094a40b36b71d3ad7ce2d30f72c1baa4d4bbccb3251198ac

tcltest::test Hash_SHA3-512-2.43 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex f793256f039fad11af24cee4d223cd2a771598289995ab802b5930ba5c666a24188453dcd2f0842b8152]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 22c3d9712535153a3e206b1033929c0fd9d937c39ba13cf1a6544dfbd68ebc94867b15fda3f1d30b00bf47f2c4bf41dabdeaa5c397dae901c57db9cd77ddbcc0

tcltest::test Hash_SHA3-512-2.44 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 23cc7f9052d5e22e6712fab88e8dfaa928b6e015ca589c3b89cb745b756ca7c7634a503bf0228e71c28ee2]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 6ecf3ad6064218ee101a555d20fab6cbeb6b145b4eeb9c8c971fc7ce05581a34b3c52179590e8a134be2e88c7e549875f4ff89b96374c6995960de3a5098cced

tcltest::test Hash_SHA3-512-2.45 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex a60b7b3df15b3f1b19db15d480388b0f3b00837369aa2cc7c3d7315775d7309a2d6f6d1371d9c875350dec0a]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 8d651605c6b32bf022ea06ce6306b2ca6b5ba2781af87ca2375860315c83ad88743030d148ed8d73194c461ec1e84c045fc914705747614c04c8865b51da94f7

tcltest::test Hash_SHA3-512-2.46 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 2745dd2f1b215ea509a912e5761cccc4f19fa93ba38445c528cb2f099de99ab9fac955baa211fd8539a671cdb6]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 4af918eb676ce278c730212ef79d818773a76a43c74d643f238e9b61acaf4030c617c4d6b3b7514c59b3e5e95d82e1e1e35443e851718b13b63e70b123d1b72c

tcltest::test Hash_SHA3-512-2.47 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 88adee4b46d2a109c36fcfb660f17f48062f7a74679fb07e86cad84f79fd57c86d426356ec8e68c65b3caa5bc7ba]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 6257acb9f589c919c93c0adc4e907fe011bef6018fbb18e618ba6fcc8cbc5e40641be589e86dbb0cf7d7d6bf33b98d8458cce0af7857f5a7c7647cf350e25af0

tcltest::test Hash_SHA3-512-2.48 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 7d40f2dc4af3cfa12b00d64940dc32a22d66d81cb628be2b8dda47ed6728020d55b695e75260f4ec18c6d74839086a]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 5c46c84a0a02d898ed5885ce99c47c77afd29ae015d027f2485d630f9b41d00b7c1f1faf6ce57a08b604b35021f7f79600381994b731bd8e6a5b010aeb90e1eb

tcltest::test Hash_SHA3-512-2.49 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 3689d8836af0dc132f85b212eb670b41ecf9d4aba141092a0a8eca2e6d5eb0ba4b7e61af9273624d14192df7388a8436]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 17355e61d66e40f750d0a9a8e8a88cd6f9bf6070b7efa76442698740b4487ea6c644d1654ef16a265204e03084a14cafdccf8ff298cd54c0b4009967b6dd47cc

tcltest::test Hash_SHA3-512-2.50 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 58ff23dee2298c2ca7146227789c1d4093551047192d862fc34c1112d13f1f744456cecc4d4a02410523b4b15e598df75a]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result aca89aa547c46173b4b2a380ba980da6f9ac084f46ac9ddea5e4164aeef31a9955b814a45aec1d8ce340bd37680952c5d68226dda1cac2677f73c9fd9174fd13

tcltest::test Hash_SHA3-512-2.51 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 67f3f23df3bd8ebeb0096452fe4775fd9cc71fbb6e72fdcc7eb8094f42c903121d0817a927bcbabd3109d5a70420253deab2]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result f4207cc565f266a245f29bf20b95b5d9a83e1bb68ad988edc91faa25f25286c8398bac7dd6628259bff98f28360f263dfc54c4228bc437c5691de1219b758d9f

tcltest::test Hash_SHA3-512-2.52 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex a225070c2cb122c3354c74a254fc7b84061cba33005cab88c409fbd3738ff67ce23c41ebef46c7a61610f5b93fa92a5bda9569]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result e815a9a4e4887be014635e97958341e0519314b3a3289e1835121b153b462272b0aca418be96d60e5ab355d3eb463697c0191eb522b60b8463d89f4c3f1bf142

tcltest::test Hash_SHA3-512-2.53 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 6aa0886777e99c9acd5f1db6e12bda59a807f92411ae99c9d490b5656acb4b115c57beb3c1807a1b029ad64be1f03e15bafd91ec]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 241f2ebaf7ad09e173b184244e69acd7ebc94774d0fa3902cbf267d4806063b044131bcf4af4cf180eb7bd4e7960ce5fe3dc6aebfc6b90eec461f414f79a67d9

tcltest::test Hash_SHA3-512-2.54 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 6a06092a3cd221ae86b286b31f326248270472c5ea510cb9064d6024d10efee7f59e98785d4f09da554e97cdec7b75429d788c112f]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result d14a1a47f2bef9e0d4b3e90a6be9ab5893e1110b12db38d33ffb9a61e1661aecc4ea100839cfee58a1c5aff72915c14170dd99e13f71b0a5fc1985bf43415cb0

tcltest::test Hash_SHA3-512-2.55 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex dfc3fa61f7fffc7c88ed90e51dfc39a4f288b50d58ac83385b58a3b2a3a39d729862c40fcaf9bc308f713a43eecb0b72bb9458d204ba]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 947bc873dc41df195f8045deb6ea1b840f633917e79c70a88d38b8862197dc2ab0cc6314e974fb5ba7e1703b22b1309e37bd430879056bdc166573075a9c5e04

tcltest::test Hash_SHA3-512-2.56 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 52958b1ff0049efa5d050ab381ec99732e554dcd03725da991a37a80bd4756cf65d367c54721e93f1e0a22f70d36e9f841336956d3c523]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 9cc5aad0f529f4bac491d733537b69c8ec700fe38ab423d815e0927c8657f9cb8f4207762d816ab697580122066bc2b68f4177335d0a6e9081540779e572c41f

tcltest::test Hash_SHA3-512-2.57 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 302fa84fdaa82081b1192b847b81ddea10a9f05a0f04138fd1da84a39ba5e18e18bc3cea062e6df92ff1ace89b3c5f55043130108abf631e]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 8c8eaae9a445643a37df34cfa6a7f09deccab2a222c421d2fc574bbc5641e504354391e81eb5130280b1226812556d474e951bb78dbdd9b77d19f647e2e7d7be

tcltest::test Hash_SHA3-512-2.58 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex b82f500d6bc2dddcdc162d46cbfaa5ae64025d5c1cd72472dcd2c42161c9871ce329f94df445f0c8aceecafd0344f6317ecbb62f0ec2223a35]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 55c69d7accd179d5d9fcc522f794e7af5f0eec7198ffa39f80fb55b866c0857ff3e7aeef33e130d9c74ef90606ca821d20b7608b12e6e561f9e6c7122ace3db0

tcltest::test Hash_SHA3-512-2.59 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 86da9107ca3e16a2b58950e656a15c085b88033e79313e2c0f92f99f06fa187efba5b8fea08eb7145f8476304180dd280f36a072b7eac197f085]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 0d3b1a0459b4eca801e0737ff9ea4a12b9a483a73a8a92742a93c297b7149326bd92c1643c8177c8924482ab3bbd916c417580cc75d3d3ae096de531bc5dc355

tcltest::test Hash_SHA3-512-2.60 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 141a6eafe157053e780ac7a57b97990616ce1759ed132cb453bcdfcabdbb70b3767da4eb94125d9c2a8d6d20bfaeacc1ffbe49c4b1bb5da7e9b5c6]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result bdbdd5b94cdc89466e7670c63ba6a55b58294e93b351261a5457bf5a40f1b5b2e0acc7fceb1bfb4c8872777eeeaff7927fd3635ca18c996d870bf86b12b89ba5

tcltest::test Hash_SHA3-512-2.61 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 6e0c65ee0943e34d9bbd27a8547690f2291f5a86d713c2be258e6ac16919fe9c4d491895d3a961bb97f5fac255891a0eaa18f80e1fa1ebcb639fcfc1]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 39ebb992b8d39daae973e3813a50e9e79a67d8458a6f17f97a6dd30dd7d11d95701a11129ffeaf7d45781b21cac0c4c034e389d7590df5beeb9805072d0183b9

tcltest::test Hash_SHA3-512-2.62 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 57780b1c79e67fc3beaabead4a67a8cc98b83fa7647eae50c8798b96a516597b448851e93d1a62a098c4767333fcf7b463ce91edde2f3ad0d98f70716d]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 3ef36c3effad6eb5ad2d0a67780f80d1b90efcb74db20410c2261a3ab0f784429df874814748dc1b6efaab3d06dd0a41ba54fce59b67d45838eaa4aa1fadfa0f

tcltest::test Hash_SHA3-512-2.63 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex bcc9849da4091d0edfe908e7c3386b0cadadb2859829c9dfee3d8ecf9dec86196eb2ceb093c5551f7e9a4927faabcfaa7478f7c899cbef4727417738fc06]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 1fcd8a2c7b4fd98fcdc5fa665bab49bde3f9f556aa66b3646638f5a2d3806192f8a33145d8d0c535c85adff3cc0ea3c2715b33cec9f8886e9f4377b3632e9055

tcltest::test Hash_SHA3-512-2.64 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 05a32829642ed4808d6554d16b9b8023353ce65a935d126602970dba791623004dede90b52ac7f0d4335130a63cba68c656c139989614de20913e83db320db]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 49d8747bb53ddde6d1485965208670d1130bf35619d7506a2f2040d1129fcf0320207e5b36fea083e84ffc98755e691ad8bd5dc66f8972cb9857389344e11aad

tcltest::test Hash_SHA3-512-2.65 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 56ac4f6845a451dac3e8886f97f7024b64b1b1e9c5181c059b5755b9a6042be653a2a0d5d56a9e1e774be5c9312f48b4798019345beae2ffcc63554a3c69862e]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 5fde5c57a31febb98061f27e4506fa5c245506336ee90d595c91d791a5975c712b3ab9b3b5868f941db0aeb4c6d2837c4447442f8402e0e150a9dc0ef178dca8

tcltest::test Hash_SHA3-512-2.66 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 8a229f8d0294fe90d4cc8c875460d5d623f93287f905a999a2ab0f9a47046f78ef88b09445c671189c59388b3017cca2af8bdf59f8a6f04322b1701ec08624ab63]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 16b0fd239cc632842c443e1b92d286dd519cfc616a41f2456dd5cddebd10703c3e9cb669004b7f169bb4f99f350ec96904b0e8dd4de8e6be9953dc892c65099f

tcltest::test Hash_SHA3-512-2.67 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 87d6aa9979025b2437ea8159ea1d3e5d6f17f0a5b913b56970212f56de7884840c0da9a72865e1892aa780b8b8f5f57b46fc070b81ca5f00eee0470ace89b1e1466a]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result d816acf1797decfe34f4cc49e52aa505cc59bd17fe69dc9543fad82e9cf96298183021f704054d3d06adde2bf54e82a090a57b239e88daa04cb76c4fc9127843

tcltest::test Hash_SHA3-512-2.68 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 0823616ab87e4904308628c2226e721bb4169b7d34e8744a0700b721e38fe05e3f813fe4075d4c1a936d3a33da20cfb3e3ac722e7df7865330b8f62a73d9119a1f2199]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result e1da6be4403a4fd784c59be4e71c658a78bb8c5d7d571c5e816fbb3e218a4162f62de1c285f3779781cb5506e29c94e1b7c7d65af2aa71ea5c96d9585b5e45d5

tcltest::test Hash_SHA3-512-2.69 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 7d2d913c2460c09898b20366ae34775b1564f10edea49c073cebe41989bb93f38a533af1f425d3382f8aa40159b567358ee5a73b67df6d0dc09c1c92bf3f9a28124ab07f]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 3aa1e19a52b86cf414d977768bb535b7e5817117d436b4425ec8d775e8cb0e0b538072213884c7ff1bb9ca9984c82d65cb0115cc07332b0ea903e3b38650e88e

tcltest::test Hash_SHA3-512-2.70 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex fca5f68fd2d3a52187b349a8d2726b608fccea7db42e906b8718e85a0ec654fac70f5a839a8d3ff90cfed7aeb5ea9b08f487fc84e1d9f7fb831dea254468a65ba18cc5a126]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 2c74f846ecc722ea4a1eb1162e231b6903291fffa95dd5e1d17dbc2c2be7dfe549a80dd34487d714130ddc9924aed904ad55f49c91c80ceb05c0c034dae0a0a4

tcltest::test Hash_SHA3-512-2.71 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 881ff70ca34a3e1a0e864fd2615ca2a0e63def254e688c37a20ef6297cb3ae4c76d746b5e3d6bb41bd0d05d7df3eeded74351f4eb0ac801abe6dc10ef9b635055ee1dfbf4144]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 9a10a7ce23c0497fe8783927f833232ae664f1e1b91302266b6ace25a9c253d1ecab1aaaa62f865469480b2145ed0e489ae3f3f9f7e6da27492c81b07e606fb6

tcltest::test Hash_SHA3-512-2.72 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex b0de0430c200d74bf41ea0c92f8f28e11b68006a884e0d4b0d884533ee58b38a438cc1a75750b6434f467e2d0cd9aa4052ceb793291b93ef83fd5d8620456ce1aff2941b3605a4]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result 9e9e469ca9226cd012f5c9cc39c96adc22f420030fcee305a0ed27974e3c802701603dac873ae4476e9c3d57e55524483fc01adaef87daa9e304078c59802757

tcltest::test Hash_SHA3-512-2.73 {SHA3_512ShortMsg} \
	-constraints SHA3_512 \
	-setup {set data [binary decode hex 0ce9f8c3a990c268f34efd9befdb0f7c4ef8466cfdb01171f8de70dc5fefa92acbe93d29e2ac1a5c2979129f1ab08c0e77de7924ddf68a209cdfa0adc62f85c18637d9c6b33f4ff8]} \
	-body {tls::digest -digest SHA3-512 -data $data} \
	-match exact -result b018a20fcf831dde290e4fb18c56342efe138472cbe142da6b77eea4fce52588c04c808eb32912faa345245a850346faec46c3a16d39bd2e1ddb1816bc57d2da

# Cleanup
::tcltest::cleanupTests
return