TclTLS: Hex Artifact Content

Artifact 3a294388e34b95594aedfdc04812a07d883890b5d6f3e1ac810cd6647ba01e15:

File tests/test_vectors/Hash/SHA3_224ShortMsg.test — part of check-in [8440f589be] at 2024-02-11 21:24:47 on branch crypto — Updated test cases for OpenSSL 3.0. Added load legacy provider for obsolete algorithms. (user: bohagan, size: 57944) [annotate] [blame] [check-ins using]
0000: 23 20 41 75 74 6f 20 67 65 6e 65 72 61 74 65 64  # Auto generated
0010: 20 66 72 6f 6d 20 22 53 48 41 33 5f 32 32 34 53   from "SHA3_224S
0020: 68 6f 72 74 4d 73 67 2e 72 73 70 22 0a 6c 61 70  hortMsg.rsp".lap
0030: 70 65 6e 64 20 61 75 74 6f 5f 70 61 74 68 20 5b  pend auto_path [
0040: 66 69 6c 65 20 64 69 72 6e 61 6d 65 20 5b 66 69  file dirname [fi
0050: 6c 65 20 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65  le dirname [file
0060: 20 64 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 64   dirname [file d
0070: 69 72 6e 61 6d 65 20 5b 66 69 6c 65 20 6a 6f 69  irname [file joi
0080: 6e 20 5b 70 77 64 5d 20 5b 69 6e 66 6f 20 73 63  n [pwd] [info sc
0090: 72 69 70 74 5d 5d 5d 5d 5d 5d 0a 70 61 63 6b 61  ript]]]]]].packa
00a0: 67 65 20 72 65 71 75 69 72 65 20 74 6c 73 0a 70  ge require tls.p
00b0: 61 63 6b 61 67 65 20 72 65 71 75 69 72 65 20 74  ackage require t
00c0: 63 6c 74 65 73 74 0a 0a 74 63 6c 74 65 73 74 3a  cltest..tcltest:
00d0: 3a 74 65 73 74 43 6f 6e 73 74 72 61 69 6e 74 20  :testConstraint 
00e0: 53 48 41 33 5f 32 32 34 20 5b 65 78 70 72 20 7b  SHA3_224 [expr {
00f0: 5b 6c 73 65 61 72 63 68 20 2d 6e 6f 63 61 73 65  [lsearch -nocase
0100: 20 5b 74 6c 73 3a 3a 64 69 67 65 73 74 73 5d 20   [tls::digests] 
0110: 53 48 41 33 2d 32 32 34 5d 20 3e 20 2d 31 7d 5d  SHA3-224] > -1}]
0120: 0a 63 61 74 63 68 20 7b 74 6c 73 3a 3a 70 72 6f  .catch {tls::pro
0130: 76 69 64 65 72 20 6c 65 67 61 63 79 7d 0a 0a 74  vider legacy}..t
0140: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73  cltest::test Has
0150: 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31 20 7b  h_SHA3-224-2.1 {
0160: 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67  SHA3_224ShortMsg
0170: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
0180: 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73  s SHA3_224 \..-s
0190: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 22  etup {set data "
01a0: 22 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  "} \..-body {tls
01b0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
01c0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
01d0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
01e0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36   exact -result 6
01f0: 62 34 65 30 33 34 32 33 36 36 37 64 62 62 37 33  b4e03423667dbb73
0200: 62 36 65 31 35 34 35 34 66 30 65 62 31 61 62 64  b6e15454f0eb1abd
0210: 34 35 39 37 66 39 61 31 62 30 37 38 65 33 66 35  4597f9a1b078e3f5
0220: 62 35 61 36 62 63 37 0a 0a 74 63 6c 74 65 73 74  b5a6bc7..tcltest
0230: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
0240: 2d 32 32 34 2d 32 2e 32 20 7b 53 48 41 33 5f 32  -224-2.2 {SHA3_2
0250: 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d  24ShortMsg} \..-
0260: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33  constraints SHA3
0270: 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b  _224 \..-setup {
0280: 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79  set data [binary
0290: 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 5d 7d   decode hex 01]}
02a0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a   \..-body {tls::
02b0: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53  digest -digest S
02c0: 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64  HA3-224 -data $d
02d0: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  ata} \..-match e
02e0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 34 38 38  xact -result 488
02f0: 32 38 36 64 39 64 33 32 37 31 36 65 35 38 38 31  286d9d32716e5881
0300: 65 61 31 65 65 35 31 66 33 36 64 33 36 36 30 64  ea1ee51f36d3660d
0310: 37 30 66 30 64 62 30 33 62 33 66 36 31 32 63 65  70f0db03b3f612ce
0320: 39 65 64 61 34 0a 0a 74 63 6c 74 65 73 74 3a 3a  9eda4..tcltest::
0330: 74 65 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32  test Hash_SHA3-2
0340: 32 34 2d 32 2e 33 20 7b 53 48 41 33 5f 32 32 34  24-2.3 {SHA3_224
0350: 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f  ShortMsg} \..-co
0360: 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32  nstraints SHA3_2
0370: 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  24 \..-setup {se
0380: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  t data [binary d
0390: 65 63 6f 64 65 20 68 65 78 20 36 39 63 62 5d 7d  ecode hex 69cb]}
03a0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a   \..-body {tls::
03b0: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53  digest -digest S
03c0: 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64  HA3-224 -data $d
03d0: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  ata} \..-match e
03e0: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 39 34 62  xact -result 94b
03f0: 64 32 35 63 34 63 66 36 63 61 38 38 39 31 32 36  d25c4cf6ca889126
0400: 64 66 33 37 64 64 64 39 63 33 36 65 36 61 39 62  df37ddd9c36e6a9b
0410: 32 38 61 34 66 65 31 35 63 63 33 64 61 36 64 65  28a4fe15cc3da6de
0420: 62 63 64 64 37 0a 0a 74 63 6c 74 65 73 74 3a 3a  bcdd7..tcltest::
0430: 74 65 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32  test Hash_SHA3-2
0440: 32 34 2d 32 2e 34 20 7b 53 48 41 33 5f 32 32 34  24-2.4 {SHA3_224
0450: 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f  ShortMsg} \..-co
0460: 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32  nstraints SHA3_2
0470: 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  24 \..-setup {se
0480: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  t data [binary d
0490: 65 63 6f 64 65 20 68 65 78 20 62 66 35 38 33 31  ecode hex bf5831
04a0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
04b0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
04c0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
04d0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
04e0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 31   exact -result 1
04f0: 62 62 33 36 62 65 62 64 65 35 66 33 63 62 36 64  bb36bebde5f3cb6d
0500: 38 65 34 36 37 32 61 63 66 36 65 65 63 38 37 32  8e4672acf6eec872
0510: 38 66 33 31 61 35 34 64 61 63 63 32 35 36 30 64  8f31a54dacc2560d
0520: 61 32 61 30 30 63 63 0a 0a 74 63 6c 74 65 73 74  a2a00cc..tcltest
0530: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
0540: 2d 32 32 34 2d 32 2e 35 20 7b 53 48 41 33 5f 32  -224-2.5 {SHA3_2
0550: 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d  24ShortMsg} \..-
0560: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33  constraints SHA3
0570: 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b  _224 \..-setup {
0580: 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79  set data [binary
0590: 20 64 65 63 6f 64 65 20 68 65 78 20 64 31 34 38   decode hex d148
05a0: 63 65 36 64 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20  ce6d]} \..-body 
05b0: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69  {tls::digest -di
05c0: 67 65 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64  gest SHA3-224 -d
05d0: 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d  ata $data} \..-m
05e0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
05f0: 6c 74 20 30 62 35 32 31 64 61 63 31 65 66 65 32  lt 0b521dac1efe2
0600: 39 32 65 32 30 64 66 62 35 38 35 63 38 62 66 66  92e20dfb585c8bff
0610: 34 38 31 38 39 39 64 66 37 32 64 35 39 39 38 33  481899df72d59983
0620: 33 31 35 39 35 38 33 39 31 62 61 0a 0a 74 63 6c  315958391ba..tcl
0630: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
0640: 53 48 41 33 2d 32 32 34 2d 32 2e 36 20 7b 53 48  SHA3-224-2.6 {SH
0650: 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20  A3_224ShortMsg} 
0660: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
0670: 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74  SHA3_224 \..-set
0680: 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69  up {set data [bi
0690: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
06a0: 39 31 63 37 31 30 36 38 66 38 5d 7d 20 5c 0a 09  91c71068f8]} \..
06b0: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65  -body {tls::dige
06c0: 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d  st -digest SHA3-
06d0: 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d  224 -data $data}
06e0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
06f0: 20 2d 72 65 73 75 6c 74 20 39 38 39 66 30 31 37   -result 989f017
0700: 37 30 39 66 35 30 62 64 30 32 33 30 36 32 33 63  709f50bd0230623c
0710: 34 31 37 66 33 64 61 66 31 39 34 35 30 37 66 37  417f3daf194507f7
0720: 62 39 30 61 31 31 31 32 37 62 61 31 36 33 38 66  b90a11127ba1638f
0730: 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  a..tcltest::test
0740: 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32   Hash_SHA3-224-2
0750: 2e 37 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72  .7 {SHA3_224Shor
0760: 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  tMsg} \..-constr
0770: 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c  aints SHA3_224 \
0780: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61  ..-setup {set da
0790: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
07a0: 65 20 68 65 78 20 65 37 31 38 33 65 34 64 38 39  e hex e7183e4d89
07b0: 63 39 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74  c9]} \..-body {t
07c0: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65  ls::digest -dige
07d0: 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74  st SHA3-224 -dat
07e0: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74  a $data} \..-mat
07f0: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
0800: 20 36 35 30 36 31 38 66 33 62 39 34 35 63 30 37   650618f3b945c07
0810: 64 65 38 35 62 38 34 37 38 64 36 39 36 30 39 36  de85b8478d696096
0820: 34 37 64 35 65 32 61 34 33 32 63 36 62 31 35 66  47d5e2a432c6b15f
0830: 62 62 33 64 62 39 31 65 34 0a 0a 74 63 6c 74 65  bb3db91e4..tclte
0840: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48  st::test Hash_SH
0850: 41 33 2d 32 32 34 2d 32 2e 38 20 7b 53 48 41 33  A3-224-2.8 {SHA3
0860: 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a  _224ShortMsg} \.
0870: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48  .-constraints SH
0880: 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70  A3_224 \..-setup
0890: 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61   {set data [bina
08a0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 64 38  ry decode hex d8
08b0: 35 65 34 37 30 61 37 63 36 39 38 38 5d 7d 20 5c  5e470a7c6988]} \
08c0: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69  ..-body {tls::di
08d0: 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41  gest -digest SHA
08e0: 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74  3-224 -data $dat
08f0: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
0900: 63 74 20 2d 72 65 73 75 6c 74 20 38 61 31 33 34  ct -result 8a134
0910: 63 33 33 63 37 61 62 64 36 37 33 63 64 33 64 30  c33c7abd673cd3d0
0920: 63 33 33 39 35 36 37 30 30 37 36 30 64 65 39 38  c33956700760de98
0930: 30 63 35 61 65 65 37 34 63 39 36 65 36 62 61 30  0c5aee74c96e6ba0
0940: 38 62 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  8b2..tcltest::te
0950: 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34  st Hash_SHA3-224
0960: 2d 32 2e 39 20 7b 53 48 41 33 5f 32 32 34 53 68  -2.9 {SHA3_224Sh
0970: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
0980: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
0990: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
09a0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
09b0: 6f 64 65 20 68 65 78 20 65 34 65 61 32 63 31 36  ode hex e4ea2c16
09c0: 33 36 36 62 38 30 64 36 5d 7d 20 5c 0a 09 2d 62  366b80d6]} \..-b
09d0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
09e0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
09f0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
0a00: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
0a10: 72 65 73 75 6c 74 20 37 64 64 31 61 38 65 33 66  result 7dd1a8e3f
0a20: 66 65 38 63 39 39 63 63 35 34 37 61 36 39 61 66  fe8c99cc547a69af
0a30: 31 34 62 64 36 33 62 31 35 61 63 32 36 62 64 33  14bd63b15ac26bd3
0a40: 64 33 36 62 38 61 39 39 35 31 33 65 38 39 65 0a  d36b8a99513e89e.
0a50: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
0a60: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31  ash_SHA3-224-2.1
0a70: 30 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  0 {SHA3_224Short
0a80: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
0a90: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
0aa0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
0ab0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
0ac0: 20 68 65 78 20 62 32 39 33 37 33 66 36 66 38 38   hex b29373f6f88
0ad0: 33 39 62 64 34 39 38 5d 7d 20 5c 0a 09 2d 62 6f  39bd498]} \..-bo
0ae0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
0af0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
0b00: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
0b10: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
0b20: 65 73 75 6c 74 20 65 30 32 61 31 33 66 61 34 37  esult e02a13fa47
0b30: 37 30 66 38 32 34 62 63 64 36 39 37 39 39 32 38  70f824bcd6979928
0b40: 34 38 37 38 66 31 39 62 66 64 63 38 33 33 61 63  4878f19bfdc833ac
0b50: 36 64 38 36 35 66 32 38 62 37 35 37 64 30 0a 0a  6d865f28b757d0..
0b60: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
0b70: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31 31  sh_SHA3-224-2.11
0b80: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
0b90: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
0ba0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
0bb0: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
0bc0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
0bd0: 68 65 78 20 34 39 65 63 37 32 63 32 39 62 36 33  hex 49ec72c29b63
0be0: 30 33 36 64 62 65 63 64 5d 7d 20 5c 0a 09 2d 62  036dbecd]} \..-b
0bf0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
0c00: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
0c10: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
0c20: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
0c30: 72 65 73 75 6c 74 20 34 37 63 61 62 34 34 36 31  result 47cab4461
0c40: 38 66 36 32 64 64 34 33 31 63 63 62 31 33 62 33  8f62dd431ccb13b3
0c50: 62 39 63 64 39 38 35 64 38 31 36 63 35 64 36 30  b9cd985d816c5d60
0c60: 32 36 61 66 63 33 38 61 32 38 31 61 61 30 30 0a  26afc38a281aa00.
0c70: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
0c80: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31  ash_SHA3-224-2.1
0c90: 32 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  2 {SHA3_224Short
0ca0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
0cb0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
0cc0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
0cd0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
0ce0: 20 68 65 78 20 35 30 32 66 34 65 32 38 61 36 66   hex 502f4e28a6f
0cf0: 65 62 34 63 36 61 31 63 63 34 37 5d 7d 20 5c 0a  eb4c6a1cc47]} \.
0d00: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
0d10: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
0d20: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
0d30: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
0d40: 74 20 2d 72 65 73 75 6c 74 20 62 62 65 36 31 64  t -result bbe61d
0d50: 38 35 62 34 63 61 65 37 31 36 33 32 39 65 32 62  85b4cae716329e2b
0d60: 63 63 34 30 33 38 65 32 38 32 62 34 64 37 38 33  cc4038e282b4d783
0d70: 36 65 62 38 34 36 32 32 38 38 33 35 66 36 35 33  6eb846228835f653
0d80: 30 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  08..tcltest::tes
0d90: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
0da0: 32 2e 31 33 20 7b 53 48 41 33 5f 32 32 34 53 68  2.13 {SHA3_224Sh
0db0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
0dc0: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
0dd0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
0de0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
0df0: 6f 64 65 20 68 65 78 20 65 37 32 33 63 36 34 62  ode hex e723c64b
0e00: 32 32 35 38 62 35 31 32 34 66 38 38 34 30 35 66  2258b5124f88405f
0e10: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
0e20: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
0e30: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
0e40: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
0e50: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64   exact -result d
0e60: 30 39 64 61 30 39 34 63 66 65 66 61 61 64 34 36  09da094cfefaad46
0e70: 62 37 62 33 33 35 38 33 30 61 39 33 30 35 35 37  b7b335830a930557
0e80: 30 66 34 66 34 61 66 65 37 39 66 38 36 32 39 66  0f4f4afe79f8629f
0e90: 66 39 64 30 63 33 64 0a 0a 74 63 6c 74 65 73 74  f9d0c3d..tcltest
0ea0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
0eb0: 2d 32 32 34 2d 32 2e 31 34 20 7b 53 48 41 33 5f  -224-2.14 {SHA3_
0ec0: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
0ed0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
0ee0: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
0ef0: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
0f00: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 64 35  y decode hex 0d5
0f10: 31 32 65 63 65 62 37 34 64 38 61 30 34 37 35 33  12eceb74d8a04753
0f20: 31 63 31 66 37 31 36 5d 7d 20 5c 0a 09 2d 62 6f  1c1f716]} \..-bo
0f30: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
0f40: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
0f50: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
0f60: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
0f70: 65 73 75 6c 74 20 32 39 61 65 30 37 34 34 30 35  esult 29ae074405
0f80: 31 65 35 35 31 36 37 31 37 36 33 31 37 65 62 31  1e55167176317eb1
0f90: 37 38 35 30 61 32 32 39 33 39 64 38 64 39 34 65  7850a22939d8d94e
0fa0: 62 62 30 61 39 30 62 36 64 39 38 66 64 65 0a 0a  bb0a90b6d98fde..
0fb0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
0fc0: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31 35  sh_SHA3-224-2.15
0fd0: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
0fe0: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
0ff0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
1000: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
1010: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1020: 68 65 78 20 33 62 39 61 62 37 36 61 32 33 61 65  hex 3b9ab76a23ae
1030: 35 36 33 34 30 62 35 66 34 62 38 30 65 31 66 33  56340b5f4b80e1f3
1040: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
1050: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
1060: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
1070: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
1080: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63   exact -result c
1090: 30 39 30 33 62 65 39 36 66 33 38 30 35 31 63 66  0903be96f38051cf
10a0: 63 32 61 35 61 64 32 35 36 61 61 30 62 38 33 33  c2a5ad256aa0b833
10b0: 32 32 31 37 66 34 35 30 65 61 62 39 30 34 65 65  2217f450eab904ee
10c0: 38 34 62 36 35 34 31 0a 0a 74 63 6c 74 65 73 74  84b6541..tcltest
10d0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
10e0: 2d 32 32 34 2d 32 2e 31 36 20 7b 53 48 41 33 5f  -224-2.16 {SHA3_
10f0: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
1100: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
1110: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
1120: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
1130: 79 20 64 65 63 6f 64 65 20 68 65 78 20 65 39 66  y decode hex e9f
1140: 65 66 37 35 31 61 32 30 32 39 37 61 64 31 39 33  ef751a20297ad193
1150: 38 36 36 32 64 31 33 31 65 37 61 5d 7d 20 5c 0a  8662d131e7a]} \.
1160: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
1170: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
1180: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
1190: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
11a0: 74 20 2d 72 65 73 75 6c 74 20 34 38 65 62 61 33  t -result 48eba3
11b0: 36 64 66 65 30 35 37 35 35 39 37 64 31 33 63 61  6dfe0575597d13ca
11c0: 32 36 31 33 33 32 36 37 31 39 39 64 61 65 37 36  26133267199dae76
11d0: 64 36 33 64 31 62 39 65 39 36 31 32 37 32 30 64  d63d1b9e9612720d
11e0: 30 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  08..tcltest::tes
11f0: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
1200: 32 2e 31 37 20 7b 53 48 41 33 5f 32 32 34 53 68  2.17 {SHA3_224Sh
1210: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
1220: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
1230: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
1240: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
1250: 6f 64 65 20 68 65 78 20 32 62 62 62 34 32 62 39  ode hex 2bbb42b9
1260: 32 30 62 37 66 65 62 34 65 33 39 36 32 61 31 35  20b7feb4e3962a15
1270: 35 32 63 63 33 39 30 66 5d 7d 20 5c 0a 09 2d 62  52cc390f]} \..-b
1280: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
1290: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
12a0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
12b0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
12c0: 72 65 73 75 6c 74 20 30 64 66 61 36 31 66 36 62  result 0dfa61f6b
12d0: 34 33 39 62 66 38 65 33 61 36 66 33 37 38 66 65  439bf8e3a6f378fe
12e0: 33 30 61 34 31 33 34 65 38 62 32 64 66 62 36 35  30a4134e8b2dfb65
12f0: 32 39 39 37 61 32 61 37 36 63 32 37 38 39 66 0a  2997a2a76c2789f.
1300: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
1310: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31  ash_SHA3-224-2.1
1320: 38 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  8 {SHA3_224Short
1330: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
1340: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
1350: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
1360: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
1370: 20 68 65 78 20 32 32 35 34 65 31 30 30 62 64 65   hex 2254e100bde
1380: 39 32 39 35 30 39 33 35 36 35 61 39 34 38 37 37  9295093565a94877
1390: 63 32 31 64 30 35 61 5d 7d 20 5c 0a 09 2d 62 6f  c21d05a]} \..-bo
13a0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
13b0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
13c0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
13d0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
13e0: 65 73 75 6c 74 20 36 39 36 35 32 35 36 34 36 33  esult 6965256463
13f0: 32 37 36 64 62 62 32 36 61 64 33 34 61 33 37 38  276dbb26ad34a378
1400: 63 34 62 61 63 61 65 61 65 37 39 64 37 30 30 32  c4bacaeae79d7002
1410: 38 33 62 31 38 38 64 34 34 64 37 33 65 62 0a 0a  83b188d44d73eb..
1420: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
1430: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31 39  sh_SHA3-224-2.19
1440: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
1450: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
1460: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
1470: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
1480: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1490: 68 65 78 20 37 38 34 65 66 37 61 64 65 63 62 62  hex 784ef7adecbb
14a0: 39 61 34 63 62 35 61 63 31 64 66 38 35 31 33 64  9a4cb5ac1df8513d
14b0: 38 37 61 65 39 37 37 32 5d 7d 20 5c 0a 09 2d 62  87ae9772]} \..-b
14c0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
14d0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
14e0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
14f0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
1500: 72 65 73 75 6c 74 20 65 39 31 38 61 35 64 35 32  result e918a5d52
1510: 61 30 64 34 32 61 62 38 62 61 32 65 61 33 38 36  a0d42ab8ba2ea386
1520: 65 62 36 61 64 38 33 63 62 38 64 64 39 61 36 62  eb6ad83cb8dd9a6b
1530: 64 34 36 31 35 30 36 62 65 33 35 36 65 61 64 0a  d461506be356ead.
1540: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
1550: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 32  ash_SHA3-224-2.2
1560: 30 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  0 {SHA3_224Short
1570: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
1580: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
1590: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
15a0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
15b0: 20 68 65 78 20 66 34 65 36 38 39 36 34 66 37 38   hex f4e68964f78
15c0: 34 66 65 35 63 34 64 30 65 30 30 62 62 34 36 32  4fe5c4d0e00bb462
15d0: 32 30 34 32 66 61 37 30 34 38 65 5d 7d 20 5c 0a  2042fa7048e]} \.
15e0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
15f0: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
1600: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
1610: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
1620: 74 20 2d 72 65 73 75 6c 74 20 37 36 35 66 30 35  t -result 765f05
1630: 30 63 39 35 61 65 33 33 34 37 63 66 33 66 34 66  0c95ae3347cf3f4f
1640: 35 30 33 32 62 34 32 38 66 61 65 61 62 31 33 36  5032b428faeab136
1650: 39 34 65 38 63 37 37 39 38 65 61 66 62 38 32 34  94e8c7798eafb824
1660: 37 35 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  75..tcltest::tes
1670: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
1680: 32 2e 32 31 20 7b 53 48 41 33 5f 32 32 34 53 68  2.21 {SHA3_224Sh
1690: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
16a0: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
16b0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
16c0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
16d0: 6f 64 65 20 68 65 78 20 61 39 63 61 37 65 63 37  ode hex a9ca7ec7
16e0: 61 61 66 38 39 64 62 33 35 32 66 65 63 62 61 36  aaf89db352fecba6
16f0: 34 36 66 66 37 33 65 66 65 38 65 34 61 37 65 38  46ff73efe8e4a7e8
1700: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
1710: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
1720: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
1730: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
1740: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36   exact -result 6
1750: 35 64 36 61 34 39 37 33 39 63 30 65 32 38 37 35  5d6a49739c0e2875
1760: 38 34 66 66 39 64 31 66 33 34 36 33 63 65 32 65  84ff9d1f3463ce2e
1770: 35 35 35 61 65 39 36 37 38 31 34 37 65 32 31 62  555ae9678147e21b
1780: 35 38 38 39 65 39 38 0a 0a 74 63 6c 74 65 73 74  5889e98..tcltest
1790: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
17a0: 2d 32 32 34 2d 32 2e 32 32 20 7b 53 48 41 33 5f  -224-2.22 {SHA3_
17b0: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
17c0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
17d0: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
17e0: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
17f0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 62 32 66  y decode hex b2f
1800: 37 30 31 38 35 38 31 61 34 65 34 35 39 63 66 39  7018581a4e459cf9
1810: 62 39 64 39 38 31 36 66 63 31 37 39 30 33 62 61  b9d9816fc17903ba
1820: 38 30 33 33 66 31 33 5d 7d 20 5c 0a 09 2d 62 6f  8033f13]} \..-bo
1830: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
1840: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
1850: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
1860: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
1870: 65 73 75 6c 74 20 63 36 38 33 37 66 31 32 32 32  esult c6837f1222
1880: 37 62 66 62 64 38 36 63 63 66 65 37 39 34 30 35  7bfbd86ccfe79405
1890: 33 63 65 33 61 35 34 30 35 32 63 38 63 61 38 34  3ce3a54052c8ca84
18a0: 33 30 66 35 32 36 66 64 36 34 62 35 66 32 0a 0a  30f526fd64b5f2..
18b0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
18c0: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 32 33  sh_SHA3-224-2.23
18d0: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
18e0: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
18f0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
1900: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
1910: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1920: 68 65 78 20 66 35 30 30 38 36 62 34 64 63 37 62  hex f50086b4dc7b
1930: 63 61 30 62 61 65 63 30 30 37 36 61 38 37 38 64  ca0baec0076a878d
1940: 64 38 39 35 37 31 64 35 32 65 34 37 38 35 35 62  d89571d52e47855b
1950: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
1960: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
1970: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
1980: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
1990: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65   exact -result e
19a0: 33 39 61 61 39 36 66 61 64 35 38 31 39 36 31 62  39aa96fad581961b
19b0: 64 61 30 33 32 65 64 33 33 64 63 65 33 36 64 65  da032ed33dce36de
19c0: 66 64 65 39 35 38 62 61 66 39 62 61 65 35 64 63  fde958baf9bae5dc
19d0: 35 35 38 63 66 38 39 0a 0a 74 63 6c 74 65 73 74  558cf89..tcltest
19e0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
19f0: 2d 32 32 34 2d 32 2e 32 34 20 7b 53 48 41 33 5f  -224-2.24 {SHA3_
1a00: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
1a10: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
1a20: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
1a30: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
1a40: 79 20 64 65 63 6f 64 65 20 68 65 78 20 36 65 36  y decode hex 6e6
1a50: 65 66 39 36 33 66 35 30 30 30 64 30 62 39 31 62  ef963f5000d0b91b
1a60: 30 61 64 35 33 37 64 64 63 39 36 39 37 66 38 64  0ad537ddc9697f8d
1a70: 62 38 66 31 30 61 33 64 35 65 65 5d 7d 20 5c 0a  b8f10a3d5ee]} \.
1a80: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
1a90: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
1aa0: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
1ab0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
1ac0: 74 20 2d 72 65 73 75 6c 74 20 36 36 64 63 62 32  t -result 66dcb2
1ad0: 39 32 62 34 64 36 62 62 34 63 64 64 34 30 39 39  92b4d6bb4cdd4099
1ae0: 62 38 65 37 62 66 65 61 39 36 35 38 36 38 30 63  b8e7bfea9658680c
1af0: 39 32 63 35 31 35 36 32 63 30 39 31 35 37 37 30  92c51562c0915770
1b00: 35 36 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  56..tcltest::tes
1b10: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
1b20: 32 2e 32 35 20 7b 53 48 41 33 5f 32 32 34 53 68  2.25 {SHA3_224Sh
1b30: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
1b40: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
1b50: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
1b60: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
1b70: 6f 64 65 20 68 65 78 20 31 32 61 37 62 31 61 37  ode hex 12a7b1a7
1b80: 33 62 30 62 32 36 61 36 36 33 36 32 65 63 32 61  3b0b26a66362ec2a
1b90: 39 31 65 61 35 66 66 31 31 61 66 34 39 61 37 61  91ea5ff11af49a7a
1ba0: 31 34 38 61 38 63 63 35 5d 7d 20 5c 0a 09 2d 62  148a8cc5]} \..-b
1bb0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
1bc0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
1bd0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
1be0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
1bf0: 72 65 73 75 6c 74 20 36 66 63 39 31 65 63 38 61  result 6fc91ec8a
1c00: 64 34 34 38 31 37 33 66 35 39 31 62 38 36 35 65  d448173f591b865e
1c10: 64 33 65 62 38 39 31 31 35 61 32 37 38 30 30 33  d3eb89115a278003
1c20: 33 37 36 35 32 33 63 30 30 65 32 32 66 32 61 0a  376523c00e22f2a.
1c30: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
1c40: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 32  ash_SHA3-224-2.2
1c50: 36 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  6 {SHA3_224Short
1c60: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
1c70: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
1c80: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
1c90: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
1ca0: 20 68 65 78 20 38 61 34 37 36 38 61 64 64 34 61   hex 8a4768add4a
1cb0: 39 62 64 37 62 33 66 32 37 34 36 31 32 32 30 63  9bd7b3f27461220c
1cc0: 65 61 65 30 32 31 38 63 66 33 33 32 32 66 34 64  eae0218cf3322f4d
1cd0: 32 61 39 38 30 64 31 5d 7d 20 5c 0a 09 2d 62 6f  2a980d1]} \..-bo
1ce0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
1cf0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
1d00: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
1d10: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
1d20: 65 73 75 6c 74 20 39 61 38 38 62 63 36 34 65 37  esult 9a88bc64e7
1d30: 34 33 66 32 61 63 61 61 31 36 37 30 63 63 61 37  43f2acaa1670cca7
1d40: 65 32 30 31 61 32 39 39 65 31 63 63 65 36 64 66  e201a299e1cce6df
1d50: 37 30 31 35 62 30 64 32 35 33 35 32 31 33 0a 0a  7015b0d2535213..
1d60: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
1d70: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 32 37  sh_SHA3-224-2.27
1d80: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
1d90: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
1da0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
1db0: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
1dc0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
1dd0: 68 65 78 20 35 63 35 62 38 63 31 39 30 32 63 38  hex 5c5b8c1902c8
1de0: 36 30 38 63 32 30 34 65 37 32 61 38 31 33 65 32  608c204e72a813e2
1df0: 62 36 32 35 30 32 31 62 33 31 38 32 63 34 38 62  b625021b3182c48b
1e00: 30 30 66 37 66 65 34 66 5d 7d 20 5c 0a 09 2d 62  00f7fe4f]} \..-b
1e10: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
1e20: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
1e30: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
1e40: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
1e50: 72 65 73 75 6c 74 20 33 31 38 30 32 61 30 66 61  result 31802a0fa
1e60: 39 61 65 37 61 65 38 38 36 32 36 36 30 34 61 64  9ae7ae88626604ad
1e70: 39 61 65 34 31 33 38 31 64 36 66 37 63 33 63 39  9ae41381d6f7c3c9
1e80: 30 65 66 66 63 66 63 66 37 30 65 66 63 66 37 0a  0effcfcf70efcf7.
1e90: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
1ea0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 32  ash_SHA3-224-2.2
1eb0: 38 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  8 {SHA3_224Short
1ec0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
1ed0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
1ee0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
1ef0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
1f00: 20 68 65 78 20 65 38 39 65 35 63 66 30 37 61 66   hex e89e5cf07af
1f10: 62 34 61 35 38 65 62 65 65 65 31 37 66 66 35 39  b4a58ebeee17ff59
1f20: 36 64 39 30 62 33 32 37 34 62 61 33 34 38 66 31  6d90b3274ba348f1
1f30: 34 66 32 38 34 66 66 66 30 32 35 5d 7d 20 5c 0a  4f284fff025]} \.
1f40: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
1f50: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
1f60: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
1f70: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
1f80: 74 20 2d 72 65 73 75 6c 74 20 33 62 63 39 62 37  t -result 3bc9b7
1f90: 39 37 33 66 35 35 37 33 35 62 36 31 32 64 64 65  973f55735b612dde
1fa0: 65 38 63 63 37 39 30 37 61 33 66 31 34 32 39 62  e8cc7907a3f1429b
1fb0: 30 36 64 66 37 63 62 31 32 39 33 62 39 38 39 38  06df7cb1293b9898
1fc0: 30 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  02..tcltest::tes
1fd0: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
1fe0: 32 2e 32 39 20 7b 53 48 41 33 5f 32 32 34 53 68  2.29 {SHA3_224Sh
1ff0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
2000: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
2010: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
2020: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
2030: 6f 64 65 20 68 65 78 20 65 62 39 65 31 31 34 33  ode hex eb9e1143
2040: 37 38 32 61 30 66 39 66 61 38 31 35 32 36 31 63  782a0f9fa815261c
2050: 32 61 64 63 32 37 35 38 66 62 31 64 38 38 66 66  2adc2758fb1d88ff
2060: 65 34 30 61 30 61 65 31 34 34 31 38 39 61 34 38  e40a0ae144189a48
2070: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
2080: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
2090: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
20a0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
20b0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 39   exact -result 9
20c0: 64 37 30 64 32 32 35 32 30 30 39 34 61 31 31 33  d70d22520094a113
20d0: 32 39 37 61 31 39 32 65 61 64 33 33 65 33 31 36  297a192ead33e316
20e0: 39 32 34 66 64 63 37 61 32 61 39 66 38 65 61 37  924fdc7a2a9f8ea7
20f0: 30 39 38 62 38 34 62 0a 0a 74 63 6c 74 65 73 74  098b84b..tcltest
2100: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
2110: 2d 32 32 34 2d 32 2e 33 30 20 7b 53 48 41 33 5f  -224-2.30 {SHA3_
2120: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
2130: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
2140: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
2150: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
2160: 79 20 64 65 63 6f 64 65 20 68 65 78 20 63 34 62  y decode hex c4b
2170: 61 33 62 66 66 38 38 35 66 62 37 38 33 35 37 32  a3bff885fb783572
2180: 32 31 61 39 61 39 30 33 62 63 37 65 62 64 31 31  21a9a903bc7ebd11
2190: 63 37 37 31 66 61 66 35 37 38 39 65 35 61 61 62  c771faf5789e5aab
21a0: 63 39 39 33 61 35 66 5d 7d 20 5c 0a 09 2d 62 6f  c993a5f]} \..-bo
21b0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
21c0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
21d0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
21e0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
21f0: 65 73 75 6c 74 20 37 62 30 32 31 32 62 34 65 65  esult 7b0212b4ee
2200: 30 62 31 34 64 62 61 36 32 63 32 64 62 37 61 37  0b14dba62c2db7a7
2210: 36 35 61 63 35 36 64 62 34 36 65 30 62 30 36 65  65ac56db46e0b06e
2220: 62 37 34 34 65 65 33 35 37 32 36 64 64 64 0a 0a  b744ee35726ddd..
2230: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
2240: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 33 31  sh_SHA3-224-2.31
2250: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
2260: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
2270: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
2280: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
2290: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
22a0: 68 65 78 20 30 37 38 31 30 65 36 62 37 38 35 31  hex 07810e6b7851
22b0: 37 37 65 35 32 64 30 66 65 61 63 30 33 39 34 66  77e52d0feac0394f
22c0: 33 65 63 63 34 31 66 33 35 61 61 30 38 66 66 31  3ecc41f35aa08ff1
22d0: 65 64 38 31 36 32 35 37 35 66 38 35 38 38 38 63  ed8162575f85888c
22e0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
22f0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
2300: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
2310: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
2320: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62   exact -result b
2330: 34 31 33 64 36 66 30 63 63 65 31 34 62 37 61 31  413d6f0cce14b7a1
2340: 30 34 34 61 31 34 62 62 32 38 30 33 64 35 33 62  044a14bb2803d53b
2350: 65 66 39 30 37 30 39 33 37 36 39 61 35 61 61 36  ef907093769a5aa6
2360: 33 61 38 65 33 31 36 0a 0a 74 63 6c 74 65 73 74  3a8e316..tcltest
2370: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
2380: 2d 32 32 34 2d 32 2e 33 32 20 7b 53 48 41 33 5f  -224-2.32 {SHA3_
2390: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
23a0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
23b0: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
23c0: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
23d0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 31 63  y decode hex 01c
23e0: 37 34 32 64 63 39 61 62 30 62 30 35 64 66 39 32  742dc9ab0b05df92
23f0: 35 64 34 61 33 35 31 65 33 38 62 65 61 37 63 61  5d4a351e38bea7ca
2400: 37 61 64 37 38 33 35 39 34 65 32 32 34 38 37 64  7ad783594e22487d
2410: 35 62 38 31 39 38 35 38 33 66 33 5d 7d 20 5c 0a  5b8198583f3]} \.
2420: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
2430: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
2440: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
2450: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
2460: 74 20 2d 72 65 73 75 6c 74 20 63 34 32 63 37 30  t -result c42c70
2470: 37 64 64 63 37 62 36 33 30 39 33 39 35 34 34 61  7ddc7b630939544a
2480: 64 62 64 62 65 35 36 37 61 33 33 33 61 63 38 38  dbdbe567a333ac88
2490: 63 33 62 35 65 37 33 38 64 65 65 38 66 38 36 32  c3b5e738dee8f862
24a0: 62 65 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  be..tcltest::tes
24b0: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
24c0: 32 2e 33 33 20 7b 53 48 41 33 5f 32 32 34 53 68  2.33 {SHA3_224Sh
24d0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
24e0: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
24f0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
2500: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
2510: 6f 64 65 20 68 65 78 20 64 64 30 66 38 35 62 35  ode hex dd0f85b5
2520: 35 66 64 66 35 36 62 61 32 35 34 65 30 36 66 38  5fdf56ba254e06f8
2530: 63 32 62 36 35 30 63 63 36 62 38 36 62 66 32 38  c2b650cc6b86bf28
2540: 61 31 34 64 37 31 34 30 31 31 31 34 31 61 38 36  a14d714011141a86
2550: 62 38 66 31 34 62 64 39 5d 7d 20 5c 0a 09 2d 62  b8f14bd9]} \..-b
2560: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
2570: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
2580: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
2590: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
25a0: 72 65 73 75 6c 74 20 30 66 65 39 32 34 36 39 32  result 0fe924692
25b0: 39 37 63 32 63 33 34 39 31 31 65 61 65 34 32 34  97c2c34911eae424
25c0: 37 31 30 64 62 36 64 33 31 32 30 34 37 38 39 38  710db6d312047898
25d0: 62 39 37 35 36 65 64 63 35 63 32 64 65 62 32 0a  b9756edc5c2deb2.
25e0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
25f0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 33  ash_SHA3-224-2.3
2600: 34 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  4 {SHA3_224Short
2610: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
2620: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
2630: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
2640: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
2650: 20 68 65 78 20 64 64 66 34 38 66 34 63 64 63 38   hex ddf48f4cdc8
2660: 35 36 63 34 34 38 33 32 36 30 39 32 64 63 66 36  56c448326092dcf6
2670: 62 66 63 34 65 62 63 66 34 62 33 36 66 63 32 65  bfc4ebcf4b36fc2e
2680: 35 31 36 65 62 61 30 39 35 36 38 30 37 35 38 38  516eba0956807588
2690: 62 36 65 38 32 37 62 5d 7d 20 5c 0a 09 2d 62 6f  b6e827b]} \..-bo
26a0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
26b0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
26c0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
26d0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
26e0: 65 73 75 6c 74 20 36 63 64 38 33 62 61 37 30 65  esult 6cd83ba70e
26f0: 31 62 64 33 38 37 64 36 30 33 61 62 31 34 63 39  1bd387d603ab14c9
2700: 66 64 63 62 66 39 38 36 32 64 32 65 62 66 30 39  fdcbf9862d2ebf09
2710: 38 37 32 31 35 66 30 31 31 61 62 65 65 38 0a 0a  87215f011abee8..
2720: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
2730: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 33 35  sh_SHA3-224-2.35
2740: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
2750: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
2760: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
2770: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
2780: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
2790: 68 65 78 20 63 33 34 64 31 66 38 37 32 39 36 36  hex c34d1f872966
27a0: 33 35 36 39 35 36 39 66 38 37 62 31 66 64 36 65  3569569f87b1fd6e
27b0: 30 62 39 35 34 61 65 32 65 33 62 37 32 33 64 36  0b954ae2e3b723d6
27c0: 63 39 66 63 61 65 36 61 62 30 39 62 31 33 62 34  c9fcae6ab09b13b4
27d0: 61 38 37 34 38 33 62 32 5d 7d 20 5c 0a 09 2d 62  a87483b2]} \..-b
27e0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
27f0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
2800: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
2810: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
2820: 72 65 73 75 6c 74 20 65 35 37 65 31 64 32 34 64  result e57e1d24d
2830: 62 64 39 61 33 30 61 62 33 31 31 32 39 31 66 35  bd9a30ab311291f5
2840: 64 36 61 39 35 35 33 30 63 61 61 30 32 39 63 34  d6a95530caa029c4
2850: 32 31 64 64 65 30 62 34 38 37 61 35 37 37 65 0a  21dde0b487a577e.
2860: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
2870: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 33  ash_SHA3-224-2.3
2880: 36 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  6 {SHA3_224Short
2890: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
28a0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
28b0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
28c0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
28d0: 20 68 65 78 20 38 30 38 64 65 37 63 62 66 38 64   hex 808de7cbf8d
28e0: 38 33 31 61 64 34 66 31 37 65 62 35 38 30 33 31  831ad4f17eb58031
28f0: 64 61 65 64 33 38 62 64 61 62 38 32 66 34 36 37  daed38bdab82f467
2900: 66 38 37 63 36 62 32 65 33 61 37 63 35 64 65 32  f87c6b2e3a7c5de2
2910: 35 63 38 65 38 32 32 39 34 31 33 5d 7d 20 5c 0a  5c8e8229413]} \.
2920: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
2930: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
2940: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
2950: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
2960: 74 20 2d 72 65 73 75 6c 74 20 62 33 63 31 33 66  t -result b3c13f
2970: 31 31 32 32 37 66 34 33 38 36 61 66 64 63 66 37  11227f4386afdcf7
2980: 36 36 33 61 31 32 30 39 39 30 66 32 37 64 61 32  663a120990f27da2
2990: 30 35 66 66 62 39 62 66 38 33 36 37 36 66 38 36  05ffb9bf83676f86
29a0: 64 63 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  dc..tcltest::tes
29b0: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
29c0: 32 2e 33 37 20 7b 53 48 41 33 5f 32 32 34 53 68  2.37 {SHA3_224Sh
29d0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
29e0: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
29f0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
2a00: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
2a10: 6f 64 65 20 68 65 78 20 35 32 30 34 61 30 61 36  ode hex 5204a0a6
2a20: 33 37 30 37 62 64 31 63 61 62 36 37 61 38 37 39  3707bd1cab67a879
2a30: 37 39 39 34 61 30 35 32 65 65 37 33 38 38 34 62  7994a052ee73884b
2a40: 33 32 35 66 64 66 33 37 64 38 36 65 66 32 38 30  325fdf37d86ef280
2a50: 62 33 66 35 35 30 63 39 65 62 34 65 37 66 64 33  b3f550c9eb4e7fd3
2a60: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
2a70: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
2a80: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
2a90: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
2aa0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36   exact -result 6
2ab0: 61 61 31 30 36 30 66 38 34 31 32 37 62 66 32 63  aa1060f84127bf2c
2ac0: 39 38 38 32 33 30 61 39 30 37 32 34 32 65 37 64  988230a907242e7d
2ad0: 36 39 37 32 61 30 31 63 36 37 37 32 62 61 30 66  6972a01c6772ba0f
2ae0: 37 62 38 62 63 38 36 0a 0a 74 63 6c 74 65 73 74  7b8bc86..tcltest
2af0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
2b00: 2d 32 32 34 2d 32 2e 33 38 20 7b 53 48 41 33 5f  -224-2.38 {SHA3_
2b10: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
2b20: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
2b30: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
2b40: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
2b50: 79 20 64 65 63 6f 64 65 20 68 65 78 20 64 61 39  y decode hex da9
2b60: 34 33 39 62 64 30 39 30 64 66 63 32 65 63 63 63  439bd090dfc2eccc
2b70: 31 32 30 33 61 37 61 38 32 63 35 64 36 34 36 37  1203a7a82c5d6467
2b80: 66 65 63 34 65 35 62 30 61 32 62 32 63 32 62 39  fec4e5b0a2b2c2b9
2b90: 65 61 36 35 62 30 33 32 30 33 61 38 63 65 33 36  ea65b03203a8ce36
2ba0: 35 66 62 64 39 38 65 5d 7d 20 5c 0a 09 2d 62 6f  5fbd98e]} \..-bo
2bb0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
2bc0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
2bd0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
2be0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
2bf0: 65 73 75 6c 74 20 65 38 66 30 39 32 39 66 31 66  esult e8f0929f1f
2c00: 36 32 30 39 64 34 31 31 38 35 32 39 32 64 33 35  6209d41185292d35
2c10: 65 62 62 66 35 61 33 62 66 65 35 34 39 32 37 31  ebbf5a3bfe549271
2c20: 33 62 30 36 64 35 36 35 37 39 34 35 38 64 0a 0a  3b06d56579458d..
2c30: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
2c40: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 33 39  sh_SHA3-224-2.39
2c50: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
2c60: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
2c70: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
2c80: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
2c90: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
2ca0: 68 65 78 20 36 36 38 62 62 64 33 38 63 30 61 64  hex 668bbd38c0ad
2cb0: 30 38 38 31 61 37 66 30 39 35 31 35 37 64 30 30  0881a7f095157d00
2cc0: 66 32 39 62 35 37 36 62 30 31 62 61 35 34 61 38  f29b576b01ba54a8
2cd0: 66 31 33 39 32 65 35 38 36 63 36 34 30 65 63 62  f1392e586c640ecb
2ce0: 31 32 62 32 61 35 63 36 32 37 61 36 37 38 38 34  12b2a5c627a67884
2cf0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
2d00: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
2d10: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
2d20: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
2d30: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 37   exact -result 7
2d40: 35 64 64 30 35 36 39 36 32 63 35 62 62 35 64 36  5dd056962c5bb5d6
2d50: 66 36 31 36 61 39 66 35 37 38 39 32 39 39 32 39  f616a9f578929929
2d60: 34 36 64 30 34 38 64 66 35 37 63 30 61 33 36 61  46d048df57c0a36a
2d70: 34 30 61 33 36 35 61 0a 0a 74 63 6c 74 65 73 74  40a365a..tcltest
2d80: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
2d90: 2d 32 32 34 2d 32 2e 34 30 20 7b 53 48 41 33 5f  -224-2.40 {SHA3_
2da0: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
2db0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
2dc0: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
2dd0: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
2de0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 64 36 33  y decode hex d63
2df0: 61 63 33 62 63 66 65 65 33 61 35 62 63 35 30 33  ac3bcfee3a5bc503
2e00: 63 66 32 30 66 65 38 66 66 34 39 36 62 66 37 61  cf20fe8ff496bf7a
2e10: 38 30 36 34 37 36 39 38 37 30 63 38 66 63 35 31  8064769870c8fc51
2e20: 34 63 32 39 62 35 35 38 32 35 62 36 32 38 38 39  4c29b55825b62889
2e30: 37 35 62 65 62 39 34 62 61 35 36 5d 7d 20 5c 0a  75beb94ba56]} \.
2e40: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
2e50: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
2e60: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
2e70: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
2e80: 74 20 2d 72 65 73 75 6c 74 20 63 36 39 34 64 61  t -result c694da
2e90: 39 34 31 61 37 61 35 30 36 63 65 66 34 37 31 66  941a7a506cef471f
2ea0: 64 66 66 62 35 32 33 30 62 62 36 63 33 63 64 32  dffb5230bb6c3cd2
2eb0: 37 31 35 33 34 31 30 33 33 61 62 37 32 36 38 65  715341033ab7268e
2ec0: 39 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  9b..tcltest::tes
2ed0: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
2ee0: 32 2e 34 31 20 7b 53 48 41 33 5f 32 32 34 53 68  2.41 {SHA3_224Sh
2ef0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
2f00: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
2f10: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
2f20: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
2f30: 6f 64 65 20 68 65 78 20 39 38 35 66 30 36 31 32  ode hex 985f0612
2f40: 31 61 65 64 36 30 33 31 37 31 30 32 30 62 61 64  1aed603171020bad
2f50: 63 32 30 37 35 66 64 33 33 32 35 36 64 36 37 64  c2075fd33256d67d
2f60: 34 30 34 33 30 38 33 39 35 37 35 64 64 61 61 37  40430839575ddaa7
2f70: 61 33 66 31 66 32 32 33 32 35 64 30 36 65 61 34  a3f1f22325d06ea4
2f80: 30 32 35 32 64 35 65 34 5d 7d 20 5c 0a 09 2d 62  0252d5e4]} \..-b
2f90: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
2fa0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
2fb0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
2fc0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
2fd0: 72 65 73 75 6c 74 20 32 39 66 38 38 34 36 61 61  result 29f8846aa
2fe0: 66 32 33 34 32 38 31 62 35 31 35 65 61 31 64 34  f234281b515ea1d4
2ff0: 35 36 37 34 35 33 35 61 36 31 32 36 63 33 38 62  5674535a6126c38b
3000: 64 39 35 39 63 31 39 39 35 63 61 64 37 63 39 0a  d959c1995cad7c9.
3010: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
3020: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 34  ash_SHA3-224-2.4
3030: 32 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  2 {SHA3_224Short
3040: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
3050: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
3060: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
3070: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
3080: 20 68 65 78 20 38 37 38 33 38 34 39 35 35 32 62   hex 8783849552b
3090: 65 34 35 34 30 63 62 32 34 64 36 37 39 39 36 61  e4540cb24d67996a
30a0: 31 30 64 31 36 34 34 34 62 32 64 39 33 36 64 32  10d16444b2d936d2
30b0: 66 61 35 66 63 66 66 35 31 66 62 30 64 64 35 65  fa5fcff51fb0dd5e
30c0: 65 30 33 39 39 38 63 30 34 35 34 32 38 39 32 31  e03998c045428921
30d0: 35 66 63 65 34 37 66 5d 7d 20 5c 0a 09 2d 62 6f  5fce47f]} \..-bo
30e0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
30f0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
3100: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
3110: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
3120: 65 73 75 6c 74 20 38 34 35 30 32 32 35 36 65 33  esult 84502256e3
3130: 66 34 32 39 31 65 66 34 64 31 35 65 38 37 30 35  f4291ef4d15e8705
3140: 65 35 37 39 39 35 31 66 63 30 65 33 39 61 32 64  e579951fc0e39a2d
3150: 35 38 66 64 61 37 34 38 35 32 35 35 31 66 0a 0a  58fda74852551f..
3160: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
3170: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 34 33  sh_SHA3-224-2.43
3180: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
3190: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
31a0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
31b0: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
31c0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
31d0: 68 65 78 20 64 61 62 33 31 63 37 62 33 66 34 30  hex dab31c7b3f40
31e0: 38 32 35 61 61 63 31 33 66 36 37 37 32 37 37 31  825aac13f6772771
31f0: 62 37 65 37 66 62 63 30 39 66 65 64 66 36 65 66  b7e7fbc09fedf6ef
3200: 66 37 37 38 64 35 31 31 39 30 65 63 66 64 34 62  f778d51190ecfd4b
3210: 30 66 32 35 36 63 66 31 38 39 62 61 65 65 65 63  0f256cf189baeeec
3220: 35 30 37 65 39 34 35 66 5d 7d 20 5c 0a 09 2d 62  507e945f]} \..-b
3230: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
3240: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
3250: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
3260: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
3270: 72 65 73 75 6c 74 20 39 37 31 36 38 61 39 63 33  result 97168a9c3
3280: 62 30 37 65 63 34 39 38 37 61 34 63 66 31 66 32  b07ec4987a4cf1f2
3290: 34 37 38 37 33 31 66 63 36 37 34 66 35 36 61 32  478731fc674f56a2
32a0: 63 61 65 65 66 30 37 34 35 39 30 65 64 36 62 0a  caeef074590ed6b.
32b0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
32c0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 34  ash_SHA3-224-2.4
32d0: 34 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  4 {SHA3_224Short
32e0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
32f0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
3300: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
3310: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
3320: 20 68 65 78 20 31 31 31 39 62 39 36 32 62 65 64   hex 1119b962bed
3330: 35 38 31 35 37 33 34 61 66 37 38 32 37 65 63 35  5815734af7827ec5
3340: 33 36 37 30 31 61 34 39 34 61 63 35 64 34 61 62  36701a494ac5d4ab
3350: 38 33 65 65 61 31 62 31 36 65 63 63 38 30 63 65  83eea1b16ecc80ce
3360: 34 65 35 66 38 36 39 34 61 37 64 31 31 62 63 62  4e5f8694a7d11bcb
3370: 61 32 65 33 34 66 30 38 34 64 64 5d 7d 20 5c 0a  a2e34f084dd]} \.
3380: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
3390: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
33a0: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
33b0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
33c0: 74 20 2d 72 65 73 75 6c 74 20 32 30 35 64 38 39  t -result 205d89
33d0: 65 30 33 32 66 30 33 63 38 35 31 39 63 66 34 33  e032f03c8519cf43
33e0: 62 37 32 30 34 37 38 33 38 39 62 31 37 38 38 66  b720478389b1788f
33f0: 33 35 32 32 63 33 64 33 34 37 66 65 62 64 32 63  3522c3d347febd2c
3400: 37 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  70..tcltest::tes
3410: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
3420: 32 2e 34 35 20 7b 53 48 41 33 5f 32 32 34 53 68  2.45 {SHA3_224Sh
3430: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
3440: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
3450: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
3460: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
3470: 6f 64 65 20 68 65 78 20 64 32 63 34 35 65 32 63  ode hex d2c45e2c
3480: 31 66 61 30 63 34 34 65 66 63 38 34 65 36 63 30  1fa0c44efc84e6c0
3490: 36 35 34 63 63 30 64 38 36 37 61 33 65 33 33 37  654cc0d867a3e337
34a0: 33 33 63 37 32 35 61 61 37 31 38 64 39 37 34 65  33c725aa718d974e
34b0: 64 36 61 34 62 37 66 38 66 39 31 64 65 37 64 33  d6a4b7f8f91de7d3
34c0: 36 32 32 62 31 65 34 62 65 34 32 38 64 65 32 61  622b1e4be428de2a
34d0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
34e0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
34f0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
3500: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
3510: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64   exact -result d
3520: 34 38 33 65 33 39 62 37 61 64 64 30 35 30 65 62  483e39b7add050eb
3530: 34 61 37 39 33 65 35 34 63 38 35 62 32 35 30 37  4a793e54c85b2507
3540: 34 36 65 33 38 32 33 39 39 63 37 34 37 33 36 66  46e382399c74736f
3550: 33 33 64 61 38 39 30 0a 0a 74 63 6c 74 65 73 74  33da890..tcltest
3560: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
3570: 2d 32 32 34 2d 32 2e 34 36 20 7b 53 48 41 33 5f  -224-2.46 {SHA3_
3580: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
3590: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
35a0: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
35b0: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
35c0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 61 38 37  y decode hex a87
35d0: 33 62 31 34 38 66 65 31 38 30 37 62 38 39 63 62  3b148fe1807b89cb
35e0: 65 64 39 33 30 61 37 38 30 32 61 62 61 64 36 63  ed930a7802abad6c
35f0: 61 30 34 34 32 33 34 30 65 36 32 65 64 32 31 62  a0442340e62ed21b
3600: 38 34 65 61 64 39 61 36 33 34 37 31 33 62 62 34  84ead9a634713bb4
3610: 64 65 35 36 34 38 32 30 38 63 30 65 65 64 36 37  de5648208c0eed67
3620: 33 38 64 39 63 63 38 5d 7d 20 5c 0a 09 2d 62 6f  38d9cc8]} \..-bo
3630: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
3640: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
3650: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
3660: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
3670: 65 73 75 6c 74 20 63 38 36 62 63 63 31 32 61 36  esult c86bcc12a6
3680: 61 62 37 39 32 63 31 34 39 61 61 38 33 61 36 37  ab792c149aa83a67
3690: 38 33 63 61 38 62 62 35 32 62 30 63 61 34 62 32  83ca8bb52b0ca4b2
36a0: 63 31 32 36 36 31 63 30 61 32 35 64 32 32 0a 0a  c12661c0a25d22..
36b0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
36c0: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 34 37  sh_SHA3-224-2.47
36d0: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
36e0: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
36f0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
3700: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
3710: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
3720: 68 65 78 20 62 33 30 30 38 66 36 66 35 36 37 64  hex b3008f6f567d
3730: 31 65 65 64 39 61 62 35 62 33 62 62 63 65 38 32  1eed9ab5b3bbce82
3740: 34 64 32 39 30 65 36 36 66 36 36 62 63 66 63 66  4d290e66f66bcfcf
3750: 66 37 66 39 62 38 39 39 34 38 33 35 62 34 64 35  f7f9b8994835b4d5
3760: 34 61 34 65 34 35 63 39 62 38 36 35 31 62 33 37  4a4e45c9b8651b37
3770: 64 62 65 66 65 35 65 33 66 65 35 62 36 37 34 66  dbefe5e3fe5b674f
3780: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
3790: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
37a0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
37b0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
37c0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32   exact -result 2
37d0: 33 39 32 39 37 35 33 61 64 30 37 65 38 34 37 36  3929753ad07e8476
37e0: 65 37 62 64 61 63 38 61 30 63 61 33 39 65 39 61  e7bdac8a0ca39e9a
37f0: 61 63 31 35 38 31 33 32 36 35 33 62 65 31 30 65  ac158132653be10e
3800: 62 65 65 62 35 30 63 0a 0a 74 63 6c 74 65 73 74  beeb50c..tcltest
3810: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
3820: 2d 32 32 34 2d 32 2e 34 38 20 7b 53 48 41 33 5f  -224-2.48 {SHA3_
3830: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
3840: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
3850: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
3860: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
3870: 79 20 64 65 63 6f 64 65 20 68 65 78 20 37 38 64  y decode hex 78d
3880: 30 37 33 62 34 65 31 33 66 36 38 35 30 64 63 31  073b4e13f6850dc1
3890: 63 61 33 36 36 38 33 61 62 61 63 37 32 33 33 36  ca36683abac72336
38a0: 34 36 35 64 37 39 30 65 62 33 35 37 35 63 39 34  465d790eb3575c94
38b0: 32 36 36 37 64 31 65 33 65 63 63 38 34 39 66 33  2667d1e3ecc849f3
38c0: 37 61 38 64 37 33 36 30 34 63 62 30 66 65 37 32  7a8d73604cb0fe72
38d0: 36 66 66 65 35 35 37 34 34 61 32 5d 7d 20 5c 0a  6ffe55744a2]} \.
38e0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
38f0: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
3900: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
3910: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
3920: 74 20 2d 72 65 73 75 6c 74 20 36 32 32 39 32 33  t -result 622923
3930: 33 66 63 36 35 35 65 61 34 38 62 62 35 62 34 38  3fc655ea48bb5b48
3940: 62 37 33 61 30 38 31 38 39 37 64 38 35 35 66 36  b73a081897d855f6
3950: 63 66 31 30 34 37 38 32 32 38 66 63 33 30 35 38  cf10478228fc3058
3960: 34 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  42..tcltest::tes
3970: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
3980: 32 2e 34 39 20 7b 53 48 41 33 5f 32 32 34 53 68  2.49 {SHA3_224Sh
3990: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
39a0: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
39b0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
39c0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
39d0: 6f 64 65 20 68 65 78 20 34 35 33 32 35 62 38 30  ode hex 45325b80
39e0: 65 30 34 33 63 30 63 64 63 65 33 65 63 34 32 31  e043c0cdce3ec421
39f0: 65 63 64 61 35 32 39 34 38 31 39 31 30 63 30 39  ecda529481910c09
3a00: 37 33 30 31 32 38 62 34 62 62 39 32 37 64 64 61  730128b4bb927dda
3a10: 31 36 35 39 64 64 64 38 66 64 33 63 61 36 36 37  1659ddd8fd3ca667
3a20: 64 38 35 37 39 34 31 65 36 66 39 66 64 39 33 39  d857941e6f9fd939
3a30: 61 31 63 35 37 30 39 38 5d 7d 20 5c 0a 09 2d 62  a1c57098]} \..-b
3a40: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
3a50: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
3a60: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
3a70: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
3a80: 72 65 73 75 6c 74 20 37 37 36 61 61 31 66 35 34  result 776aa1f54
3a90: 65 30 33 38 66 33 39 30 34 39 31 61 35 64 36 39  e038f390491a5d69
3aa0: 62 64 65 37 61 32 64 62 63 62 61 39 37 63 33 35  bde7a2dbcba97c35
3ab0: 35 37 34 65 62 65 36 30 63 39 61 37 37 32 66 0a  574ebe60c9a772f.
3ac0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
3ad0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 35  ash_SHA3-224-2.5
3ae0: 30 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  0 {SHA3_224Short
3af0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
3b00: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
3b10: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
3b20: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
3b30: 20 68 65 78 20 33 62 64 64 36 38 32 31 64 39 33   hex 3bdd6821d93
3b40: 38 66 61 63 35 32 31 30 31 66 62 65 65 35 64 36  8fac52101fbee5d6
3b50: 62 61 31 39 31 66 62 33 62 36 63 62 36 33 34 64  ba191fb3b6cb634d
3b60: 62 66 34 32 63 65 62 61 61 65 35 37 62 64 38 39  bf42cebaae57bd89
3b70: 37 34 38 31 61 65 35 65 65 30 34 65 32 64 38 37  7481ae5ee04e2d87
3b80: 31 61 34 63 33 33 33 61 62 35 61 62 36 35 38 38  1a4c333ab5ab6588
3b90: 31 34 34 66 32 66 31 5d 7d 20 5c 0a 09 2d 62 6f  144f2f1]} \..-bo
3ba0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
3bb0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
3bc0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
3bd0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
3be0: 65 73 75 6c 74 20 36 32 66 38 66 33 62 61 65 61  esult 62f8f3baea
3bf0: 36 64 63 66 35 61 66 32 35 64 35 33 64 64 66 64  6dcf5af25d53ddfd
3c00: 61 63 30 62 64 63 64 65 38 38 65 33 38 39 35 64  ac0bdcde88e3895d
3c10: 66 35 36 37 63 36 63 34 31 36 61 35 34 31 0a 0a  f567c6c416a541..
3c20: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
3c30: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 35 31  sh_SHA3-224-2.51
3c40: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
3c50: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
3c60: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
3c70: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
3c80: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
3c90: 68 65 78 20 38 36 66 63 36 36 66 32 36 31 38 63  hex 86fc66f2618c
3ca0: 39 38 66 65 39 65 66 61 31 65 33 61 63 30 34 65  98fe9efa1e3ac04e
3cb0: 33 34 30 33 38 35 64 63 32 62 37 34 36 63 62 63  340385dc2b746cbc
3cc0: 30 66 37 63 37 35 37 62 38 38 33 34 32 38 31 30  0f7c757b88342810
3cd0: 66 65 37 30 64 38 31 32 30 30 39 35 32 39 32 38  fe70d81200952928
3ce0: 65 37 61 61 64 30 63 30 62 36 62 31 39 61 30 34  e7aad0c0b6b19a04
3cf0: 34 35 33 37 62 30 30 39 5d 7d 20 5c 0a 09 2d 62  4537b009]} \..-b
3d00: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
3d10: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
3d20: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
3d30: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
3d40: 72 65 73 75 6c 74 20 32 30 61 32 31 65 62 31 64  result 20a21eb1d
3d50: 33 31 33 30 61 34 35 31 39 63 65 36 61 62 64 35  3130a4519ce6abd5
3d60: 61 62 36 38 31 37 30 38 31 61 65 31 62 65 66 33  ab6817081ae1bef3
3d70: 36 30 33 30 35 36 34 37 36 61 30 30 65 34 31 0a  603056476a00e41.
3d80: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
3d90: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 35  ash_SHA3-224-2.5
3da0: 32 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  2 {SHA3_224Short
3db0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
3dc0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
3dd0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
3de0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
3df0: 20 68 65 78 20 66 32 61 36 31 36 38 65 37 66 39   hex f2a6168e7f9
3e00: 32 64 33 31 33 66 63 33 30 66 39 65 36 66 38 32  2d313fc30f9e6f82
3e10: 35 61 34 38 30 39 31 36 32 31 36 66 30 32 65 30  5a480916216f02e0
3e20: 33 30 38 64 62 37 30 37 37 33 65 63 31 36 35 65  308db70773ec165e
3e30: 32 35 65 38 31 66 66 62 66 30 32 32 30 63 35 63  25e81ffbf0220c5c
3e40: 61 30 63 63 36 63 39 31 64 33 61 30 39 64 61 39  a0cc6c91d3a09da9
3e50: 39 66 61 36 65 66 61 38 37 37 66 5d 7d 20 5c 0a  9fa6efa877f]} \.
3e60: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
3e70: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
3e80: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
3e90: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
3ea0: 74 20 2d 72 65 73 75 6c 74 20 35 64 36 65 35 63  t -result 5d6e5c
3eb0: 38 32 35 37 34 66 35 65 35 63 30 33 33 39 64 33  82574f5e5c0339d3
3ec0: 61 66 31 66 39 63 32 38 65 31 37 62 63 64 64 63  af1f9c28e17bcddc
3ed0: 33 30 36 61 31 35 31 38 37 61 66 66 35 64 33 64  306a15187aff5d3d
3ee0: 64 37 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  d7..tcltest::tes
3ef0: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
3f00: 32 2e 35 33 20 7b 53 48 41 33 5f 32 32 34 53 68  2.53 {SHA3_224Sh
3f10: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
3f20: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
3f30: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
3f40: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
3f50: 6f 64 65 20 68 65 78 20 35 65 33 62 36 62 37 35  ode hex 5e3b6b75
3f60: 62 35 34 66 32 31 62 38 30 31 36 65 66 66 62 33  b54f21b8016effb3
3f70: 39 32 37 36 66 35 65 37 66 34 39 33 31 31 37 61  9276f5e7f493117a
3f80: 63 34 63 30 66 32 64 65 63 33 38 61 38 30 61 65  c4c0f2dec38a80ae
3f90: 32 39 31 37 64 61 64 38 33 63 36 38 39 30 30 31  2917dad83c689001
3fa0: 32 30 64 62 31 33 32 35 66 31 66 34 36 39 37 65  20db1325f1f4697e
3fb0: 30 66 35 63 32 35 61 38 62 39 32 61 39 37 30 32  0f5c25a8b92a9702
3fc0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
3fd0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
3fe0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
3ff0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
4000: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 35   exact -result 5
4010: 64 63 32 31 34 37 66 31 63 66 36 35 35 64 61 62  dc2147f1cf655dab
4020: 62 35 63 61 34 62 32 39 37 30 62 34 35 36 34 65  b5ca4b2970b4564e
4030: 62 31 39 65 63 34 35 36 65 36 66 39 36 36 62 62  b19ec456e6f966bb
4040: 61 65 31 39 37 36 32 0a 0a 74 63 6c 74 65 73 74  ae19762..tcltest
4050: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
4060: 2d 32 32 34 2d 32 2e 35 34 20 7b 53 48 41 33 5f  -224-2.54 {SHA3_
4070: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
4080: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
4090: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
40a0: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
40b0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 65 37 66  y decode hex e7f
40c0: 31 37 63 31 33 31 39 35 30 63 30 36 33 31 31 66  17c131950c06311f
40d0: 34 37 37 39 39 61 30 66 35 61 36 62 34 39 39 36  47799a0f5a6b4996
40e0: 66 34 63 63 38 39 30 33 33 34 34 35 30 65 31 62  f4cc890334450e1b
40f0: 64 36 63 63 36 66 35 36 37 30 37 37 31 63 30 64  d6cc6f5670771c0d
4100: 63 36 30 37 66 38 65 63 65 62 31 35 33 30 30 65  c607f8eceb15300e
4110: 63 34 32 32 30 35 31 30 65 64 35 62 37 64 65 62  c4220510ed5b7deb
4120: 33 34 32 39 64 65 36 5d 7d 20 5c 0a 09 2d 62 6f  3429de6]} \..-bo
4130: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
4140: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
4150: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
4160: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
4170: 65 73 75 6c 74 20 34 63 65 38 30 64 61 62 39 66  esult 4ce80dab9f
4180: 39 33 33 31 31 32 61 33 66 64 37 38 63 31 66 37  933112a3fd78c1f7
4190: 36 34 33 34 62 31 39 37 38 30 36 65 64 64 66 65  6434b197806eddfe
41a0: 33 35 63 62 30 62 64 64 38 34 35 63 31 35 0a 0a  35cb0bdd845c15..
41b0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
41c0: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 35 35  sh_SHA3-224-2.55
41d0: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
41e0: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
41f0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
4200: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
4210: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
4220: 68 65 78 20 63 39 61 61 33 64 30 66 36 64 38 37  hex c9aa3d0f6d87
4230: 38 64 62 31 31 32 33 35 65 37 62 30 32 38 66 38  8db11235e7b028f8
4240: 64 36 37 65 32 63 65 32 36 65 65 65 37 31 38 66  d67e2ce26eee718f
4250: 33 30 38 65 32 31 31 33 32 65 33 37 37 65 33 31  308e21132e377e31
4260: 37 30 65 32 36 65 63 65 39 35 62 64 33 37 61 34  70e26ece95bd37a4
4270: 62 64 37 66 38 37 33 62 61 37 66 38 62 37 31 35  bd7f873ba7f8b715
4280: 31 37 65 63 35 30 32 39 37 62 32 31 63 66 39 34  17ec50297b21cf94
4290: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
42a0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
42b0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
42c0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
42d0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 35   exact -result 5
42e0: 39 36 33 62 34 31 62 31 33 39 32 35 61 39 30 63  963b41b13925a90c
42f0: 39 65 38 66 62 63 64 65 64 39 61 38 32 61 64 65  9e8fbcded9a82ade
4300: 38 61 61 65 33 36 64 65 65 39 32 30 31 39 39 66  8aae36dee920199f
4310: 36 64 36 61 63 37 66 0a 0a 74 63 6c 74 65 73 74  6d6ac7f..tcltest
4320: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
4330: 2d 32 32 34 2d 32 2e 35 36 20 7b 53 48 41 33 5f  -224-2.56 {SHA3_
4340: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
4350: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
4360: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
4370: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
4380: 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 66 31  y decode hex 0f1
4390: 37 30 61 66 61 66 63 65 66 64 66 61 38 62 30 64  70afafcefdfa8b0d
43a0: 65 33 32 38 64 61 62 33 30 62 34 65 34 34 64 39  e328dab30b4e44d9
43b0: 38 64 36 61 65 61 32 62 63 33 39 35 35 37 66 66  8d6aea2bc39557ff
43c0: 34 36 35 38 66 63 65 34 66 62 66 38 35 32 36 64  4658fce4fbf8526d
43d0: 38 62 35 33 35 39 66 31 37 33 63 31 34 65 34 64  8b5359f173c14e4d
43e0: 61 37 63 66 38 38 39 33 35 63 39 33 36 39 66 63  a7cf88935c9369fc
43f0: 37 64 36 30 37 38 36 33 66 32 35 5d 7d 20 5c 0a  7d607863f25]} \.
4400: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
4410: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
4420: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
4430: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
4440: 74 20 2d 72 65 73 75 6c 74 20 66 65 37 65 35 39  t -result fe7e59
4450: 30 32 38 63 37 38 35 35 63 33 37 61 65 33 64 63  028c7855c37ae3dc
4460: 35 65 65 33 32 34 38 36 34 63 66 65 65 36 62 38  5ee324864cfee6b8
4470: 62 63 63 63 32 63 33 62 35 61 34 31 30 62 36 35  bccc2c3b5a410b65
4480: 64 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  d9..tcltest::tes
4490: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
44a0: 32 2e 35 37 20 7b 53 48 41 33 5f 32 32 34 53 68  2.57 {SHA3_224Sh
44b0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
44c0: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
44d0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
44e0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
44f0: 6f 64 65 20 68 65 78 20 36 62 32 62 39 32 35 38  ode hex 6b2b9258
4500: 34 31 34 36 61 34 33 33 62 65 65 38 62 39 34 37  4146a433bee8b947
4510: 63 63 31 66 33 35 62 36 31 37 62 37 33 66 35 62  cc1f35b617b73f5b
4520: 31 65 30 33 37 36 61 63 38 62 64 61 64 66 65 35  1e0376ac8bdadfe5
4530: 62 66 64 66 32 32 36 33 62 32 30 35 66 37 34 64  bfdf2263b205f74d
4540: 66 61 35 33 64 62 37 61 32 39 65 35 30 37 38 66  fa53db7a29e5078f
4550: 35 63 33 34 61 32 36 38 31 31 39 37 33 36 62 61  5c34a268119736ba
4560: 33 39 30 39 36 31 66 36 5d 7d 20 5c 0a 09 2d 62  390961f6]} \..-b
4570: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
4580: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
4590: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
45a0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
45b0: 72 65 73 75 6c 74 20 31 33 32 63 66 61 37 65 37  result 132cfa7e7
45c0: 31 66 65 30 39 39 31 61 62 62 64 38 38 65 66 35  1fe0991abbd88ef5
45d0: 38 38 61 63 39 35 61 63 39 32 38 39 62 31 64 37  88ac95ac9289b1d7
45e0: 37 35 62 34 32 30 33 33 35 36 37 64 64 33 33 0a  75b42033567dd33.
45f0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
4600: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 35  ash_SHA3-224-2.5
4610: 38 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  8 {SHA3_224Short
4620: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
4630: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
4640: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
4650: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
4660: 20 68 65 78 20 33 39 66 37 61 39 34 33 31 32 62   hex 39f7a94312b
4670: 65 61 31 62 34 66 61 39 38 39 66 35 61 36 37 37  ea1b4fa989f5a677
4680: 35 64 66 35 33 38 66 30 31 37 30 34 31 32 30 38  5df538f017041208
4690: 33 38 63 34 61 33 31 30 34 32 35 36 34 37 38 62  38c4a3104256478b
46a0: 35 63 30 63 66 62 65 38 62 38 36 65 32 39 31 32  5c0cfbe8b86e2912
46b0: 63 39 38 30 62 33 39 30 65 61 34 31 32 65 64 64  c980b390ea412edd
46c0: 64 62 36 39 64 34 36 31 65 35 30 66 39 66 33 31  db69d461e50f9f31
46d0: 33 62 63 31 37 61 66 5d 7d 20 5c 0a 09 2d 62 6f  3bc17af]} \..-bo
46e0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
46f0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
4700: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
4710: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
4720: 65 73 75 6c 74 20 66 63 63 35 39 36 35 35 62 38  esult fcc59655b8
4730: 66 65 63 31 61 33 64 38 37 38 33 34 35 64 66 39  fec1a3d878345df9
4740: 31 30 38 62 64 39 39 66 34 64 64 30 65 35 32 31  108bd99f4dd0e521
4750: 38 61 35 35 66 63 33 33 35 65 35 37 66 37 0a 0a  8a55fc335e57f7..
4760: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
4770: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 35 39  sh_SHA3-224-2.59
4780: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
4790: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
47a0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
47b0: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
47c0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
47d0: 68 65 78 20 61 63 35 38 32 62 35 61 34 62 62 30  hex ac582b5a4bb0
47e0: 63 35 65 39 63 34 30 64 38 66 32 37 37 62 64 61  c5e9c40d8f277bda
47f0: 39 64 65 33 64 30 37 66 66 66 30 31 65 38 32 30  9de3d07fff01e820
4800: 61 31 63 64 61 66 38 38 37 30 38 66 31 64 36 30  a1cdaf88708f1d60
4810: 62 65 36 30 62 39 61 35 65 38 33 62 35 63 35 39  be60b9a5e83b5c59
4820: 33 36 35 37 33 38 37 38 30 32 62 34 31 38 32 64  3657387802b4182d
4830: 31 64 66 34 65 39 34 36 36 65 36 64 37 61 65 36  1df4e9466e6d7ae6
4840: 64 63 37 63 38 30 37 39 5d 7d 20 5c 0a 09 2d 62  dc7c8079]} \..-b
4850: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
4860: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
4870: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
4880: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
4890: 72 65 73 75 6c 74 20 35 63 32 65 31 30 66 61 65  result 5c2e10fae
48a0: 38 66 34 33 30 34 63 64 39 33 36 31 36 39 30 65  8f4304cd9361690e
48b0: 35 64 32 63 34 63 64 31 35 66 31 30 61 37 62 31  5d2c4cd15f10a7b1
48c0: 34 65 61 36 30 32 30 38 37 33 39 35 37 39 62 0a  4ea60208739579b.
48d0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
48e0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 36  ash_SHA3-224-2.6
48f0: 30 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  0 {SHA3_224Short
4900: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
4910: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
4920: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
4930: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
4940: 20 68 65 78 20 30 37 32 37 35 33 39 38 31 39 39   hex 07275398199
4950: 38 34 35 33 34 33 38 61 35 32 30 64 39 64 65 32  8453438a520d9de2
4960: 64 35 37 30 34 32 39 32 39 31 30 31 34 38 62 38  d5704292910148b8
4970: 66 37 39 34 65 63 33 37 36 35 62 32 34 30 63 37  f794ec3765b240c7
4980: 61 66 31 62 37 39 34 36 32 66 61 39 61 32 66 30  af1b79462fa9a2f0
4990: 30 30 64 64 39 34 64 35 39 32 64 33 61 32 61 30  00dd94d592d3a2a0
49a0: 36 39 64 63 32 34 34 64 61 66 35 37 62 31 32 63  69dc244daf57b12c
49b0: 35 37 36 37 35 66 33 66 38 39 62 5d 7d 20 5c 0a  57675f3f89b]} \.
49c0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
49d0: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
49e0: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
49f0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
4a00: 74 20 2d 72 65 73 75 6c 74 20 62 30 64 32 39 30  t -result b0d290
4a10: 61 36 65 62 64 64 39 35 30 38 31 31 61 32 37 31  a6ebdd950811a271
4a20: 35 66 33 35 34 62 30 64 38 39 33 35 63 62 36 31  5f354b0d8935cb61
4a30: 30 61 34 37 31 63 66 63 35 64 66 66 35 65 30 36  0a471cfc5dff5e06
4a40: 36 30 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  60..tcltest::tes
4a50: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
4a60: 32 2e 36 31 20 7b 53 48 41 33 5f 32 32 34 53 68  2.61 {SHA3_224Sh
4a70: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
4a80: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
4a90: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
4aa0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
4ab0: 6f 64 65 20 68 65 78 20 36 36 61 39 61 36 64 30  ode hex 66a9a6d0
4ac0: 61 33 32 32 65 64 32 38 35 32 33 37 38 61 66 38  a322ed2852378af8
4ad0: 32 63 30 61 32 63 30 32 37 62 31 30 38 32 30 39  2c0a2c027b108209
4ae0: 38 61 62 37 35 30 39 32 35 61 34 64 63 32 65 38  8ab750925a4dc2e8
4af0: 39 36 31 64 30 30 36 32 63 39 64 62 30 32 65 38  961d0062c9db02e8
4b00: 63 66 34 32 61 36 62 34 38 61 66 62 30 30 35 36  cf42a6b48afb0056
4b10: 64 36 63 31 66 31 66 62 62 65 63 33 66 62 65 65  d6c1f1fbbec3fbee
4b20: 66 30 34 39 35 33 35 66 36 65 39 62 33 38 36 34  f049535f6e9b3864
4b30: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
4b40: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
4b50: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
4b60: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
4b70: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64   exact -result d
4b80: 36 38 33 34 38 38 63 38 34 32 30 65 62 32 64 36  683488c8420eb2d6
4b90: 31 65 35 32 38 61 62 30 61 37 62 37 33 61 61 37  1e528ab0a7b73aa7
4ba0: 38 30 61 30 38 35 62 39 63 37 39 38 32 32 39 33  80a085b9c7982293
4bb0: 62 32 61 63 36 61 64 0a 0a 74 63 6c 74 65 73 74  b2ac6ad..tcltest
4bc0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
4bd0: 2d 32 32 34 2d 32 2e 36 32 20 7b 53 48 41 33 5f  -224-2.62 {SHA3_
4be0: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
4bf0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
4c00: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
4c10: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
4c20: 79 20 64 65 63 6f 64 65 20 68 65 78 20 31 38 34  y decode hex 184
4c30: 31 39 61 38 34 39 38 64 34 65 39 62 66 61 61 39  19a8498d4e9bfaa9
4c40: 31 31 37 34 38 31 38 36 63 35 37 35 33 64 35 64  11748186c5753d5d
4c50: 61 35 61 61 30 33 33 33 37 31 66 66 63 35 36 36  a5aa033371ffc566
4c60: 35 30 64 30 61 65 39 62 37 33 66 34 33 30 66 30  50d0ae9b73f430f0
4c70: 64 31 66 33 63 39 64 34 30 33 36 32 37 38 36 63  d1f3c9d40362786c
4c80: 30 34 32 39 64 39 37 37 62 38 39 39 62 36 34 30  0429d977b899b640
4c90: 31 36 65 63 61 38 32 65 36 34 32 30 33 66 36 36  16eca82e64203f66
4ca0: 38 35 63 31 32 65 65 5d 7d 20 5c 0a 09 2d 62 6f  85c12ee]} \..-bo
4cb0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
4cc0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
4cd0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
4ce0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
4cf0: 65 73 75 6c 74 20 35 31 64 30 63 64 33 33 66 64  esult 51d0cd33fd
4d00: 36 35 37 39 62 30 35 63 33 36 36 63 36 66 63 63  6579b05c366c6fcc
4d10: 36 35 33 36 33 38 62 37 62 31 33 62 36 32 37 39  653638b7b13b6279
4d20: 38 62 39 39 62 33 36 37 39 32 63 64 63 34 0a 0a  8b99b36792cdc4..
4d30: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
4d40: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 36 33  sh_SHA3-224-2.63
4d50: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
4d60: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
4d70: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
4d80: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
4d90: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
4da0: 68 65 78 20 34 66 63 35 32 30 30 39 64 35 38 61  hex 4fc52009d58a
4db0: 30 66 63 32 35 37 33 65 38 33 66 61 33 33 35 62  0fc2573e83fa335b
4dc0: 35 63 31 64 66 38 63 31 34 62 32 65 36 64 61 61  5c1df8c14b2e6daa
4dd0: 66 30 35 62 64 36 65 31 33 66 64 35 37 32 32 66  f05bd6e13fd5722f
4de0: 32 38 64 65 34 38 31 36 37 37 32 34 32 34 63 32  28de4816772424c2
4df0: 66 39 34 64 64 63 33 64 65 30 64 33 64 37 65 32  f94ddc3de0d3d7e2
4e00: 36 38 31 32 64 30 31 34 62 62 39 66 64 38 33 30  6812d014bb9fd830
4e10: 31 32 64 63 39 61 62 66 31 65 63 39 65 33 66 31  12dc9abf1ec9e3f1
4e20: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
4e30: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
4e40: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
4e50: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
4e60: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36   exact -result 6
4e70: 33 30 65 65 32 62 65 61 66 31 63 31 35 39 32 65  30ee2beaf1c1592e
4e80: 61 61 36 32 36 33 66 63 35 36 32 61 32 36 30 62  aa6263fc562a260b
4e90: 36 30 35 34 65 39 65 61 62 31 61 61 31 39 35 33  6054e9eab1aa1953
4ea0: 36 66 64 61 31 37 30 0a 0a 74 63 6c 74 65 73 74  6fda170..tcltest
4eb0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
4ec0: 2d 32 32 34 2d 32 2e 36 34 20 7b 53 48 41 33 5f  -224-2.64 {SHA3_
4ed0: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
4ee0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
4ef0: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
4f00: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
4f10: 79 20 64 65 63 6f 64 65 20 68 65 78 20 61 63 64  y decode hex acd
4f20: 61 61 32 38 36 39 32 66 33 33 34 37 33 32 30 38  aa28692f33473208
4f30: 38 66 35 65 66 61 62 32 63 37 39 35 31 66 65 30  8f5efab2c7951fe0
4f40: 66 38 34 35 62 39 65 32 63 36 66 31 32 35 33 63  f845b9e2c6f1253c
4f50: 33 63 64 63 64 65 33 30 61 34 65 38 64 32 31 32  3cdcde30a4e8d212
4f60: 30 65 33 38 63 32 36 34 32 32 32 31 39 64 66 34  0e38c26422219df4
4f70: 31 65 64 61 32 63 38 33 33 34 65 31 33 66 36 36  1eda2c8334e13f66
4f80: 39 61 36 35 66 35 62 61 32 30 37 35 62 34 36 37  9a65f5ba2075b467
4f90: 65 64 65 64 33 32 39 33 36 64 35 5d 7d 20 5c 0a  eded32936d5]} \.
4fa0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
4fb0: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
4fc0: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
4fd0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
4fe0: 74 20 2d 72 65 73 75 6c 74 20 37 64 34 39 39 31  t -result 7d4991
4ff0: 64 35 34 63 37 38 61 66 35 38 30 39 63 64 31 37  d54c78af5809cd17
5000: 30 32 34 63 61 64 61 65 37 38 33 63 36 66 35 61  024cadae783c6f5a
5010: 31 66 30 66 65 62 33 36 35 62 35 33 32 35 38 30  1f0feb365b532580
5020: 63 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  c2..tcltest::tes
5030: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
5040: 32 2e 36 35 20 7b 53 48 41 33 5f 32 32 34 53 68  2.65 {SHA3_224Sh
5050: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
5060: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
5070: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
5080: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
5090: 6f 64 65 20 68 65 78 20 64 31 35 39 33 63 64 33  ode hex d1593cd3
50a0: 33 38 62 37 61 32 35 62 62 35 34 31 33 66 31 31  38b7a25bb5413f11
50b0: 32 61 36 33 39 66 65 33 31 63 39 38 31 65 35 30  2a639fe31c981e50
50c0: 35 63 38 31 61 38 32 30 65 36 33 38 63 32 35 32  5c81a820e638c252
50d0: 30 39 65 32 63 65 35 36 63 38 38 33 38 61 37 63  09e2ce56c8838a7c
50e0: 38 31 31 37 64 62 61 64 63 63 64 65 63 39 35 39  8117dbadccdec959
50f0: 61 36 66 37 63 61 62 30 63 66 33 30 34 33 31 35  a6f7cab0cf304315
5100: 37 30 31 64 34 63 63 66 30 31 36 37 62 34 30 32  701d4ccf0167b402
5110: 36 61 36 37 34 34 64 65 5d 7d 20 5c 0a 09 2d 62  6a6744de]} \..-b
5120: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
5130: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
5140: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
5150: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
5160: 72 65 73 75 6c 74 20 38 34 65 31 38 33 33 30 37  result 84e183307
5170: 32 33 65 34 66 39 30 35 32 30 64 30 62 30 35 31  23e4f90520d0b051
5180: 61 39 62 66 39 62 64 37 62 35 63 37 65 63 30 31  a9bf9bd7b5c7ec01
5190: 37 37 38 30 33 66 31 35 63 66 37 34 30 65 35 0a  77803f15cf740e5.
51a0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
51b0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 36  ash_SHA3-224-2.6
51c0: 36 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  6 {SHA3_224Short
51d0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
51e0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
51f0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
5200: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
5210: 20 68 65 78 20 38 63 66 38 65 61 32 35 33 31 30   hex 8cf8ea25310
5220: 31 32 36 61 65 31 66 64 63 65 33 63 39 31 39 35  126ae1fdce3c9195
5230: 33 39 35 61 39 64 34 35 30 35 31 61 32 61 33 66  395a9d45051a2a3f
5240: 30 38 63 65 31 35 34 64 38 32 36 35 62 35 34 63  08ce154d8265b54c
5250: 63 61 37 30 33 31 61 37 65 63 38 34 30 63 33 61  ca7031a7ec840c3a
5260: 33 33 35 39 65 66 61 34 63 39 31 63 34 31 62 37  3359efa4c91c41b7
5270: 34 62 61 61 36 39 38 64 35 34 66 66 62 39 62 30  4baa698d54ffb9b0
5280: 31 37 30 66 32 65 64 61 64 63 35 32 30 31 36 35  170f2edadc520165
5290: 30 63 32 62 64 63 36 5d 7d 20 5c 0a 09 2d 62 6f  0c2bdc6]} \..-bo
52a0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
52b0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
52c0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
52d0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
52e0: 65 73 75 6c 74 20 37 35 64 65 31 34 31 36 39 64  esult 75de14169d
52f0: 31 36 61 39 39 30 32 66 36 65 38 61 33 33 35 39  16a9902f6e8a3359
5300: 64 39 34 35 39 34 61 38 38 39 63 34 61 65 64 39  d94594a889c4aed9
5310: 32 34 36 63 61 61 36 63 66 35 36 31 32 63 0a 0a  246caa6cf5612c..
5320: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
5330: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 36 37  sh_SHA3-224-2.67
5340: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
5350: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
5360: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
5370: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
5380: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
5390: 68 65 78 20 65 30 33 32 30 66 65 65 31 39 61 66  hex e0320fee19af
53a0: 35 62 66 64 35 31 31 61 32 33 63 61 62 62 61 37  5bfd511a23cabba7
53b0: 35 61 63 62 30 38 31 35 35 32 35 61 33 37 33 34  5acb0815525a3734
53c0: 33 30 35 61 61 66 61 34 39 63 31 64 38 62 64 66  305aafa49c1d8bdf
53d0: 62 64 38 35 33 35 37 39 36 34 36 61 33 36 61 37  bd853579646a36a7
53e0: 38 37 33 63 34 63 66 66 66 32 65 61 62 64 37 65  873c4cfff2eabd7e
53f0: 33 39 30 32 65 63 63 66 66 31 31 39 32 61 63 61  3902eccff1192aca
5400: 31 66 36 64 63 65 33 63 66 31 63 39 38 38 65 36  1f6dce3cf1c988e6
5410: 61 63 61 39 66 32 63 38 5d 7d 20 5c 0a 09 2d 62  aca9f2c8]} \..-b
5420: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
5430: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
5440: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
5450: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
5460: 72 65 73 75 6c 74 20 64 37 66 32 30 31 38 63 33  result d7f2018c3
5470: 30 33 65 65 30 34 35 64 65 34 62 38 63 64 65 66  03ee045de4b8cdef
5480: 63 66 62 35 33 39 35 36 37 34 65 33 61 38 37 37  cfb5395674e3a877
5490: 30 64 36 35 66 30 37 35 37 62 34 63 64 35 65 0a  0d65f0757b4cd5e.
54a0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
54b0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 36  ash_SHA3-224-2.6
54c0: 38 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  8 {SHA3_224Short
54d0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
54e0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
54f0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
5500: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
5510: 20 68 65 78 20 31 61 34 32 34 65 63 63 65 31 61   hex 1a424ecce1a
5520: 38 32 63 34 37 37 34 32 31 37 31 61 37 30 31 61  82c47742171a701a
5530: 64 36 65 30 66 66 31 61 37 36 32 63 65 32 36 66  d6e0ff1a762ce26f
5540: 38 65 33 33 32 38 31 38 61 37 66 61 31 61 38 30  8e332818a7fa1a80
5550: 30 61 34 65 35 30 36 61 34 62 64 63 38 31 33 61  0a4e506a4bdc813a
5560: 30 39 65 65 31 64 35 37 32 32 32 61 64 61 37 39  09ee1d57222ada79
5570: 61 31 32 65 32 33 39 39 35 34 39 66 66 64 38 30  a12e2399549ffd80
5580: 66 31 36 32 38 65 66 35 35 65 32 33 31 63 65 30  f1628ef55e231ce0
5590: 39 31 33 66 39 61 62 31 39 33 30 5d 7d 20 5c 0a  913f9ab1930]} \.
55a0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
55b0: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
55c0: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
55d0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
55e0: 74 20 2d 72 65 73 75 6c 74 20 32 37 37 66 39 36  t -result 277f96
55f0: 66 63 61 35 64 39 61 62 30 35 35 66 61 65 35 64  fca5d9ab055fae5d
5600: 34 64 64 31 30 63 63 34 39 63 32 32 33 37 62 64  4dd10cc49c2237bd
5610: 33 38 64 39 35 62 64 38 64 62 64 31 36 38 65 63  38d95bd8dbd168ec
5620: 32 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  21..tcltest::tes
5630: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
5640: 32 2e 36 39 20 7b 53 48 41 33 5f 32 32 34 53 68  2.69 {SHA3_224Sh
5650: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
5660: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
5670: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
5680: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
5690: 6f 64 65 20 68 65 78 20 61 66 31 37 32 38 30 39  ode hex af172809
56a0: 35 37 30 63 63 33 30 36 33 33 33 63 32 35 35 32  570cc306333c2552
56b0: 33 66 38 36 33 63 36 64 30 65 30 31 35 34 63 35  3f863c6d0e0154c5
56c0: 35 65 34 30 34 37 32 32 66 30 64 34 65 64 34 31  5e404722f0d4ed41
56d0: 39 37 31 33 64 61 62 66 38 65 31 38 34 39 33 61  9713dabf8e18493a
56e0: 30 65 30 62 35 33 62 32 32 30 61 33 36 35 33 35  0e0b53b220a36535
56f0: 62 31 65 38 66 30 62 62 65 34 33 65 36 32 34 66  b1e8f0bbe43e624f
5700: 61 63 39 66 35 36 36 66 39 39 32 38 30 37 62 36  ac9f566f992807b6
5710: 66 32 64 37 30 62 62 38 30 35 39 33 33 65 32 65  f2d70bb805933e2e
5720: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
5730: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
5740: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
5750: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
5760: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 39   exact -result 9
5770: 35 38 31 31 37 30 30 39 33 36 30 30 63 62 36 37  581170093600cb67
5780: 30 36 33 61 33 31 34 64 38 64 65 63 66 31 30 39  063a314d8decf109
5790: 66 66 39 33 36 38 66 66 62 63 39 30 65 61 32 64  ff9368ffbc90ea2d
57a0: 33 32 35 30 35 37 37 0a 0a 74 63 6c 74 65 73 74  3250577..tcltest
57b0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
57c0: 2d 32 32 34 2d 32 2e 37 30 20 7b 53 48 41 33 5f  -224-2.70 {SHA3_
57d0: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
57e0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
57f0: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
5800: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
5810: 79 20 64 65 63 6f 64 65 20 68 65 78 20 61 36 32  y decode hex a62
5820: 66 34 62 34 33 32 35 30 63 64 66 33 66 34 33 63  f4b43250cdf3f43c
5830: 31 64 61 34 33 39 62 63 35 65 34 32 32 34 62 31  1da439bc5e4224b1
5840: 35 31 38 35 62 36 30 64 36 31 35 65 33 38 65 33  5185b60d615e38e3
5850: 63 35 31 32 34 32 35 61 61 62 31 34 35 34 30 31  c512425aab145401
5860: 62 35 37 61 63 33 66 63 30 62 63 63 31 37 38 65  b57ac3fc0bcc178e
5870: 61 66 65 66 35 32 61 32 62 37 62 30 34 62 32 62  afef52a2b7b04b2b
5880: 38 39 65 37 36 30 32 31 32 66 39 36 63 34 65 65  89e760212f96c4ee
5890: 36 39 34 39 39 30 38 33 31 38 35 38 66 30 66 61  694990831858f0fa
58a0: 37 63 31 33 63 32 34 5d 7d 20 5c 0a 09 2d 62 6f  7c13c24]} \..-bo
58b0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
58c0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
58d0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
58e0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
58f0: 65 73 75 6c 74 20 61 30 66 35 37 37 35 61 32 64  esult a0f5775a2d
5900: 30 30 31 61 36 36 66 30 38 38 32 63 65 31 34 31  001a66f0882ce141
5910: 35 32 36 31 39 39 34 30 32 31 39 38 38 36 39 30  5261994021988690
5920: 38 34 30 63 36 62 34 61 33 34 37 30 63 38 0a 0a  840c6b4a3470c8..
5930: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
5940: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 37 31  sh_SHA3-224-2.71
5950: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
5960: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
5970: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
5980: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
5990: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
59a0: 68 65 78 20 66 63 66 38 31 63 39 33 66 39 31 37  hex fcf81c93f917
59b0: 62 62 30 36 66 32 37 38 66 34 38 38 32 36 65 66  bb06f278f48826ef
59c0: 39 63 61 38 62 61 39 39 61 63 38 66 30 30 31 32  9ca8ba99ac8f0012
59d0: 39 66 64 39 66 38 65 38 31 63 61 33 31 37 35 30  9fd9f8e81ca31750
59e0: 64 35 65 35 34 38 31 38 61 66 30 33 33 31 64 64  d5e54818af0331dd
59f0: 32 33 39 65 62 37 37 65 65 34 62 30 63 34 64 30  239eb77ee4b0c4d0
5a00: 63 32 64 38 34 37 39 34 63 65 66 32 37 64 61 36  c2d84794cef27da6
5a10: 62 66 65 62 37 30 37 37 39 34 64 33 62 64 62 63  bfeb707794d3bdbc
5a20: 37 62 33 34 39 39 36 38 66 32 61 33 31 36 64 38  7b349968f2a316d8
5a30: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
5a40: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
5a50: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
5a60: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
5a70: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 61   exact -result a
5a80: 39 37 61 37 34 66 62 30 31 66 65 63 35 63 61 66  97a74fb01fec5caf
5a90: 33 34 37 37 32 32 30 65 65 66 36 65 37 63 33 36  3477220eef6e7c36
5aa0: 64 30 62 61 34 31 39 39 64 64 63 37 35 35 66 37  d0ba4199ddc755f7
5ab0: 63 63 66 39 34 65 65 0a 0a 74 63 6c 74 65 73 74  ccf94ee..tcltest
5ac0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
5ad0: 2d 32 32 34 2d 32 2e 37 32 20 7b 53 48 41 33 5f  -224-2.72 {SHA3_
5ae0: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
5af0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
5b00: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
5b10: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
5b20: 79 20 64 65 63 6f 64 65 20 68 65 78 20 65 36 31  y decode hex e61
5b30: 64 32 34 62 35 30 30 35 38 31 37 33 34 63 32 39  d24b500581734c29
5b40: 39 30 32 61 64 65 34 63 35 30 33 35 63 30 39 30  902ade4c5035c090
5b50: 38 36 38 64 66 39 66 32 34 62 62 33 33 30 36 30  868df9f24bb33060
5b60: 39 66 63 64 66 66 34 61 37 32 64 36 66 31 38 30  9fcdff4a72d6f180
5b70: 30 31 34 32 34 66 64 38 31 33 63 65 61 33 32 39  01424fd813cea329
5b80: 32 33 64 38 61 61 38 36 63 33 64 32 31 35 62 32  23d8aa86c3d215b2
5b90: 61 62 37 64 31 33 34 32 33 37 62 62 36 32 65 37  ab7d134237bb62e7
5ba0: 38 66 36 31 63 62 39 65 39 62 34 65 66 35 63 65  8f61cb9e9b4ef5ce
5bb0: 64 32 33 37 32 39 64 30 31 39 61 5d 7d 20 5c 0a  d23729d019a]} \.
5bc0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
5bd0: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
5be0: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
5bf0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
5c00: 74 20 2d 72 65 73 75 6c 74 20 34 30 37 35 38 33  t -result 407583
5c10: 31 34 66 31 61 62 62 64 34 33 65 30 62 63 39 63  14f1abbd43e0bc9c
5c20: 37 33 61 31 63 37 65 32 34 37 31 39 64 35 36 65  73a1c7e24719d56e
5c30: 65 62 63 64 39 36 37 62 33 39 64 33 35 35 65 39  ebcd967b39d355e9
5c40: 37 38 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  78..tcltest::tes
5c50: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
5c60: 32 2e 37 33 20 7b 53 48 41 33 5f 32 32 34 53 68  2.73 {SHA3_224Sh
5c70: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
5c80: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
5c90: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
5ca0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
5cb0: 6f 64 65 20 68 65 78 20 33 37 62 31 34 66 30 34  ode hex 37b14f04
5cc0: 32 33 33 64 66 62 34 64 61 35 65 35 62 64 31 38  233dfb4da5e5bd18
5cd0: 35 32 66 37 37 63 34 31 65 32 35 63 34 39 32 36  52f77c41e25c4926
5ce0: 39 33 36 66 65 34 31 34 63 38 31 30 38 32 30 30  936fe414c8108200
5cf0: 66 36 66 33 63 64 37 38 63 30 33 65 32 64 64 39  f6f3cd78c03e2dd9
5d00: 36 31 35 34 34 36 63 31 34 62 65 62 63 32 63 37  615446c14bebc2c7
5d10: 30 64 36 35 35 30 36 61 37 61 35 64 65 63 34 38  0d65506a7a5dec48
5d20: 30 38 38 30 36 32 39 31 37 36 39 65 30 64 62 61  08806291769e0dba
5d30: 62 32 30 30 65 35 37 36 66 39 66 64 62 39 65 32  b200e576f9fdb9e2
5d40: 34 30 63 38 62 38 66 66 5d 7d 20 5c 0a 09 2d 62  40c8b8ff]} \..-b
5d50: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
5d60: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
5d70: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
5d80: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
5d90: 72 65 73 75 6c 74 20 32 64 33 36 61 66 30 64 64  result 2d36af0dd
5da0: 39 35 36 31 39 61 39 36 63 35 36 36 34 64 38 39  95619a96c5664d89
5db0: 38 37 62 62 62 38 32 64 31 38 33 34 36 36 66 66  87bbb82d183466ff
5dc0: 34 34 31 35 31 30 33 34 66 65 64 36 38 37 62 0a  44151034fed687b.
5dd0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
5de0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 37  ash_SHA3-224-2.7
5df0: 34 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  4 {SHA3_224Short
5e00: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
5e10: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
5e20: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
5e30: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
5e40: 20 68 65 78 20 34 35 65 66 62 30 61 33 64 38 66   hex 45efb0a3d8f
5e50: 62 37 62 62 36 38 33 39 31 33 34 35 39 37 32 37  b7bb683913459727
5e60: 65 38 37 35 36 64 36 37 39 35 39 63 66 64 64 34  e8756d67959cfdd4
5e70: 66 35 62 38 30 65 31 33 64 64 66 34 35 65 30 39  f5b80e13ddf45e09
5e80: 64 65 62 64 63 32 63 63 36 38 63 65 62 36 33 32  debdc2cc68ceb632
5e90: 64 36 64 34 35 61 32 64 30 61 38 36 39 66 36 64  d6d45a2d0a869f6d
5ea0: 34 64 63 34 63 31 33 36 63 38 30 35 38 34 39 66  4dc4c136c805849f
5eb0: 65 37 37 62 34 62 33 38 31 65 34 63 36 62 32 32  e77b4b381e4c6b22
5ec0: 61 33 66 66 36 39 39 34 37 61 39 62 35 61 61 36  a3ff69947a9b5aa6
5ed0: 62 37 63 62 65 34 32 5d 7d 20 5c 0a 09 2d 62 6f  b7cbe42]} \..-bo
5ee0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
5ef0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
5f00: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
5f10: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
5f20: 65 73 75 6c 74 20 31 32 35 65 39 38 33 32 32 39  esult 125e983229
5f30: 66 36 35 62 66 30 31 62 35 39 61 39 62 36 31 39  f65bf01b59a9b619
5f40: 38 31 30 61 38 38 66 31 63 35 33 62 34 63 33 62  810a88f1c53b4c3b
5f50: 31 39 36 30 62 35 32 61 32 30 35 64 39 39 0a 0a  1960b52a205d99..
5f60: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
5f70: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 37 35  sh_SHA3-224-2.75
5f80: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
5f90: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
5fa0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
5fb0: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
5fc0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
5fd0: 68 65 78 20 39 62 36 63 33 63 37 37 37 34 36 32  hex 9b6c3c777462
5fe0: 31 39 64 64 38 38 39 37 36 39 36 36 63 36 38 65  19dd88976966c68e
5ff0: 61 64 35 39 65 62 36 32 61 61 33 63 66 36 36 34  ad59eb62aa3cf664
6000: 37 37 39 38 64 63 30 36 64 34 66 63 37 65 66 38  7798dc06d4fc7ef8
6010: 62 64 34 34 64 38 39 30 33 66 31 62 37 62 36 66  bd44d8903f1b7b6f
6020: 38 62 62 66 33 64 36 32 34 39 30 35 32 66 38 36  8bbf3d6249052f86
6030: 32 65 39 63 63 66 62 30 64 31 39 35 37 66 30 62  2e9ccfb0d1957f0b
6040: 62 61 32 33 33 36 30 33 62 63 61 30 37 36 36 32  ba233603bca07662
6050: 38 36 64 31 37 65 62 39 37 34 36 62 63 30 30 32  86d17eb9746bc002
6060: 61 62 64 36 39 35 38 33 5d 7d 20 5c 0a 09 2d 62  abd69583]} \..-b
6070: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
6080: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
6090: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
60a0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
60b0: 72 65 73 75 6c 74 20 37 36 32 36 32 39 35 31 38  result 762629518
60c0: 38 33 33 62 61 36 38 33 33 33 66 63 33 65 33 62  833ba68333fc3e3b
60d0: 34 64 34 38 32 63 36 30 62 34 65 30 65 38 32 38  4d482c60b4e0e828
60e0: 38 37 32 38 32 36 62 36 38 33 31 33 33 31 35 0a  872826b68313315.
60f0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
6100: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 37  ash_SHA3-224-2.7
6110: 36 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  6 {SHA3_224Short
6120: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
6130: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
6140: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
6150: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
6160: 20 68 65 78 20 39 66 34 35 32 66 39 30 30 32 31   hex 9f452f90021
6170: 39 30 31 37 31 39 39 65 64 66 63 35 64 37 64 38  9017199edfc5d7d8
6180: 36 61 31 36 32 64 39 37 35 30 62 62 61 34 63 65  6a162d9750bba4ce
6190: 63 37 37 34 32 38 65 64 31 30 33 32 65 35 37 31  c77428ed1032e571
61a0: 31 62 36 66 62 37 63 33 37 63 31 61 36 35 62 33  1b6fb7c37c1a65b3
61b0: 64 30 34 31 63 37 61 61 31 64 34 66 31 36 62 62  d041c7aa1d4f16bb
61c0: 63 66 63 35 34 66 33 35 30 30 31 34 33 36 62 36  cfc54f35001436b6
61d0: 30 61 62 66 62 36 35 34 34 63 30 62 33 39 33 66  0abfb6544c0b393f
61e0: 63 31 33 38 39 65 35 63 35 62 64 62 64 66 32 65  c1389e5c5bdbdf2e
61f0: 61 61 62 31 64 39 39 64 64 35 39 5d 7d 20 5c 0a  aab1d99dd59]} \.
6200: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
6210: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
6220: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
6230: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
6240: 74 20 2d 72 65 73 75 6c 74 20 31 39 62 34 33 32  t -result 19b432
6250: 66 35 63 33 38 66 36 36 35 34 34 31 64 33 36 63  f5c38f665441d36c
6260: 34 37 32 64 33 38 36 30 30 38 61 35 62 62 64 38  472d386008a5bbd8
6270: 32 61 61 34 65 61 62 65 61 61 62 65 33 64 32 38  2aa4eabeaabe3d28
6280: 63 63 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  cc..tcltest::tes
6290: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
62a0: 32 2e 37 37 20 7b 53 48 41 33 5f 32 32 34 53 68  2.77 {SHA3_224Sh
62b0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
62c0: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
62d0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
62e0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
62f0: 6f 64 65 20 68 65 78 20 63 62 66 64 31 38 36 35  ode hex cbfd1865
6300: 39 32 66 61 36 38 64 63 33 61 32 31 64 36 32 64  92fa68dc3a21d62d
6310: 62 31 62 61 35 35 31 32 31 66 35 38 66 65 63 62  b1ba55121f58fecb
6320: 31 31 36 39 35 38 35 39 64 37 30 62 64 37 65 64  11695859d70bd7ed
6330: 32 61 32 31 61 32 61 30 31 33 61 36 39 39 36 34  2a21a2a013a69964
6340: 30 38 34 32 39 37 33 62 35 37 31 62 66 34 61 37  0842973b571bf4a7
6350: 63 38 65 65 34 66 36 31 37 64 35 65 38 61 34 64  c8ee4f617d5e8a4d
6360: 31 65 38 63 31 35 61 65 33 33 65 37 37 30 39 37  1e8c15ae33e77097
6370: 64 31 34 36 65 62 61 32 37 39 33 34 62 31 65 33  d146eba27934b1e3
6380: 33 64 38 61 30 34 31 66 32 34 34 34 63 61 33 61  3d8a041f2444ca3a
6390: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
63a0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
63b0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
63c0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
63d0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 62   exact -result b
63e0: 33 32 61 64 31 33 62 61 34 61 30 62 39 66 63 31  32ad13ba4a0b9fc1
63f0: 61 61 39 61 31 61 35 37 62 64 62 66 62 65 62 64  aa9a1a57bdbfbebd
6400: 66 61 62 37 31 63 66 35 61 31 36 65 30 36 30 34  fab71cf5a16e0604
6410: 30 66 37 35 37 38 37 0a 0a 74 63 6c 74 65 73 74  0f75787..tcltest
6420: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
6430: 2d 32 32 34 2d 32 2e 37 38 20 7b 53 48 41 33 5f  -224-2.78 {SHA3_
6440: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
6450: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
6460: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
6470: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
6480: 79 20 64 65 63 6f 64 65 20 68 65 78 20 31 37 33  y decode hex 173
6490: 32 32 35 33 32 34 63 36 63 33 35 30 64 64 62 61  225324c6c350ddba
64a0: 32 32 37 62 38 39 61 36 35 31 65 35 37 36 64 31  227b89a651e576d1
64b0: 61 62 36 61 39 36 38 39 35 34 35 33 63 33 33 65  ab6a96895453c33e
64c0: 61 36 31 64 64 62 33 37 66 61 32 35 33 65 36 36  a61ddb37fa253e66
64d0: 36 61 38 34 64 30 66 65 61 36 30 39 38 31 34 36  6a84d0fea6098146
64e0: 38 38 34 39 35 32 34 36 31 36 31 65 62 39 63 63  88495246161eb9cc
64f0: 63 64 64 37 39 32 63 62 31 62 38 38 66 33 36 66  cdd792cb1b88f36f
6500: 33 31 32 35 64 37 36 36 65 32 65 61 62 65 38 34  3125d766e2eabe84
6510: 31 37 35 63 62 65 36 36 64 62 65 63 63 39 31 61  175cbe66dbecc91a
6520: 30 63 63 66 31 37 33 5d 7d 20 5c 0a 09 2d 62 6f  0ccf173]} \..-bo
6530: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
6540: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
6550: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
6560: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
6570: 65 73 75 6c 74 20 66 63 38 66 65 65 63 61 65 66  esult fc8feecaef
6580: 66 66 64 61 61 39 36 36 65 39 35 33 36 62 39 31  ffdaa966e9536b91
6590: 64 66 63 38 35 65 61 35 31 31 33 61 30 31 64 36  dfc85ea5113a01d6
65a0: 62 33 32 30 36 37 37 64 37 32 37 61 37 64 0a 0a  b320677d727a7d..
65b0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
65c0: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 37 39  sh_SHA3-224-2.79
65d0: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
65e0: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
65f0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
6600: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
6610: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
6620: 68 65 78 20 36 39 39 39 66 33 39 38 34 30 37 34  hex 6999f3984074
6630: 38 30 63 64 34 33 62 61 66 64 61 65 64 62 38 36  80cd43bafdaedb86
6640: 32 34 64 39 62 61 30 39 37 32 61 61 35 61 32 66  24d9ba0972aa5a2f
6650: 33 35 30 34 61 36 37 66 65 35 34 65 66 37 34 34  3504a67fe54ef744
6660: 62 37 62 62 34 31 65 61 37 30 63 66 38 66 61 61  b7bb41ea70cf8faa
6670: 37 37 31 66 61 63 36 61 32 66 35 38 32 33 64 65  771fac6a2f5823de
6680: 38 33 38 32 36 61 66 34 63 33 38 36 35 62 36 66  83826af4c3865b6f
6690: 61 65 65 65 65 33 64 31 64 30 65 64 66 65 37 66  aeeee3d1d0edfe7f
66a0: 30 65 39 66 65 33 32 30 37 66 39 31 37 62 34 36  0e9fe3207f917b46
66b0: 37 64 38 34 31 38 35 30 66 63 36 65 36 34 38 66  7d841850fc6e648f
66c0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
66d0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
66e0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
66f0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
6700: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65   exact -result e
6710: 37 61 62 63 62 34 63 30 66 32 31 38 38 31 34 65  7abcb4c0f218814e
6720: 63 66 34 35 66 62 66 32 38 61 33 66 32 38 36 64  cf45fbf28a3f286d
6730: 39 30 63 35 65 37 34 30 61 61 66 64 31 36 34 37  90c5e740aafd1647
6740: 34 33 37 63 31 65 31 0a 0a 74 63 6c 74 65 73 74  437c1e1..tcltest
6750: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
6760: 2d 32 32 34 2d 32 2e 38 30 20 7b 53 48 41 33 5f  -224-2.80 {SHA3_
6770: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
6780: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
6790: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
67a0: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
67b0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 32 37 32  y decode hex 272
67c0: 37 65 65 62 31 64 35 31 30 39 38 63 36 39 66 64  7eeb1d51098c69fd
67d0: 38 31 34 31 64 37 38 66 32 31 32 37 35 62 32 62  8141d78f21275b2b
67e0: 62 39 34 39 65 37 31 31 35 66 64 33 38 36 30 35  b949e7115fd38605
67f0: 32 36 62 62 64 61 32 35 35 34 37 63 32 30 63 66  26bbda25547c20cf
6800: 33 31 62 37 39 39 31 39 66 61 33 37 62 66 64 34  31b79919fa37bfd4
6810: 37 32 36 63 34 65 37 37 39 30 36 66 66 65 30 63  726c4e77906ffe0c
6820: 61 39 37 30 35 66 31 37 38 32 64 61 30 34 35 34  a9705f1782da0454
6830: 65 37 39 39 34 32 32 63 38 31 35 65 30 31 65 37  e799422c815e01e7
6840: 38 35 64 34 31 38 66 61 38 38 31 66 38 34 33 34  85d418fa881f8434
6850: 31 64 38 63 64 37 31 65 63 37 37 5d 7d 20 5c 0a  1d8cd71ec77]} \.
6860: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
6870: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
6880: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
6890: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
68a0: 74 20 2d 72 65 73 75 6c 74 20 32 62 65 33 33 32  t -result 2be332
68b0: 63 38 37 33 65 64 34 66 62 37 30 62 63 31 39 31  c873ed4fb70bc191
68c0: 36 63 37 36 62 65 66 32 63 64 33 33 38 35 65 36  6c76bef2cd3385e6
68d0: 37 34 62 38 33 61 61 31 65 65 38 61 64 32 38 61  74b83aa1ee8ad28a
68e0: 30 31 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  01..tcltest::tes
68f0: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
6900: 32 2e 38 31 20 7b 53 48 41 33 5f 32 32 34 53 68  2.81 {SHA3_224Sh
6910: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
6920: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
6930: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
6940: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
6950: 6f 64 65 20 68 65 78 20 31 66 34 38 61 35 62 34  ode hex 1f48a5b4
6960: 30 31 64 38 38 65 36 63 62 65 33 37 66 33 66 36  01d88e6cbe37f3f6
6970: 33 34 64 35 35 34 36 32 38 36 35 66 37 63 64 65  34d55462865f7cde
6980: 37 39 39 30 30 35 32 61 31 65 34 61 31 65 34 63  7990052a1e4a1e4c
6990: 62 32 65 35 38 63 38 34 63 32 63 37 65 66 38 32  b2e58c84c2c7ef82
69a0: 39 32 33 34 34 37 64 37 63 30 36 38 62 36 61 61  923447d7c068b6aa
69b0: 32 35 65 33 38 38 61 63 66 63 30 35 37 30 34 65  25e388acfc05704e
69c0: 34 36 64 61 31 34 33 31 36 64 33 37 63 63 64 64  46da14316d37ccdd
69d0: 32 37 30 36 61 37 62 37 39 64 64 65 62 30 32 64  2706a7b79ddeb02d
69e0: 63 64 64 37 36 66 33 34 32 63 39 63 62 32 66 34  cdd76f342c9cb2f4
69f0: 39 30 63 31 38 64 63 31 5d 7d 20 5c 0a 09 2d 62  90c18dc1]} \..-b
6a00: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
6a10: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
6a20: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
6a30: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
6a40: 72 65 73 75 6c 74 20 34 34 38 62 37 30 66 35 37  result 448b70f57
6a50: 35 61 38 61 31 65 62 37 34 30 33 30 61 39 38 35  5a8a1eb74030a985
6a60: 65 39 63 35 30 34 64 34 65 61 66 36 62 31 38 31  e9c504d4eaf6b181
6a70: 34 65 31 31 34 36 66 37 38 32 63 39 61 66 35 0a  4e1146f782c9af5.
6a80: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
6a90: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 38  ash_SHA3-224-2.8
6aa0: 32 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  2 {SHA3_224Short
6ab0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
6ac0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
6ad0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
6ae0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
6af0: 20 68 65 78 20 36 64 63 65 39 61 39 65 63 62 34   hex 6dce9a9ecb4
6b00: 38 62 39 64 61 38 61 65 66 35 31 61 38 39 65 37  8b9da8aef51a89e7
6b10: 66 37 66 63 31 61 36 61 37 38 39 36 36 62 37 62  f7fc1a6a78966b7b
6b20: 61 63 30 61 63 35 62 61 37 61 62 31 38 64 39 32  ac0ac5ba7ab18d92
6b30: 62 36 31 36 62 62 37 34 35 33 37 62 66 37 65 65  b616bb74537bf7ee
6b40: 62 39 62 64 33 62 64 66 62 34 30 61 34 35 30 37  b9bd3bdfb40a4507
6b50: 34 37 63 33 64 65 32 65 36 65 65 63 66 62 31 32  47c3de2e6eecfb12
6b60: 37 36 33 30 34 39 31 34 38 66 61 39 31 33 34 63  763049148fa9134c
6b70: 37 38 37 30 62 61 38 30 36 33 36 66 62 32 31 66  7870ba80636fb21f
6b80: 63 37 31 33 34 66 39 32 62 30 33 36 34 66 35 64  c7134f92b0364f5d
6b90: 32 37 64 65 61 63 61 5d 7d 20 5c 0a 09 2d 62 6f  27deaca]} \..-bo
6ba0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
6bb0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
6bc0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
6bd0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
6be0: 65 73 75 6c 74 20 64 66 38 35 35 64 35 34 34 65  esult df855d544e
6bf0: 31 37 66 30 31 31 32 35 30 32 32 62 63 31 38 65  17f01125022bc18e
6c00: 39 66 66 63 65 64 31 32 66 33 63 64 33 39 36 37  9ffced12f3cd3967
6c10: 34 65 36 38 31 38 34 36 35 37 65 63 37 65 0a 0a  4e68184657ec7e..
6c20: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
6c30: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 38 33  sh_SHA3-224-2.83
6c40: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
6c50: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
6c60: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
6c70: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
6c80: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
6c90: 68 65 78 20 64 34 39 38 62 36 39 30 31 33 34 35  hex d498b6901345
6ca0: 61 66 64 64 63 35 61 61 35 30 63 61 63 37 37 66  afddc5aa50cac77f
6cb0: 37 66 37 39 34 64 37 39 32 39 65 65 64 35 37 31  7f794d7929eed571
6cc0: 64 39 35 62 35 39 63 32 38 39 61 30 63 39 66 33  d95b59c289a0c9f3
6cd0: 62 38 31 32 62 38 39 36 62 63 37 62 35 36 36 66  b812b896bc7b566f
6ce0: 35 61 36 33 39 65 64 39 39 34 38 65 64 30 36 36  5a639ed9948ed066
6cf0: 63 32 63 36 32 32 63 36 65 34 64 62 62 32 65 61  c2c622c6e4dbb2ea
6d00: 33 37 65 37 63 30 36 38 30 36 64 36 31 61 32 32  37e7c06806d61a22
6d10: 63 33 32 36 64 37 32 33 35 36 65 63 34 38 63 39  c326d72356ec48c9
6d20: 62 35 31 38 32 63 32 39 62 35 66 39 32 33 61 66  b5182c29b5f923af
6d30: 32 30 30 34 36 36 30 35 5d 7d 20 5c 0a 09 2d 62  20046605]} \..-b
6d40: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
6d50: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
6d60: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
6d70: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
6d80: 72 65 73 75 6c 74 20 35 62 32 32 35 63 32 39 65  result 5b225c29e
6d90: 34 35 34 37 37 37 37 61 32 63 36 61 31 61 32 62  4547777a2c6a1a2b
6da0: 62 65 39 64 61 32 64 63 36 61 38 63 36 64 30 64  be9da2dc6a8c6d0d
6db0: 30 31 64 38 64 38 30 32 32 39 38 38 62 65 32 0a  01d8d8022988be2.
6dc0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
6dd0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 38  ash_SHA3-224-2.8
6de0: 34 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  4 {SHA3_224Short
6df0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
6e00: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
6e10: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
6e20: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
6e30: 20 68 65 78 20 65 39 35 38 62 38 30 34 38 39 61   hex e958b80489a
6e40: 61 36 61 33 38 35 32 36 32 34 34 64 61 31 36 35  a6a38526244da165
6e50: 64 63 34 34 36 34 65 37 39 36 31 65 34 35 37 66  dc4464e7961e457f
6e60: 37 36 33 61 62 64 62 32 33 66 37 65 34 38 64 33  763abdb23f7e48d3
6e70: 36 38 33 33 31 31 39 37 62 33 37 63 64 35 61 62  68331197b37cd5ab
6e80: 31 65 35 31 35 63 65 62 31 31 32 34 38 34 38 35  1e515ceb11248485
6e90: 30 34 64 38 62 65 35 38 37 62 66 33 30 34 31 64  04d8be587bf3041d
6ea0: 31 30 34 33 37 65 62 64 35 33 39 31 35 31 36 34  10437ebd53915164
6eb0: 35 35 36 62 35 39 31 30 36 62 65 62 64 66 39 39  556b59106bebdf99
6ec0: 31 31 35 31 32 32 64 39 39 35 32 39 65 30 32 65  115122d99529e02e
6ed0: 65 31 35 35 31 33 38 61 31 33 61 5d 7d 20 5c 0a  e155138a13a]} \.
6ee0: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
6ef0: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
6f00: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
6f10: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
6f20: 74 20 2d 72 65 73 75 6c 74 20 33 36 34 61 39 38  t -result 364a98
6f30: 38 34 30 30 34 32 34 35 35 37 61 39 63 36 30 65  8400424557a9c60e
6f40: 34 65 31 66 33 32 66 30 38 35 35 61 33 33 38 33  4e1f32f0855a3383
6f50: 63 39 30 62 30 30 37 64 33 30 65 65 33 65 63 33  c90b007d30ee3ec3
6f60: 33 33 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  33..tcltest::tes
6f70: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
6f80: 32 2e 38 35 20 7b 53 48 41 33 5f 32 32 34 53 68  2.85 {SHA3_224Sh
6f90: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
6fa0: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
6fb0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
6fc0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
6fd0: 6f 64 65 20 68 65 78 20 66 33 33 62 61 39 38 32  ode hex f33ba982
6fe0: 62 63 32 63 33 33 30 38 66 39 34 38 61 31 62 36  bc2c3308f948a1b6
6ff0: 34 63 37 66 62 36 38 66 62 38 39 31 62 63 30 35  4c7fb68fb891bc05
7000: 66 61 31 38 37 38 31 62 31 64 63 39 35 64 63 37  fa18781b1dc95dc7
7010: 34 39 66 37 30 30 39 61 64 63 35 38 63 63 61 32  49f7009adc58cca2
7020: 62 62 30 63 66 37 39 30 65 62 64 62 62 34 31 36  bb0cf790ebdbb416
7030: 35 62 62 66 61 62 39 33 30 34 61 32 61 36 66 32  5bbfab9304a2a6f2
7040: 33 34 36 38 38 64 63 66 32 37 33 30 39 34 64 63  34688dcf273094dc
7050: 64 38 64 37 62 33 38 34 31 36 62 65 35 37 63 65  d8d7b38416be57ce
7060: 64 61 63 65 35 37 38 33 64 38 62 39 32 39 39 33  dace5783d8b92993
7070: 35 34 38 32 35 36 62 35 33 37 33 66 32 62 34 65  548256b5373f2b4e
7080: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
7090: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
70a0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
70b0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
70c0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63   exact -result c
70d0: 61 33 37 65 35 32 66 32 38 34 33 61 30 66 36 35  a37e52f2843a0f65
70e0: 36 39 32 63 35 61 65 65 64 30 31 36 39 36 30 31  692c5aeed0169601
70f0: 64 61 33 32 37 35 64 66 62 33 65 65 36 64 38 31  da3275dfb3ee6d81
7100: 62 34 36 37 66 36 30 0a 0a 74 63 6c 74 65 73 74  b467f60..tcltest
7110: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
7120: 2d 32 32 34 2d 32 2e 38 36 20 7b 53 48 41 33 5f  -224-2.86 {SHA3_
7130: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
7140: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
7150: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
7160: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
7170: 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 62 35  y decode hex 8b5
7180: 64 37 37 61 39 30 36 63 37 65 63 37 35 36 33 61  d77a906c7ec7563a
7190: 66 37 35 35 31 61 37 39 36 65 35 64 35 64 63 66  f7551a796e5d5dcf
71a0: 30 32 63 34 32 31 32 31 64 37 62 31 33 61 34 39  02c42121d7b13a49
71b0: 61 61 39 64 34 62 63 37 39 64 36 33 37 31 39 30  aa9d4bc79d637190
71c0: 65 34 65 36 35 31 30 65 63 61 66 39 32 64 31 31  e4e6510ecaf92d11
71d0: 30 34 66 64 34 65 63 35 62 64 38 33 35 31 34 34  04fd4ec5bd835144
71e0: 36 33 35 30 37 32 32 64 31 62 32 37 37 35 64 62  6350722d1b2775db
71f0: 63 35 65 36 35 66 38 66 61 62 34 37 33 64 63 36  c5e65f8fab473dc6
7200: 33 37 62 35 63 61 38 61 39 65 62 38 38 66 36 38  37b5ca8a9eb88f68
7210: 64 31 31 64 64 65 31 35 32 37 35 64 37 63 34 37  d11dde15275d7c47
7220: 32 66 39 64 62 34 33 5d 7d 20 5c 0a 09 2d 62 6f  2f9db43]} \..-bo
7230: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
7240: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
7250: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
7260: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
7270: 65 73 75 6c 74 20 39 33 33 37 35 33 37 64 65 34  esult 9337537de4
7280: 38 32 66 30 63 66 38 38 63 61 64 36 62 38 36 65  82f0cf88cad6b86e
7290: 31 39 35 61 31 65 34 32 32 65 35 39 63 63 36 30  195a1e422e59cc60
72a0: 64 34 31 64 30 65 63 61 38 62 30 30 39 31 0a 0a  d41d0eca8b0091..
72b0: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
72c0: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 38 37  sh_SHA3-224-2.87
72d0: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
72e0: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
72f0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
7300: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
7310: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
7320: 68 65 78 20 33 61 35 36 34 61 38 34 63 32 62 34  hex 3a564a84c2b4
7330: 38 65 65 32 36 64 61 31 33 38 63 65 32 64 31 61  8ee26da138ce2d1a
7340: 65 33 63 37 39 33 33 62 63 64 36 35 65 34 30 32  e3c7933bcd65e402
7350: 38 38 34 30 36 65 35 36 66 33 30 64 31 63 34 38  88406e56f30d1c48
7360: 36 39 30 61 34 39 39 38 33 38 39 64 64 32 37 62  690a4998389dd27b
7370: 35 35 33 37 36 66 39 62 34 65 37 66 34 33 36 30  55376f9b4e7f4360
7380: 37 66 61 64 62 31 36 65 38 39 33 33 37 32 36 66  7fadb16e8933726f
7390: 30 30 61 33 65 34 31 32 36 34 63 64 61 35 35 33  00a3e41264cda553
73a0: 35 33 32 37 36 31 66 65 66 63 37 33 65 38 36 65  532761fefc73e86e
73b0: 64 37 39 62 38 34 39 62 39 34 65 30 38 39 35 34  d79b849b94e08954
73c0: 35 31 33 33 32 64 63 38 30 66 65 33 39 61 34 62  51332dc80fe39a4b
73d0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
73e0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
73f0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
7400: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
7410: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38   exact -result 8
7420: 38 65 61 62 33 65 31 36 63 61 38 64 61 35 37 31  8eab3e16ca8da571
7430: 36 35 34 32 62 61 65 33 63 37 63 37 33 36 62 35  6542bae3c7c736b5
7440: 34 31 63 38 39 36 31 39 39 62 32 63 62 39 34 31  41c896199b2cb941
7450: 32 31 33 37 36 37 62 0a 0a 74 63 6c 74 65 73 74  213767b..tcltest
7460: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
7470: 2d 32 32 34 2d 32 2e 38 38 20 7b 53 48 41 33 5f  -224-2.88 {SHA3_
7480: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
7490: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
74a0: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
74b0: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
74c0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 36 31 38  y decode hex 618
74d0: 61 35 33 39 38 39 66 66 62 62 66 35 34 61 37 36  a53989ffbbf54a76
74e0: 66 30 31 66 39 62 38 37 37 37 32 34 39 31 64 38  f01f9b87772491d8
74f0: 37 63 38 66 32 35 63 35 38 65 62 31 31 62 31 38  7c8f25c58eb11b18
7500: 61 30 34 66 35 62 61 38 65 64 36 32 35 37 34 63  a04f5ba8ed62574c
7510: 33 35 31 61 34 36 36 64 66 36 34 37 33 31 63 39  351a466df64731c9
7520: 31 31 34 35 38 64 37 36 35 63 62 64 65 38 33 65  11458d765cbde83e
7530: 37 66 32 39 64 65 39 30 62 63 31 62 62 32 36 63  7f29de90bc1bb26c
7540: 63 35 36 62 33 35 63 31 34 30 35 35 35 61 37 64  c56b35c140555a7d
7550: 63 66 30 30 66 35 33 39 34 64 37 36 61 34 63 63  cf00f5394d76a4cc
7560: 35 33 31 64 37 64 35 66 35 37 62 61 63 37 64 63  531d7d5f57bac7dc
7570: 62 64 30 36 61 34 66 37 33 62 61 5d 7d 20 5c 0a  bd06a4f73ba]} \.
7580: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
7590: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
75a0: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
75b0: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
75c0: 74 20 2d 72 65 73 75 6c 74 20 34 61 37 32 37 63  t -result 4a727c
75d0: 63 36 62 34 62 64 39 33 64 35 66 66 32 65 63 62  c6b4bd93d5ff2ecb
75e0: 38 31 61 62 35 30 35 37 64 66 64 63 62 65 33 65  81ab5057dfdcbe3e
75f0: 30 63 34 39 34 33 36 61 35 38 62 39 66 66 33 65  0c49436a58b9ff3e
7600: 66 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  f2..tcltest::tes
7610: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
7620: 32 2e 38 39 20 7b 53 48 41 33 5f 32 32 34 53 68  2.89 {SHA3_224Sh
7630: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
7640: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
7650: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
7660: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
7670: 6f 64 65 20 68 65 78 20 33 31 38 35 37 62 62 34  ode hex 31857bb4
7680: 65 38 32 34 39 37 62 35 32 36 65 34 32 36 64 65  e82497b526e426de
7690: 36 39 32 30 61 36 30 36 33 64 30 32 32 36 34 64  6920a6063d02264d
76a0: 35 32 34 39 66 65 66 66 64 31 34 61 62 64 62 62  5249feffd14abdbb
76b0: 66 30 33 35 36 33 64 34 63 35 39 61 64 31 66 37  f03563d4c59ad1f7
76c0: 35 37 32 63 37 64 30 65 66 62 63 34 36 61 36 35  572c7d0efbc46a65
76d0: 64 65 61 39 35 38 30 62 64 65 30 65 33 38 37 63  dea9580bde0e387c
76e0: 39 65 64 63 65 32 37 63 64 39 62 32 30 61 34 36  9edce27cd9b20a46
76f0: 66 36 32 61 37 30 65 36 64 64 35 66 35 38 65 34  f62a70e6dd5f58e4
7700: 30 61 61 63 33 61 32 32 64 66 62 36 62 61 30 37  0aac3a22dfb6ba07
7710: 33 66 61 63 64 61 64 64 35 38 63 64 36 66 37 38  3facdadd58cd6f78
7720: 63 30 32 62 64 32 31 39 5d 7d 20 5c 0a 09 2d 62  c02bd219]} \..-b
7730: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
7740: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
7750: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
7760: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
7770: 72 65 73 75 6c 74 20 39 65 36 31 34 66 63 31 33  result 9e614fc13
7780: 39 36 34 35 65 31 35 38 63 64 31 62 32 31 36 65  9645e158cd1b216e
7790: 32 36 32 33 65 35 38 36 32 34 32 61 66 36 34 66  2623e586242af64f
77a0: 38 34 38 33 65 36 66 63 61 32 30 65 64 34 62 0a  8483e6fca20ed4b.
77b0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
77c0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 39  ash_SHA3-224-2.9
77d0: 30 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  0 {SHA3_224Short
77e0: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
77f0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
7800: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
7810: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
7820: 20 68 65 78 20 31 34 38 35 39 30 30 38 63 38 33   hex 14859008c83
7830: 66 32 38 33 31 62 65 34 64 36 65 35 34 62 37 38  f2831be4d6e54b78
7840: 31 62 39 66 62 36 31 64 61 64 63 34 30 63 34 35  1b9fb61dadc40c45
7850: 39 61 39 33 65 64 65 31 31 62 34 63 37 38 61 37  9a93ede11b4c78a7
7860: 65 35 61 35 35 61 37 31 37 30 31 34 32 37 35 32  e5a55a7170142752
7870: 36 61 30 33 62 34 32 64 38 38 33 66 32 34 37 39  6a03b42d883f2479
7880: 30 34 38 31 33 63 64 38 31 32 65 37 61 39 34 37  04813cd812e7a947
7890: 63 38 66 61 33 37 34 30 36 61 61 36 31 34 35 61  c8fa37406aa6145a
78a0: 65 61 36 64 33 66 64 39 65 64 34 39 34 31 38 36  ea6d3fd9ed494186
78b0: 66 33 35 33 33 33 64 34 32 33 63 65 33 31 65 30  f35333d423ce31e0
78c0: 63 64 34 37 33 61 30 33 31 61 35 38 30 33 63 35  cd473a031a5803c5
78d0: 35 39 33 65 39 61 34 5d 7d 20 5c 0a 09 2d 62 6f  593e9a4]} \..-bo
78e0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
78f0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
7900: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
7910: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
7920: 65 73 75 6c 74 20 35 34 35 66 61 66 61 34 33 61  esult 545fafa43a
7930: 66 63 61 66 33 38 30 36 33 64 38 61 33 31 32 63  fcaf38063d8a312c
7940: 33 61 32 37 65 30 64 37 34 62 66 66 39 35 37 66  3a27e0d74bff957f
7950: 38 65 66 34 64 35 31 63 62 32 39 36 39 38 0a 0a  8ef4d51cb29698..
7960: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
7970: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 39 31  sh_SHA3-224-2.91
7980: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
7990: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
79a0: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
79b0: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
79c0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
79d0: 68 65 78 20 32 36 37 61 31 34 62 61 64 37 30 32  hex 267a14bad702
79e0: 65 66 30 61 38 34 36 38 62 33 31 63 37 32 37 31  ef0a8468b31c7271
79f0: 35 66 30 35 33 33 66 36 62 39 37 65 36 65 39 34  5f0533f6b97e6e94
7a00: 33 38 33 39 64 65 61 34 32 30 37 31 39 64 36 64  3839dea420719d6d
7a10: 65 66 63 35 61 33 39 39 66 38 34 36 38 39 65 36  efc5a399f84689e6
7a20: 34 65 63 66 39 33 31 65 65 33 39 35 65 65 34 39  4ecf931ee395ee49
7a30: 66 31 66 65 33 36 32 31 39 39 62 37 33 63 63 36  f1fe362199b73cc6
7a40: 63 62 30 31 30 35 62 33 36 35 34 62 31 36 66 31  cb0105b3654b16f1
7a50: 39 66 30 36 65 65 38 61 61 36 62 35 64 35 34 31  9f06ee8aa6b5d541
7a60: 38 37 34 33 64 34 38 30 34 66 39 61 30 35 39 32  8743d4804f9a0592
7a70: 37 30 37 31 30 64 31 32 36 37 36 35 65 36 61 34  70710d126765e6a4
7a80: 39 63 34 63 65 32 65 33 5d 7d 20 5c 0a 09 2d 62  9c4ce2e3]} \..-b
7a90: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
7aa0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
7ab0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
7ac0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
7ad0: 72 65 73 75 6c 74 20 39 62 39 33 36 30 61 35 63  result 9b9360a5c
7ae0: 37 34 37 65 36 65 31 32 38 38 66 36 66 39 64 39  747e6e1288f6f9d9
7af0: 37 31 30 35 31 66 66 64 38 34 36 34 31 66 36 64  71051ffd84641f6d
7b00: 36 34 65 30 61 34 62 35 31 34 32 65 34 65 63 0a  64e0a4b5142e4ec.
7b10: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
7b20: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 39  ash_SHA3-224-2.9
7b30: 32 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  2 {SHA3_224Short
7b40: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
7b50: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
7b60: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
7b70: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
7b80: 20 68 65 78 20 36 63 39 38 61 38 65 62 33 65 61   hex 6c98a8eb3ea
7b90: 34 34 35 31 34 30 31 65 30 34 32 34 63 31 30 63  4451401e0424c10c
7ba0: 62 37 32 32 36 38 33 62 32 33 66 37 35 61 65 32  b722683b23f75ae2
7bb0: 35 34 64 36 32 65 62 61 37 35 61 62 62 39 61 61  54d62eba75abb9aa
7bc0: 39 36 39 38 65 36 35 62 61 31 66 66 37 63 39 66  9698e65ba1ff7c9f
7bd0: 38 36 64 33 36 64 31 63 61 36 66 30 34 32 35 64  86d36d1ca6f0425d
7be0: 31 39 34 32 38 34 34 31 62 30 30 34 35 30 65 39  19428441b00450e9
7bf0: 61 32 65 66 36 38 35 64 35 64 61 31 63 64 34 64  a2ef685d5da1cd4d
7c00: 65 31 65 37 37 39 31 38 34 64 62 37 34 33 66 63  e1e779184db743fc
7c10: 39 35 61 34 36 31 37 39 37 33 33 33 38 30 38 61  95a461797333808a
7c20: 65 36 65 34 32 66 63 65 31 65 39 64 61 35 64 38  e6e42fce1e9da5d8
7c30: 32 66 39 30 63 64 37 31 62 35 34 5d 7d 20 5c 0a  2f90cd71b54]} \.
7c40: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
7c50: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
7c60: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
7c70: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
7c80: 74 20 2d 72 65 73 75 6c 74 20 30 63 36 66 33 33  t -result 0c6f33
7c90: 66 39 35 33 34 66 63 35 32 66 33 37 30 30 66 33  f9534fc52f3700f3
7ca0: 37 62 39 65 65 36 37 38 62 34 63 35 63 38 61 39  7b9ee678b4c5c8a9
7cb0: 30 62 31 61 32 65 62 31 35 37 34 30 30 32 65 33  0b1a2eb1574002e3
7cc0: 37 37 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  77..tcltest::tes
7cd0: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
7ce0: 32 2e 39 33 20 7b 53 48 41 33 5f 32 32 34 53 68  2.93 {SHA3_224Sh
7cf0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
7d00: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
7d10: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
7d20: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
7d30: 6f 64 65 20 68 65 78 20 34 62 61 65 36 32 61 30  ode hex 4bae62a0
7d40: 30 38 64 39 66 64 62 61 33 35 31 61 31 39 30 33  08d9fdba351a1903
7d50: 63 36 36 64 35 38 65 35 38 37 33 36 31 39 39 30  c66d58e587361990
7d60: 66 37 63 39 65 65 61 30 35 61 32 66 35 31 66 39  f7c9eea05a2f51f9
7d70: 30 61 32 38 39 32 66 36 30 65 36 63 31 34 63 34  0a2892f60e6c14c4
7d80: 65 64 33 36 62 39 30 38 63 34 30 33 39 62 63 38  ed36b908c4039bc8
7d90: 39 37 39 37 66 64 38 38 65 35 34 32 38 31 62 33  9797fd88e54281b3
7da0: 37 66 36 31 39 62 33 64 39 61 32 37 34 35 38 37  7f619b3d9a274587
7db0: 32 32 39 65 66 34 38 33 35 31 65 38 63 62 31 38  229ef48351e8cb18
7dc0: 38 31 63 62 30 66 63 38 33 65 36 64 64 63 39 30  81cb0fc83e6ddc90
7dd0: 61 30 35 62 31 36 30 66 64 37 64 30 61 31 65 62  a05b160fd7d0a1eb
7de0: 30 38 33 35 64 35 37 31 35 38 65 34 32 63 37 62  0835d57158e42c7b
7df0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
7e00: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
7e10: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
7e20: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
7e30: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 39   exact -result 9
7e40: 38 39 63 31 35 36 62 61 31 66 64 31 66 37 30 64  89c156ba1fd1f70d
7e50: 65 62 33 37 38 65 34 36 66 66 63 62 66 36 66 32  eb378e46ffcbf6f2
7e60: 63 66 39 63 66 39 37 37 61 39 32 61 63 35 31 36  cf9cf977a92ac516
7e70: 34 33 63 39 37 62 34 0a 0a 74 63 6c 74 65 73 74  43c97b4..tcltest
7e80: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
7e90: 2d 32 32 34 2d 32 2e 39 34 20 7b 53 48 41 33 5f  -224-2.94 {SHA3_
7ea0: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
7eb0: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
7ec0: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
7ed0: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
7ee0: 79 20 64 65 63 6f 64 65 20 68 65 78 20 38 33 63  y decode hex 83c
7ef0: 61 36 64 34 65 62 64 66 31 63 30 34 30 36 32 63  a6d4ebdf1c04062c
7f00: 61 31 61 62 62 39 37 37 36 37 30 65 66 39 62 63  a1abb977670ef9bc
7f10: 63 38 38 39 39 30 36 39 33 35 66 64 36 34 66 66  c889906935fd64ff
7f20: 34 63 37 33 39 39 31 32 65 35 34 31 62 38 66 38  4c739912e541b8f8
7f30: 63 37 39 33 32 66 35 39 35 65 66 36 36 65 31 38  c7932f595ef66e18
7f40: 32 35 36 64 66 61 31 66 35 31 66 36 33 62 66 65  256dfa1f51f63bfe
7f50: 37 61 39 64 66 33 61 65 32 61 61 34 33 31 37 37  7a9df3ae2aa43177
7f60: 31 64 31 39 33 31 38 64 36 61 61 33 62 63 63 66  1d19318d6aa3bccf
7f70: 61 63 31 61 34 63 38 61 61 30 61 30 34 33 33 66  ac1a4c8aa0a0433f
7f80: 66 38 30 37 61 38 38 31 65 30 64 35 61 39 37 32  f807a881e0d5a972
7f90: 32 61 61 63 36 63 64 35 37 63 37 37 65 62 36 61  2aac6cd57c77eb6a
7fa0: 39 65 64 66 38 63 30 5d 7d 20 5c 0a 09 2d 62 6f  9edf8c0]} \..-bo
7fb0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
7fc0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
7fd0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
7fe0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
7ff0: 65 73 75 6c 74 20 66 62 38 33 31 66 32 34 35 36  esult fb831f2456
8000: 35 39 35 66 61 62 65 65 39 64 34 35 38 36 32 35  595fabee9d458625
8010: 32 38 33 61 38 30 62 62 34 66 38 66 30 33 31 65  283a80bb4f8f031e
8020: 39 61 62 64 62 66 34 38 62 37 62 35 31 65 0a 0a  9abdbf48b7b51e..
8030: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
8040: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 39 35  sh_SHA3-224-2.95
8050: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
8060: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
8070: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
8080: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
8090: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
80a0: 68 65 78 20 66 34 63 37 61 64 38 64 32 34 65 64  hex f4c7ad8d24ed
80b0: 35 61 36 38 32 63 34 37 33 34 36 33 65 38 35 33  5a682c473463e853
80c0: 39 31 30 35 30 63 30 32 36 66 65 66 30 62 30 65  91050c026fef0b0e
80d0: 36 64 63 61 33 38 38 65 31 61 37 65 32 62 63 38  6dca388e1a7e2bc8
80e0: 37 32 61 34 36 37 34 36 61 36 33 66 33 61 32 63  72a46746a63f3a2c
80f0: 31 63 61 36 65 34 63 38 62 37 63 35 66 62 36 62  1ca6e4c8b7c5fb6b
8100: 35 38 38 35 30 64 37 37 61 35 38 39 38 38 62 61  58850d77a58988ba
8110: 30 39 31 62 64 37 66 61 66 62 36 36 63 65 64 31  091bd7fafb66ced1
8120: 38 34 65 35 34 38 62 63 66 62 31 62 30 65 36 65  84e548bcfb1b0e6e
8130: 31 34 38 35 66 62 36 61 31 39 63 64 35 65 64 30  1485fb6a19cd5ed0
8140: 37 36 34 30 61 30 37 37 37 62 38 32 32 37 33 64  7640a0777b82273d
8150: 35 65 38 30 37 39 39 62 37 66 61 37 61 35 37 64  5e80799b7fa7a57d
8160: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
8170: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
8180: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
8190: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
81a0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 31   exact -result 1
81b0: 33 62 65 65 36 31 37 34 37 34 62 33 66 63 33 34  3bee617474b3fc34
81c0: 34 37 30 32 35 66 32 61 34 38 38 64 62 61 38 38  47025f2a488dba88
81d0: 32 35 64 34 36 61 34 65 31 32 38 62 39 61 38 62  25d46a4e128b9a8b
81e0: 64 65 62 31 62 38 35 0a 0a 74 63 6c 74 65 73 74  deb1b85..tcltest
81f0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
8200: 2d 32 32 34 2d 32 2e 39 36 20 7b 53 48 41 33 5f  -224-2.96 {SHA3_
8210: 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09  224ShortMsg} \..
8220: 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41  -constraints SHA
8230: 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20  3_224 \..-setup 
8240: 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72  {set data [binar
8250: 79 20 64 65 63 6f 64 65 20 68 65 78 20 35 66 38  y decode hex 5f8
8260: 31 63 35 61 65 63 39 32 33 38 35 62 66 64 63 35  1c5aec92385bfdc5
8270: 35 65 62 64 36 30 30 66 32 33 63 62 30 34 61 63  5ebd600f23cb04ac
8280: 39 64 35 63 37 61 31 33 39 36 66 38 30 31 66 66  9d5c7a1396f801ff
8290: 65 61 31 61 36 62 39 34 61 61 36 31 37 32 33 31  ea1a6b94aa617231
82a0: 37 36 31 62 64 65 65 62 63 39 65 63 30 66 34 62  761bdeebc9ec0f4b
82b0: 66 39 62 66 61 66 35 65 62 63 37 61 63 38 32 61  f9bfaf5ebc7ac82a
82c0: 32 63 39 36 66 31 61 37 34 63 34 36 64 39 34 66  2c96f1a74c46d94f
82d0: 30 64 61 64 30 62 63 62 39 65 66 37 62 34 31 64  0dad0bcb9ef7b41d
82e0: 64 61 66 66 38 63 66 36 33 64 32 62 32 37 38 32  daff8cf63d2b2782
82f0: 33 39 65 36 35 35 38 64 62 61 65 64 32 37 39 37  39e6558dbaed2797
8300: 65 66 33 62 37 66 34 63 66 66 38 66 65 35 39 32  ef3b7f4cff8fe592
8310: 66 36 61 33 35 35 31 62 33 64 37 5d 7d 20 5c 0a  f6a3551b3d7]} \.
8320: 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67  .-body {tls::dig
8330: 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33  est -digest SHA3
8340: 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61  -224 -data $data
8350: 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63  } \..-match exac
8360: 74 20 2d 72 65 73 75 6c 74 20 31 34 33 61 36 66  t -result 143a6f
8370: 30 61 32 30 64 35 62 34 64 62 63 35 64 66 36 34  0a20d5b4dbc5df64
8380: 61 37 65 35 30 66 39 39 38 35 36 33 31 34 35 33  a7e50f9985631453
8390: 65 62 30 39 64 65 64 37 31 36 36 37 37 30 39 30  eb09ded716677090
83a0: 38 33 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73  83..tcltest::tes
83b0: 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d  t Hash_SHA3-224-
83c0: 32 2e 39 37 20 7b 53 48 41 33 5f 32 32 34 53 68  2.97 {SHA3_224Sh
83d0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
83e0: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
83f0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
8400: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
8410: 6f 64 65 20 68 65 78 20 30 37 33 35 63 65 63 61  ode hex 0735ceca
8420: 65 64 65 66 39 39 62 66 34 63 35 33 32 34 32 66  edef99bf4c53242f
8430: 30 35 35 32 66 34 39 66 35 36 62 62 65 35 38 39  0552f49f56bbe589
8440: 61 32 66 36 31 31 61 66 37 35 66 34 66 33 61 65  a2f611af75f4f3ae
8450: 63 33 36 36 63 64 64 36 37 30 32 64 34 36 33 39  c366cdd6702d4639
8460: 31 35 31 32 35 38 30 32 30 32 62 38 36 39 30 39  1512580202b86909
8470: 37 66 63 65 62 38 61 34 35 38 38 39 66 62 62 66  7fceb8a45889fbbf
8480: 39 38 35 32 34 37 32 66 39 34 62 63 32 66 34 33  9852472f94bc2f43
8490: 32 62 62 38 33 30 39 63 34 64 30 63 34 64 33 66  2bb8309c4d0c4d3f
84a0: 62 61 30 31 66 36 65 39 30 63 35 63 32 65 61 33  ba01f6e90c5c2ea3
84b0: 66 38 39 30 65 64 39 35 64 31 33 32 63 33 31 66  f890ed95d132c31f
84c0: 34 64 61 64 62 66 32 36 38 63 33 37 38 66 61 63  4dadbf268c378fac
84d0: 35 36 30 34 65 38 61 34 5d 7d 20 5c 0a 09 2d 62  5604e8a4]} \..-b
84e0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
84f0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
8500: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
8510: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
8520: 72 65 73 75 6c 74 20 39 66 35 65 39 66 37 34 32  result 9f5e9f742
8530: 39 65 35 34 38 38 61 38 34 33 63 35 32 66 66 62  9e5488a843c52ffb
8540: 34 36 61 65 32 65 38 34 32 32 38 39 31 39 64 33  46ae2e84228919d3
8550: 32 33 33 30 61 39 31 39 33 61 66 33 62 32 31 0a  2330a9193af3b21.
8560: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
8570: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 39  ash_SHA3-224-2.9
8580: 38 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74  8 {SHA3_224Short
8590: 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61  Msg} \..-constra
85a0: 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a  ints SHA3_224 \.
85b0: 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74  .-setup {set dat
85c0: 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65  a [binary decode
85d0: 20 68 65 78 20 39 62 34 65 34 64 66 39 32 65 35   hex 9b4e4df92e5
85e0: 31 35 32 66 65 31 65 63 35 36 61 39 66 63 38 36  152fe1ec56a9fc86
85f0: 35 66 33 30 62 61 63 37 65 39 34 39 66 63 34 66  5f30bac7e949fc4f
8600: 36 32 66 30 62 31 35 38 64 31 30 62 30 38 33 36  62f0b158d10b0836
8610: 33 36 62 34 64 65 39 62 62 30 35 64 62 36 39 66  36b4de9bb05db69f
8620: 65 33 31 62 35 30 31 30 33 66 65 66 63 35 66 38  e31b50103fefc5f8
8630: 64 61 66 33 61 66 37 31 35 36 62 34 35 35 32 63  daf3af7156b4552c
8640: 61 33 36 36 37 61 39 64 37 32 30 62 62 62 32 65  a3667a9d720bbb2e
8650: 34 62 63 64 61 62 61 64 66 64 34 62 37 66 34 66  4bcdabadfd4b7f4f
8660: 63 35 62 63 38 31 31 66 61 61 33 36 37 31 30 61  c5bc811faa36710a
8670: 39 64 31 37 37 35 38 61 39 38 64 34 61 30 34 37  9d17758a98d4a047
8680: 34 66 65 63 32 37 65 39 65 66 35 62 37 34 66 35  4fec27e9ef5b74f5
8690: 63 36 38 39 39 33 35 5d 7d 20 5c 0a 09 2d 62 6f  c689935]} \..-bo
86a0: 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20  dy {tls::digest 
86b0: 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34  -digest SHA3-224
86c0: 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a   -data $data} \.
86d0: 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72  .-match exact -r
86e0: 65 73 75 6c 74 20 34 38 37 61 36 66 32 66 38 37  esult 487a6f2f87
86f0: 35 63 62 32 35 33 64 65 34 63 65 66 31 38 65 63  5cb253de4cef18ec
8700: 62 34 66 32 61 35 34 33 38 38 65 62 61 66 66 62  b4f2a54388ebaffb
8710: 66 63 34 32 35 39 62 64 64 39 37 66 30 39 0a 0a  fc4259bdd97f09..
8720: 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61  tcltest::test Ha
8730: 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 39 39  sh_SHA3-224-2.99
8740: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
8750: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
8760: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
8770: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
8780: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
8790: 68 65 78 20 61 36 31 62 65 66 38 33 38 38 36 37  hex a61bef838867
87a0: 37 31 30 66 66 34 33 34 31 62 32 36 62 31 33 62  710ff4341b26b13b
87b0: 38 64 37 61 66 37 65 34 36 31 63 63 64 33 31 37  8d7af7e461ccd317
87c0: 62 31 36 30 63 63 34 66 64 61 61 65 63 37 66 31  b160cc4fdaaec7f1
87d0: 38 30 35 61 32 38 64 64 64 33 36 36 33 61 34 32  805a28ddd3663a42
87e0: 31 30 61 37 64 31 62 36 34 61 37 35 32 65 38 36  10a7d1b64a752e86
87f0: 36 61 61 37 32 32 34 61 37 35 62 66 37 37 62 64  6aa7224a75bf77bd
8800: 30 64 36 31 38 62 63 63 33 62 30 61 33 65 65 64  0d618bcc3b0a3eed
8810: 36 62 66 65 30 65 62 32 62 38 38 32 38 31 39 65  6bfe0eb2b882819e
8820: 36 61 34 63 63 34 33 37 62 64 33 38 39 31 35 63  6a4cc437bd38915c
8830: 65 35 33 63 35 35 64 39 34 65 39 65 39 33 33 39  e53c55d94e9e9339
8840: 32 38 36 34 38 33 64 63 32 33 30 64 30 30 34 39  286483dc230d0049
8850: 37 37 37 65 61 31 63 34 5d 7d 20 5c 0a 09 2d 62  777ea1c4]} \..-b
8860: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
8870: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
8880: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
8890: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
88a0: 72 65 73 75 6c 74 20 65 32 35 37 62 63 34 35 62  result e257bc45b
88b0: 36 32 64 30 38 35 33 62 61 34 62 30 66 38 35 37  62d0853ba4b0f857
88c0: 38 36 39 38 66 34 32 36 32 63 33 31 61 37 37 38  8698f4262c31a778
88d0: 63 62 36 61 36 33 31 37 62 36 65 36 64 36 30 0a  cb6a6317b6e6d60.
88e0: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
88f0: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31  ash_SHA3-224-2.1
8900: 30 30 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72  00 {SHA3_224Shor
8910: 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  tMsg} \..-constr
8920: 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c  aints SHA3_224 \
8930: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61  ..-setup {set da
8940: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
8950: 65 20 68 65 78 20 63 30 62 64 37 39 65 30 63 35  e hex c0bd79e0c5
8960: 66 37 32 66 63 62 31 64 65 36 63 32 33 34 62 64  f72fcb1de6c234bd
8970: 62 36 37 62 64 30 64 33 66 34 38 31 62 39 36 32  b67bd0d3f481b962
8980: 61 33 61 30 31 66 32 64 38 63 34 38 33 62 64 37  a3a01f2d8c483bd7
8990: 64 35 64 39 38 35 34 38 64 35 31 64 32 37 35 33  d5d98548d51d2753
89a0: 32 37 31 36 62 31 39 35 66 64 66 62 30 65 61 30  2716b195fdfb0ea0
89b0: 62 37 37 64 62 37 35 39 62 35 34 65 32 36 39 65  b77db759b54e269e
89c0: 36 39 65 34 38 65 32 63 62 30 37 62 63 39 63 30  69e48e2cb07bc9c0
89d0: 36 32 35 39 39 32 37 64 32 37 35 35 66 34 38 65  6259927d2755f48e
89e0: 38 64 39 61 30 32 30 63 35 38 61 39 63 39 32 32  8d9a020c58a9c922
89f0: 31 61 39 64 38 33 36 66 30 33 62 33 30 65 61 62  1a9d836f03b30eab
8a00: 66 39 30 39 39 63 38 65 65 62 61 36 61 62 65 64  f9099c8eeba6abed
8a10: 36 33 62 62 33 38 32 37 35 62 32 38 5d 7d 20 5c  63bb38275b28]} \
8a20: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69  ..-body {tls::di
8a30: 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41  gest -digest SHA
8a40: 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74  3-224 -data $dat
8a50: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
8a60: 63 74 20 2d 72 65 73 75 6c 74 20 39 32 64 66 37  ct -result 92df7
8a70: 66 38 34 38 61 64 61 38 61 39 36 39 38 64 64 63  f848ada8a9698ddc
8a80: 32 65 37 34 35 32 61 63 38 66 63 34 33 63 66 38  2e7452ac8fc43cf8
8a90: 33 64 32 63 61 32 63 61 64 64 37 31 32 63 35 39  3d2ca2cadd712c59
8aa0: 35 66 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  5f2..tcltest::te
8ab0: 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34  st Hash_SHA3-224
8ac0: 2d 32 2e 31 30 31 20 7b 53 48 41 33 5f 32 32 34  -2.101 {SHA3_224
8ad0: 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f  ShortMsg} \..-co
8ae0: 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32  nstraints SHA3_2
8af0: 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  24 \..-setup {se
8b00: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  t data [binary d
8b10: 65 63 6f 64 65 20 68 65 78 20 37 37 38 32 33 61  ecode hex 77823a
8b20: 66 39 62 38 37 39 36 63 36 33 62 61 65 62 65 37  f9b8796c63baebe7
8b30: 62 61 39 64 63 64 65 31 32 63 36 32 36 62 38 34  ba9dcde12c626b84
8b40: 30 65 61 30 34 66 34 32 64 38 37 38 36 34 36 39  0ea04f42d8786469
8b50: 37 30 63 61 35 62 66 37 61 62 61 39 34 65 61 66  70ca5bf7aba94eaf
8b60: 31 31 30 64 61 33 36 63 65 30 63 38 33 34 62 36  110da36ce0c834b6
8b70: 35 34 62 63 61 63 39 33 32 36 34 61 33 34 39 66  54bcac93264a349f
8b80: 35 32 30 65 35 30 35 66 31 65 63 39 30 33 64 33  520e505f1ec903d3
8b90: 35 38 39 65 33 61 34 61 64 66 38 32 36 38 37 61  589e3a4adf82687a
8ba0: 36 35 65 65 36 64 64 30 37 32 64 36 62 63 30 35  65ee6dd072d6bc05
8bb0: 61 63 64 66 62 64 66 32 35 37 63 64 37 30 61 35  acdfbdf257cd70a5
8bc0: 31 38 33 61 35 34 62 34 66 65 38 65 38 37 64 31  183a54b4fe8e87d1
8bd0: 63 32 32 62 32 65 39 66 34 65 65 38 31 37 63 35  c22b2e9f4ee817c5
8be0: 37 64 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74  7d]} \..-body {t
8bf0: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65  ls::digest -dige
8c00: 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74  st SHA3-224 -dat
8c10: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74  a $data} \..-mat
8c20: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
8c30: 20 38 31 39 61 34 33 34 30 39 33 38 34 39 37 63   819a4340938497c
8c40: 64 38 62 31 64 65 66 38 34 34 34 62 62 30 33 66  d8b1def8444bb03f
8c50: 38 34 32 39 62 39 65 38 37 62 61 64 38 30 30 30  8429b9e87bad8000
8c60: 30 30 32 64 36 30 62 38 33 0a 0a 74 63 6c 74 65  002d60b83..tclte
8c70: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48  st::test Hash_SH
8c80: 41 33 2d 32 32 34 2d 32 2e 31 30 32 20 7b 53 48  A3-224-2.102 {SH
8c90: 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20  A3_224ShortMsg} 
8ca0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
8cb0: 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74  SHA3_224 \..-set
8cc0: 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69  up {set data [bi
8cd0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
8ce0: 61 64 61 35 36 35 31 62 34 65 32 34 30 33 33 35  ada5651b4e240335
8cf0: 36 30 30 39 34 30 66 32 30 37 62 39 38 33 37 31  600940f207b98371
8d00: 66 37 65 37 34 33 39 38 38 39 35 37 62 66 66 65  f7e743988957bffe
8d10: 30 64 65 38 65 66 30 38 36 32 64 31 62 61 35 32  0de8ef0862d1ba52
8d20: 63 35 32 62 36 39 35 30 65 37 62 30 35 63 33 35  c52b6950e7b05c35
8d30: 34 32 63 32 66 62 31 33 61 63 61 66 66 30 34 34  42c2fb13acaff044
8d40: 32 64 33 33 39 34 30 61 30 65 33 65 61 36 37 32  2d33940a0e3ea672
8d50: 33 32 66 38 34 33 37 65 61 61 30 32 31 32 38 32  32f8437eaa021282
8d60: 38 33 66 66 63 30 63 66 65 32 35 34 61 63 38 66  83ffc0cfe254ac8f
8d70: 35 34 32 62 65 33 66 30 35 66 62 65 34 65 38 35  542be3f05fbe4e85
8d80: 35 64 64 32 32 61 65 39 38 61 38 31 62 39 61 35  5dd22ae98a81b9a5
8d90: 35 62 33 64 33 37 35 33 31 31 31 32 31 30 30 34  5b3d375311121004
8da0: 38 66 32 62 35 30 65 30 36 38 5d 7d 20 5c 0a 09  8f2b50e068]} \..
8db0: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65  -body {tls::dige
8dc0: 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d  st -digest SHA3-
8dd0: 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d  224 -data $data}
8de0: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
8df0: 20 2d 72 65 73 75 6c 74 20 62 36 31 37 37 64 31   -result b6177d1
8e00: 37 39 63 66 31 37 65 64 64 63 64 38 39 38 38 63  79cf17eddcd8988c
8e10: 39 31 30 38 62 34 32 61 66 39 63 34 31 61 64 63  9108b42af9c41adc
8e20: 63 35 39 34 32 63 34 64 33 33 62 30 66 31 62 65  c5942c4d33b0f1be
8e30: 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  2..tcltest::test
8e40: 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32   Hash_SHA3-224-2
8e50: 2e 31 30 33 20 7b 53 48 41 33 5f 32 32 34 53 68  .103 {SHA3_224Sh
8e60: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
8e70: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
8e80: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
8e90: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
8ea0: 6f 64 65 20 68 65 78 20 66 66 34 37 30 34 62 62  ode hex ff4704bb
8eb0: 62 64 37 31 39 62 30 31 31 32 34 34 65 62 65 64  bd719b011244ebed
8ec0: 66 32 66 32 33 35 35 33 33 38 66 63 63 37 64 36  f2f2355338fcc7d6
8ed0: 34 38 34 34 63 33 61 30 66 33 36 61 32 31 35 36  4844c3a0f36a2156
8ee0: 39 62 35 35 66 37 34 61 39 37 31 30 66 38 66 33  9b55f74a9710f8f3
8ef0: 64 38 64 38 33 62 39 62 63 64 37 33 33 66 35 38  d8d83b9bcd733f58
8f00: 38 35 63 33 32 62 33 64 31 34 39 61 35 61 64 31  85c32b3d149a5ad1
8f10: 33 37 64 30 31 36 63 30 33 62 39 33 61 34 64 31  37d016c03b93a4d1
8f20: 31 61 66 66 38 32 31 38 65 38 65 65 65 63 36 64  1aff8218e8eeec6d
8f30: 36 64 31 32 61 34 31 64 31 34 34 31 66 33 64 66  6d12a41d1441f3df
8f40: 30 34 30 66 65 62 30 39 38 63 61 32 66 30 30 33  040feb098ca2f003
8f50: 63 34 63 32 37 37 66 63 37 31 33 30 30 63 64 64  c4c277fc71300cdd
8f60: 32 61 33 39 39 61 37 62 62 39 38 61 65 37 31 31  2a399a7bb98ae711
8f70: 63 34 34 36 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20  c446]} \..-body 
8f80: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69  {tls::digest -di
8f90: 67 65 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64  gest SHA3-224 -d
8fa0: 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d  ata $data} \..-m
8fb0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
8fc0: 6c 74 20 61 31 30 37 32 62 32 38 66 33 34 35 33  lt a1072b28f3453
8fd0: 34 32 32 65 36 31 31 34 32 31 33 30 39 61 61 34  422e611421309aa4
8fe0: 39 61 61 65 62 62 61 30 32 37 33 63 37 32 62 38  9aaebba0273c72b8
8ff0: 33 35 66 64 65 65 61 31 31 33 32 0a 0a 74 63 6c  35fdeea1132..tcl
9000: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
9010: 53 48 41 33 2d 32 32 34 2d 32 2e 31 30 34 20 7b  SHA3-224-2.104 {
9020: 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67  SHA3_224ShortMsg
9030: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
9040: 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73  s SHA3_224 \..-s
9050: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b  etup {set data [
9060: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
9070: 78 20 65 61 65 34 62 36 32 66 36 39 37 63 66 30  x eae4b62f697cf0
9080: 62 66 34 30 61 31 63 32 63 31 30 39 31 34 33 63  bf40a1c2c109143c
9090: 31 64 64 65 31 38 65 32 34 66 31 63 32 38 39 61  1dde18e24f1c289a
90a0: 62 61 36 37 65 35 63 38 33 65 65 66 35 32 62 37  ba67e5c83eef52b7
90b0: 30 63 66 31 34 33 33 62 62 39 38 30 31 33 39 34  0cf1433bb9801394
90c0: 39 32 38 35 39 36 39 36 33 30 30 35 34 65 30 37  9285969630054e07
90d0: 34 63 61 32 65 32 34 39 64 34 36 35 63 62 33 38  4ca2e249d465cb38
90e0: 33 64 62 61 35 31 35 36 31 63 62 63 62 36 32 36  3dba51561cbcb626
90f0: 66 30 62 33 62 31 64 35 34 32 64 62 31 65 31 66  f0b3b1d542db1e1f
9100: 66 31 36 38 66 33 37 31 63 37 63 36 37 36 34 62  f168f371c7c6764b
9110: 34 66 32 35 61 64 65 39 65 62 33 35 31 36 32 32  4f25ade9eb351622
9120: 32 31 32 65 39 39 39 30 33 36 31 34 62 62 66 31  212e99903614bbf1
9130: 66 65 33 39 31 34 63 64 66 32 30 33 30 33 35 61  fe3914cdf203035a
9140: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
9150: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
9160: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
9170: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
9180: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 66   exact -result f
9190: 35 32 37 33 65 34 64 30 62 66 39 37 37 39 61 30  5273e4d0bf9779a0
91a0: 39 37 35 66 65 65 32 33 63 34 34 37 62 33 61 62  975fee23c447b3ab
91b0: 62 31 63 64 31 37 63 33 34 63 37 32 33 64 36 32  b1cd17c34c723d62
91c0: 66 33 61 32 66 64 31 0a 0a 74 63 6c 74 65 73 74  f3a2fd1..tcltest
91d0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
91e0: 2d 32 32 34 2d 32 2e 31 30 35 20 7b 53 48 41 33  -224-2.105 {SHA3
91f0: 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a  _224ShortMsg} \.
9200: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48  .-constraints SH
9210: 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70  A3_224 \..-setup
9220: 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61   {set data [bina
9230: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 65  ry decode hex 0e
9240: 33 39 65 30 65 36 39 33 33 63 36 31 30 34 39 38  39e0e6933c610498
9250: 34 66 66 66 65 31 31 35 64 64 38 63 64 65 37 37  4fffe115dd8cde77
9260: 65 64 66 65 65 34 39 35 34 38 30 61 61 35 65 35  edfee495480aa5e5
9270: 64 65 66 34 32 34 66 30 36 36 61 35 37 37 30 33  def424f066a57703
9280: 34 35 66 65 63 62 32 38 62 31 36 63 61 61 35 34  45fecb28b16caa54
9290: 31 36 62 63 37 39 65 32 62 38 33 31 34 35 34 30  16bc79e2b8314540
92a0: 39 62 64 34 62 66 65 39 61 30 30 63 38 34 39 33  9bd4bfe9a00c8493
92b0: 66 30 36 65 61 32 61 39 39 64 64 36 35 38 66 62  f06ea2a99dd658fb
92c0: 38 37 62 37 31 65 62 35 37 64 61 66 65 35 38 64  87b71eb57dafe58d
92d0: 61 35 35 66 61 30 34 31 31 65 37 39 30 33 34 31  a55fa0411e790341
92e0: 65 33 31 61 38 62 61 38 66 33 35 62 62 65 37 31  e31a8ba8f35bbe71
92f0: 61 66 32 33 62 34 65 38 38 33 33 66 64 36 35 65  af23b4e8833fd65e
9300: 63 38 62 34 65 36 32 31 65 39 35 33 34 30 5d 7d  c8b4e621e95340]}
9310: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a   \..-body {tls::
9320: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53  digest -digest S
9330: 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64  HA3-224 -data $d
9340: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  ata} \..-match e
9350: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 36 32 66  xact -result 62f
9360: 62 37 64 36 62 33 38 31 30 64 30 66 64 37 64 39  b7d6b3810d0fd7d9
9370: 36 62 34 66 66 35 65 66 65 37 62 64 32 38 33 64  6b4ff5efe7bd283d
9380: 64 62 62 65 64 61 34 61 32 31 61 36 32 66 39 38  dbbeda4a21a62f98
9390: 35 61 33 64 63 0a 0a 74 63 6c 74 65 73 74 3a 3a  5a3dc..tcltest::
93a0: 74 65 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32  test Hash_SHA3-2
93b0: 32 34 2d 32 2e 31 30 36 20 7b 53 48 41 33 5f 32  24-2.106 {SHA3_2
93c0: 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d  24ShortMsg} \..-
93d0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33  constraints SHA3
93e0: 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b  _224 \..-setup {
93f0: 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79  set data [binary
9400: 20 64 65 63 6f 64 65 20 68 65 78 20 65 33 32 62   decode hex e32b
9410: 65 61 39 61 62 30 32 64 65 37 64 38 39 33 65 63  ea9ab02de7d893ec
9420: 62 37 38 35 37 62 61 36 36 64 66 32 63 33 35 65  b7857ba66df2c35e
9430: 64 32 35 38 31 32 33 30 36 35 63 61 38 30 65 32  d258123065ca80e2
9440: 61 30 36 37 66 61 62 62 37 64 64 34 65 37 39 38  a067fabb7dd4e798
9450: 33 39 65 61 30 62 33 63 35 38 61 62 61 63 65 38  39ea0b3c58abace8
9460: 65 39 37 62 66 34 32 62 30 62 38 64 39 37 66 63  e97bf42b0b8d97fc
9470: 62 30 39 62 62 36 30 36 61 31 64 61 30 32 34 33  b09bb606a1da0243
9480: 63 33 32 64 32 34 63 63 39 38 39 38 35 64 66 30  c32d24cc98985df0
9490: 30 38 66 38 36 39 38 33 36 32 66 32 61 61 37 38  08f8698362f2aa78
94a0: 39 65 32 61 38 32 62 33 65 35 62 35 30 31 31 38  9e2a82b3e5b50118
94b0: 35 33 64 30 63 30 65 38 66 62 64 32 30 63 34 64  53d0c0e8fbd20c4d
94c0: 32 62 35 66 34 37 33 33 66 32 64 66 38 63 35 61  2b5f4733f2df8c5a
94d0: 65 30 32 65 39 32 61 39 30 64 39 35 64 33 5d 7d  e02e92a90d95d3]}
94e0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a   \..-body {tls::
94f0: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53  digest -digest S
9500: 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64  HA3-224 -data $d
9510: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  ata} \..-match e
9520: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32 37 38  xact -result 278
9530: 65 30 36 66 64 31 32 61 33 65 33 31 34 66 36 30  e06fd12a3e314f60
9540: 64 35 39 61 33 32 33 36 37 33 62 61 30 61 32 32  d59a323673ba0a22
9550: 30 30 33 65 34 32 61 63 34 38 65 31 63 64 30 34  003e42ac48e1cd04
9560: 61 37 30 64 30 0a 0a 74 63 6c 74 65 73 74 3a 3a  a70d0..tcltest::
9570: 74 65 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32  test Hash_SHA3-2
9580: 32 34 2d 32 2e 31 30 37 20 7b 53 48 41 33 5f 32  24-2.107 {SHA3_2
9590: 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d  24ShortMsg} \..-
95a0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33  constraints SHA3
95b0: 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b  _224 \..-setup {
95c0: 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79  set data [binary
95d0: 20 64 65 63 6f 64 65 20 68 65 78 20 34 31 35 37   decode hex 4157
95e0: 37 35 32 64 33 64 31 37 35 61 34 62 63 31 33 33  752d3d175a4bc133
95f0: 34 66 64 34 32 63 32 30 34 31 31 31 37 32 38 65  4fd42c204111728e
9600: 37 30 35 39 36 35 39 64 63 65 64 66 33 33 34 65  7059659dcedf334e
9610: 61 37 63 65 33 30 33 37 38 37 39 38 64 36 37 63  a7ce30378798d67c
9620: 35 39 38 61 30 61 66 61 63 63 61 35 61 31 63 35  598a0afacca5a1c5
9630: 66 62 61 39 32 33 64 35 34 63 37 32 63 66 66 63  fba923d54c72cffc
9640: 39 38 38 37 64 66 31 62 38 64 66 31 30 64 39 36  9887df1b8df10d96
9650: 35 31 34 39 35 35 30 35 36 38 31 35 66 64 32 64  514955056815fd2d
9660: 64 38 35 35 64 33 32 65 38 62 35 38 62 36 66 64  d855d32e8b58b6fd
9670: 66 34 64 34 35 37 31 35 66 36 33 36 34 31 36 61  f4d45715f636416a
9680: 30 31 33 37 31 37 39 66 37 65 62 30 31 64 37 38  0137179f7eb01d78
9690: 36 64 61 66 66 61 39 32 34 63 63 61 62 64 35 32  6daffa924ccabd52
96a0: 33 62 62 33 31 64 31 62 35 66 30 64 30 35 63 34  3bb31d1b5f0d05c4
96b0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
96c0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
96d0: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
96e0: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
96f0: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 31   exact -result 1
9700: 63 61 62 34 33 36 33 35 64 35 30 31 65 34 33 61  cab43635d501e43a
9710: 63 34 32 62 65 65 65 32 36 33 37 35 35 62 39 61  c42beee263755b9a
9720: 32 39 38 32 37 65 32 61 31 38 62 32 31 64 37 62  29827e2a18b21d7b
9730: 65 34 32 65 34 34 37 0a 0a 74 63 6c 74 65 73 74  e42e447..tcltest
9740: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
9750: 2d 32 32 34 2d 32 2e 31 30 38 20 7b 53 48 41 33  -224-2.108 {SHA3
9760: 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a  _224ShortMsg} \.
9770: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48  .-constraints SH
9780: 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70  A3_224 \..-setup
9790: 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61   {set data [bina
97a0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 32 64  ry decode hex 2d
97b0: 66 31 32 64 38 63 32 35 36 63 64 31 61 31 32 37  f12d8c256cd1a127
97c0: 65 35 32 35 61 63 33 37 36 33 65 33 30 63 38 39  e525ac3763e30c89
97d0: 35 39 38 32 65 65 65 36 37 61 62 37 63 31 35 30  5982eee67ab7c150
97e0: 63 65 33 64 65 61 65 39 30 36 64 32 62 39 31 31  ce3deae906d2b911
97f0: 30 64 38 32 39 63 63 66 64 66 32 37 39 33 37 32  0d829ccfdf279372
9800: 39 65 33 31 65 34 37 38 65 33 61 33 31 30 61 65  9e31e478e3a310ae
9810: 35 32 35 65 30 35 39 39 37 31 61 32 39 35 31 35  525e059971a29515
9820: 62 61 64 32 32 37 33 63 65 65 37 37 61 64 38 39  bad2273cee77ad89
9830: 61 64 38 38 64 36 33 64 34 34 65 39 38 34 30 32  ad88d63d44e98402
9840: 63 36 33 31 38 30 63 66 35 65 62 30 36 64 30 62  c63180cf5eb06d0b
9850: 65 33 62 31 66 61 66 35 61 64 66 63 35 63 34 33  e3b1faf5adfc5c43
9860: 61 37 39 66 66 63 30 39 61 36 65 65 36 63 64 64  a79ffc09a6ee6cdd
9870: 66 39 63 39 61 30 33 39 34 32 31 64 35 62 32 31  f9c9a039421d5b21
9880: 38 34 61 64 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20  84ad]} \..-body 
9890: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69  {tls::digest -di
98a0: 67 65 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64  gest SHA3-224 -d
98b0: 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d  ata $data} \..-m
98c0: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
98d0: 6c 74 20 65 65 36 30 66 30 64 30 31 30 30 38 63  lt ee60f0d01008c
98e0: 66 61 63 65 34 39 61 66 32 65 65 35 37 38 30 63  face49af2ee5780c
98f0: 63 64 65 65 33 37 34 30 34 63 33 37 36 34 32 30  cdee37404c376420
9900: 30 38 61 35 35 66 61 66 61 66 32 0a 0a 74 63 6c  08a55fafaf2..tcl
9910: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
9920: 53 48 41 33 2d 32 32 34 2d 32 2e 31 30 39 20 7b  SHA3-224-2.109 {
9930: 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67  SHA3_224ShortMsg
9940: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
9950: 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73  s SHA3_224 \..-s
9960: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b  etup {set data [
9970: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
9980: 78 20 30 33 62 65 36 39 34 30 65 38 35 39 66 39  x 03be6940e859f9
9990: 62 30 37 32 36 36 30 64 66 66 32 38 61 31 38 37  b072660dff28a187
99a0: 35 35 31 63 32 34 32 35 34 38 31 64 64 30 35 35  551c2425481dd055
99b0: 35 64 32 64 65 65 34 61 63 63 33 36 31 36 34 66  5d2dee4acc36164f
99c0: 38 34 66 38 35 30 35 62 36 66 34 36 37 61 65 36  84f8505b6f467ae6
99d0: 66 37 37 32 65 61 66 63 63 39 30 36 35 34 39 30  f772eafcc9065490
99e0: 64 39 62 34 65 64 31 32 61 36 39 30 64 30 34 34  d9b4ed12a690d044
99f0: 62 66 37 64 61 31 34 39 38 36 65 35 37 31 66 65  bf7da14986e571fe
9a00: 33 34 61 65 65 32 38 65 31 64 36 39 38 63 34 31  34aee28e1d698c41
9a10: 33 36 63 63 39 66 39 35 64 34 36 32 63 39 39 30  36cc9f95d462c990
9a20: 62 36 38 31 35 61 35 34 34 36 37 64 61 36 66 34  b6815a54467da6f4
9a30: 31 63 31 62 61 61 38 36 63 34 34 38 66 33 37 61  1c1baa86c448f37a
9a40: 63 31 30 62 62 63 32 61 64 31 62 39 35 37 62 31  c10bbc2ad1b957b1
9a50: 37 33 36 38 63 65 30 31 61 37 5d 7d 20 5c 0a 09  7368ce01a7]} \..
9a60: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65  -body {tls::dige
9a70: 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d  st -digest SHA3-
9a80: 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d  224 -data $data}
9a90: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
9aa0: 20 2d 72 65 73 75 6c 74 20 61 38 61 61 38 30 64   -result a8aa80d
9ab0: 34 63 39 32 35 38 38 39 62 35 38 65 66 66 34 31  4c925889b58eff41
9ac0: 62 38 39 36 38 32 62 39 32 62 65 61 36 30 63 31  b89682b92bea60c1
9ad0: 63 33 39 39 35 30 34 33 64 61 63 33 31 32 64 32  c3995043dac312d2
9ae0: 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  d..tcltest::test
9af0: 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32   Hash_SHA3-224-2
9b00: 2e 31 31 30 20 7b 53 48 41 33 5f 32 32 34 53 68  .110 {SHA3_224Sh
9b10: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
9b20: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
9b30: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
9b40: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
9b50: 6f 64 65 20 68 65 78 20 30 62 61 66 31 61 63 32  ode hex 0baf1ac2
9b60: 34 33 63 31 66 33 34 63 61 35 65 30 30 61 65 64  43c1f34ca5e00aed
9b70: 34 64 38 36 37 66 39 36 37 62 63 32 62 39 36 33  4d867f967bc2b963
9b80: 65 39 33 39 35 36 63 33 35 62 36 62 36 38 64 61  e93956c35b6b68da
9b90: 37 37 33 37 64 65 32 33 64 37 61 31 34 30 35 61  7737de23d7a1405a
9ba0: 35 64 64 34 61 30 39 39 63 36 36 33 63 64 63 31  5dd4a099c663cdc1
9bb0: 38 32 64 34 63 39 31 62 63 33 35 66 37 64 33 66  82d4c91bc35f7d3f
9bc0: 64 35 66 33 61 63 33 35 61 64 37 61 32 36 64 62  d5f3ac35ad7a26db
9bd0: 63 34 35 65 33 65 38 36 32 36 34 63 37 64 65 63  c45e3e86264c7dec
9be0: 63 35 33 38 39 38 34 32 31 34 61 31 61 30 61 31  c538984214a1a0a1
9bf0: 64 31 31 36 37 39 61 65 32 32 66 39 38 64 37 61  d11679ae22f98d7a
9c00: 65 34 38 33 63 31 61 37 34 30 30 38 61 39 63 64  e483c1a74008a9cd
9c10: 37 66 37 63 66 37 31 62 31 66 33 37 33 61 34 32  7f7cf71b1f373a42
9c20: 32 36 66 35 63 35 38 65 62 36 32 31 65 63 35 36  26f5c58eb621ec56
9c30: 65 32 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74  e2]} \..-body {t
9c40: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65  ls::digest -dige
9c50: 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74  st SHA3-224 -dat
9c60: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74  a $data} \..-mat
9c70: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
9c80: 20 66 31 32 66 37 61 31 63 35 63 31 63 33 38 33   f12f7a1c5c1c383
9c90: 61 32 61 35 66 66 66 38 39 33 32 65 32 61 65 39  a2a5fff8932e2ae9
9ca0: 64 63 33 34 32 62 33 37 36 35 32 64 34 37 33 35  dc342b37652d4735
9cb0: 36 66 66 63 31 63 62 33 37 0a 0a 74 63 6c 74 65  6ffc1cb37..tclte
9cc0: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48  st::test Hash_SH
9cd0: 41 33 2d 32 32 34 2d 32 2e 31 31 31 20 7b 53 48  A3-224-2.111 {SH
9ce0: 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20  A3_224ShortMsg} 
9cf0: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
9d00: 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74  SHA3_224 \..-set
9d10: 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69  up {set data [bi
9d20: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
9d30: 33 63 32 39 61 38 63 38 33 65 34 38 31 39 34 61  3c29a8c83e48194a
9d40: 37 62 38 37 62 36 39 65 33 37 36 61 30 36 30 36  7b87b69e376a0606
9d50: 33 64 65 32 34 34 39 62 64 31 37 31 66 61 39 31  3de2449bd171fa91
9d60: 65 35 38 65 64 32 62 63 39 30 34 62 61 38 35 33  e58ed2bc904ba853
9d70: 62 62 33 35 65 33 66 35 31 65 37 63 30 36 65 39  bb35e3f51e7c06e9
9d80: 36 62 35 34 38 32 61 61 63 38 39 61 63 66 61 33  6b5482aac89acfa3
9d90: 38 33 62 62 62 61 33 37 30 31 64 32 30 31 30 34  83bbba3701d20104
9da0: 66 38 31 30 31 64 36 39 64 65 36 31 35 66 34 35  f8101d69de615f45
9db0: 61 32 34 63 33 65 30 32 39 39 31 62 66 30 64 33  a24c3e02991bf0d3
9dc0: 62 62 33 64 33 37 33 39 30 66 65 38 37 65 63 63  bb3d37390fe87ecc
9dd0: 36 34 30 33 32 34 33 38 34 32 34 32 31 38 38 36  6403243842421886
9de0: 32 30 39 33 61 36 39 64 64 37 62 39 39 30 30 38  2093a69dd7b99008
9df0: 35 37 33 36 36 31 66 39 39 39 36 66 66 65 38 65  573661f9996ffe8e
9e00: 64 35 30 62 37 65 35 34 66 34 39 63 5d 7d 20 5c  d50b7e54f49c]} \
9e10: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69  ..-body {tls::di
9e20: 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41  gest -digest SHA
9e30: 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74  3-224 -data $dat
9e40: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
9e50: 63 74 20 2d 72 65 73 75 6c 74 20 35 63 36 62 32  ct -result 5c6b2
9e60: 39 63 33 63 62 66 64 31 64 32 65 61 64 66 37 63  9c3cbfd1d2eadf7c
9e70: 37 39 31 35 31 33 62 32 37 66 32 31 63 39 33 34  791513b27f21c934
9e80: 64 65 36 33 37 38 65 66 37 34 38 62 37 37 39 62  de6378ef748b779b
9e90: 37 31 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  71d..tcltest::te
9ea0: 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34  st Hash_SHA3-224
9eb0: 2d 32 2e 31 31 32 20 7b 53 48 41 33 5f 32 32 34  -2.112 {SHA3_224
9ec0: 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f  ShortMsg} \..-co
9ed0: 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32  nstraints SHA3_2
9ee0: 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  24 \..-setup {se
9ef0: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  t data [binary d
9f00: 65 63 6f 64 65 20 68 65 78 20 36 38 61 33 63 30  ecode hex 68a3c0
9f10: 36 65 30 37 34 30 62 35 36 39 63 37 32 65 61 36  6e0740b569c72ea6
9f20: 61 39 30 64 38 62 34 35 65 38 33 63 37 63 33 35  a90d8b45e83c7c35
9f30: 30 64 32 62 63 66 31 63 66 36 64 36 64 66 66 61  0d2bcf1cf6d6dffa
9f40: 37 35 35 33 62 38 62 39 39 38 30 38 37 63 30 35  7553b8b998087c05
9f50: 32 65 31 63 30 36 35 64 38 36 32 62 63 63 36 61  2e1c065d862bcc6a
9f60: 37 61 33 65 30 61 39 30 61 63 66 61 31 64 63 34  7a3e0a90acfa1dc4
9f70: 31 30 31 37 32 63 39 64 61 62 31 34 30 65 61 64  10172c9dab140ead
9f80: 39 61 32 39 36 38 31 31 35 35 37 65 31 36 34 37  9a296811557e1647
9f90: 33 35 39 61 63 64 34 30 33 34 31 65 66 65 62 36  359acd40341efeb6
9fa0: 66 35 62 33 66 64 63 30 30 34 34 31 36 32 61 34  f5b3fdc0044162a4
9fb0: 35 65 36 32 62 30 65 63 33 34 31 36 33 34 62 63  5e62b0ec341634bc
9fc0: 65 63 62 38 33 30 36 32 36 39 33 30 33 39 32 66  ecb830626930392f
9fd0: 38 63 36 62 64 65 38 35 66 61 30 38 38 61 33 32  8c6bde85fa088a32
9fe0: 32 30 35 34 61 63 66 63 5d 7d 20 5c 0a 09 2d 62  2054acfc]} \..-b
9ff0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
a000: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
a010: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
a020: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
a030: 72 65 73 75 6c 74 20 35 38 61 36 39 31 35 32 34  result 58a691524
a040: 33 39 38 61 35 37 34 36 64 66 32 38 61 63 30 38  398a5746df28ac08
a050: 33 66 31 35 38 36 31 37 35 30 65 30 63 64 64 31  3f15861750e0cdd1
a060: 66 64 35 65 35 66 35 37 63 39 38 32 63 31 38 0a  fd5e5f57c982c18.
a070: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
a080: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31  ash_SHA3-224-2.1
a090: 31 33 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72  13 {SHA3_224Shor
a0a0: 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  tMsg} \..-constr
a0b0: 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c  aints SHA3_224 \
a0c0: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61  ..-setup {set da
a0d0: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
a0e0: 65 20 68 65 78 20 64 34 66 37 35 37 64 31 63 33  e hex d4f757d1c3
a0f0: 33 62 39 63 30 62 33 38 62 34 65 39 33 65 38 65  3b9c0b38b4e93e8e
a100: 32 34 38 33 65 63 35 31 62 34 38 36 31 32 39 39  2483ec51b4861299
a110: 66 31 64 36 35 30 39 36 31 34 35 37 34 39 36 64  f1d650961457496d
a120: 38 36 36 31 34 64 34 32 61 33 36 65 33 36 39 36  86614d42a36e3696
a130: 62 66 31 36 38 66 64 34 36 36 33 65 66 63 32 36  bf168fd4663efc26
a140: 65 38 38 63 64 35 38 64 31 35 31 65 31 35 33 31  e88cd58d151e1531
a150: 34 36 37 62 37 33 66 36 39 64 63 39 63 65 34 66  467b73f69dc9ce4f
a160: 38 64 34 31 63 65 35 37 39 63 65 31 63 39 31 65  8d41ce579ce1c91e
a170: 36 37 36 30 65 33 34 30 65 37 36 37 37 61 62 64  6760e340e7677abd
a180: 66 34 66 65 63 31 30 34 30 37 34 35 61 61 35 31  f4fec1040745aa51
a190: 34 34 36 34 30 61 33 39 62 38 63 34 66 38 38 34  44640a39b8c4f884
a1a0: 64 66 38 30 37 35 33 61 36 39 31 36 35 33 30 30  df80753a69165300
a1b0: 33 64 36 33 34 66 61 35 62 66 63 65 38 31 66 39  3d634fa5bfce81f9
a1c0: 34 65 63 33 66 36 5d 7d 20 5c 0a 09 2d 62 6f 64  4ec3f6]} \..-bod
a1d0: 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d  y {tls::digest -
a1e0: 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34 20  digest SHA3-224 
a1f0: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09  -data $data} \..
a200: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
a210: 73 75 6c 74 20 62 65 31 31 32 35 39 33 37 37 66  sult be11259377f
a220: 30 39 38 32 31 64 39 64 63 33 35 38 35 39 32 62  09821d9dc358592b
a230: 36 35 36 35 64 38 65 66 32 62 34 31 34 64 66 61  6565d8ef2b414dfa
a240: 61 37 64 62 35 36 30 39 66 62 37 35 31 0a 0a 74  a7db5609fb751..t
a250: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73  cltest::test Has
a260: 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31 31 34  h_SHA3-224-2.114
a270: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
a280: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
a290: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
a2a0: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
a2b0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
a2c0: 68 65 78 20 65 63 64 39 65 39 35 66 37 63 35 65  hex ecd9e95f7c5e
a2d0: 66 63 38 33 33 36 66 38 30 66 65 36 37 65 31 31  fc8336f80fe67e11
a2e0: 33 36 35 37 62 33 31 34 38 32 62 61 66 63 32 32  3657b31482bafc22
a2f0: 64 63 35 62 34 35 30 37 33 34 38 32 38 34 36 63  dc5b45073482846c
a300: 64 63 34 38 34 31 34 64 32 65 61 38 35 35 61 65  dc48414d2ea855ae
a310: 37 35 64 39 66 32 38 61 30 62 64 62 65 33 30 64  75d9f28a0bdbe30d
a320: 62 65 35 31 31 35 30 33 37 38 38 65 35 37 38 66  be511503788e578f
a330: 32 30 66 32 35 65 32 30 62 62 37 37 30 63 61 31  20f25e20bb770ca1
a340: 64 37 38 37 66 32 66 30 32 39 31 31 31 33 39 32  d787f2f029111392
a350: 37 35 64 62 65 61 61 35 61 65 31 61 61 66 31 35  75dbeaa5ae1aaf15
a360: 35 66 34 30 64 37 31 33 34 39 31 35 64 61 63 33  5f40d7134915dac3
a370: 34 64 30 39 33 38 33 35 38 64 63 38 62 65 39 37  4d0938358dc8be97
a380: 63 66 31 30 30 35 61 39 32 32 62 66 33 64 37 31  cf1005a922bf3d71
a390: 63 33 33 31 32 38 32 66 34 31 63 38 36 39 39 33  c331282f41c86993
a3a0: 65 30 63 63 66 66 5d 7d 20 5c 0a 09 2d 62 6f 64  e0ccff]} \..-bod
a3b0: 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d  y {tls::digest -
a3c0: 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34 20  digest SHA3-224 
a3d0: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09  -data $data} \..
a3e0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
a3f0: 73 75 6c 74 20 36 39 35 30 61 64 30 66 39 31 33  sult 6950ad0f913
a400: 39 38 62 33 39 39 36 35 62 31 38 35 39 65 61 39  98b39965b1859ea9
a410: 31 38 63 35 33 31 32 31 32 66 61 63 65 31 65 35  18c531212face1e5
a420: 31 64 34 64 33 39 30 66 30 39 34 65 31 0a 0a 74  1d4d390f094e1..t
a430: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73  cltest::test Has
a440: 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31 31 35  h_SHA3-224-2.115
a450: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
a460: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
a470: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
a480: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
a490: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
a4a0: 68 65 78 20 38 33 34 64 64 64 38 66 63 37 65 61  hex 834ddd8fc7ea
a4b0: 30 63 33 33 38 35 65 66 38 32 38 30 64 33 61 37  0c3385ef8280d3a7
a4c0: 62 32 32 64 35 39 61 64 31 37 64 37 31 30 61 35  b22d59ad17d710a5
a4d0: 31 61 35 34 34 61 32 39 33 35 34 34 66 33 30 36  1a544a293544f306
a4e0: 35 39 65 38 31 36 61 39 38 64 33 38 61 32 64 34  59e816a98d38a2d4
a4f0: 64 39 32 66 36 66 39 36 36 32 36 61 37 63 37 39  d92f6f96626a7c79
a500: 64 36 66 31 37 62 66 64 30 61 35 35 38 66 34 35  d6f17bfd0a558f45
a510: 65 32 66 62 35 34 31 31 37 32 62 37 32 30 65 63  e2fb541172b720ec
a520: 36 32 39 63 38 38 61 37 39 37 31 33 32 36 30 35  629c88a797132605
a530: 30 66 32 62 39 61 62 38 30 64 33 30 63 66 38 63  0f2b9ab80d30cf8c
a540: 37 37 37 66 38 30 65 33 37 63 39 38 66 61 36 31  777f80e37c98fa61
a550: 37 39 37 35 32 33 65 38 31 65 31 62 62 62 63 37  797523e81e1bbbc7
a560: 63 64 36 65 65 32 32 65 34 32 34 39 64 61 65 36  cd6ee22e4249dae6
a570: 37 39 63 65 30 66 33 65 63 63 66 62 35 34 34 39  79ce0f3eccfb5449
a580: 35 64 37 65 37 30 34 36 5d 7d 20 5c 0a 09 2d 62  5d7e7046]} \..-b
a590: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
a5a0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
a5b0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
a5c0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
a5d0: 72 65 73 75 6c 74 20 65 66 32 31 65 65 38 64 35  result ef21ee8d5
a5e0: 36 38 63 30 30 39 65 61 61 38 64 31 65 61 37 37  68c009eaa8d1ea77
a5f0: 30 39 36 38 63 62 37 31 38 63 34 64 35 36 65 37  0968cb718c4d56e7
a600: 62 32 64 39 36 36 62 66 63 62 62 66 33 39 38 0a  b2d966bfcbbf398.
a610: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
a620: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31  ash_SHA3-224-2.1
a630: 31 36 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72  16 {SHA3_224Shor
a640: 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  tMsg} \..-constr
a650: 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c  aints SHA3_224 \
a660: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61  ..-setup {set da
a670: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
a680: 65 20 68 65 78 20 36 66 66 36 31 31 32 30 38 33  e hex 6ff6112083
a690: 39 35 64 38 31 35 30 30 35 30 35 64 61 65 30 35  95d81500505dae05
a6a0: 30 66 66 30 63 32 39 63 30 61 66 64 65 32 61 38  0ff0c29c0afde2a8
a6b0: 65 38 39 63 39 36 31 39 32 38 36 33 65 61 36 32  e89c96192863ea62
a6c0: 63 31 37 65 32 39 32 64 30 35 30 32 65 39 34 64  c17e292d0502e94d
a6d0: 63 62 37 66 34 37 66 34 63 64 64 35 37 34 32 36  cb7f47f4cdd57426
a6e0: 34 66 34 38 37 31 36 64 30 32 64 36 31 36 63 66  4f48716d02d616cf
a6f0: 32 37 63 37 35 39 66 64 66 37 38 37 63 64 63 64  27c759fdf787cdcd
a700: 34 33 62 31 36 39 65 61 35 38 36 63 38 62 63 61  43b169ea586c8bca
a710: 32 35 66 61 33 63 65 31 61 30 38 65 62 36 31 35  25fa3ce1a08eb615
a720: 36 35 35 65 32 34 37 31 61 30 66 61 61 38 31 64  655e2471a0faa81d
a730: 32 65 64 63 61 32 38 65 66 66 34 30 33 30 66 61  2edca28eff4030fa
a740: 62 66 33 36 66 31 30 66 62 35 66 35 30 66 65 34  bf36f10fb5f50fe4
a750: 65 62 37 32 37 63 33 30 38 66 33 31 37 62 62 61  eb727c308f317bba
a760: 39 39 35 62 36 33 31 30 61 65 31 32 5d 7d 20 5c  995b6310ae12]} \
a770: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69  ..-body {tls::di
a780: 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41  gest -digest SHA
a790: 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74  3-224 -data $dat
a7a0: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
a7b0: 63 74 20 2d 72 65 73 75 6c 74 20 38 61 32 39 66  ct -result 8a29f
a7c0: 32 63 30 64 35 36 34 39 33 35 62 38 64 33 31 62  2c0d564935b8d31b
a7d0: 37 64 30 30 37 66 35 38 31 33 38 34 38 39 64 31  7d007f58138489d1
a7e0: 34 30 39 31 37 61 32 38 65 65 38 35 64 34 33 62  40917a28ee85d43b
a7f0: 36 66 32 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  6f2..tcltest::te
a800: 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34  st Hash_SHA3-224
a810: 2d 32 2e 31 31 37 20 7b 53 48 41 33 5f 32 32 34  -2.117 {SHA3_224
a820: 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f  ShortMsg} \..-co
a830: 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32  nstraints SHA3_2
a840: 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  24 \..-setup {se
a850: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  t data [binary d
a860: 65 63 6f 64 65 20 68 65 78 20 66 39 37 37 65 61  ecode hex f977ea
a870: 33 38 30 37 36 33 32 38 62 62 30 65 65 32 32 39  38076328bb0ee229
a880: 37 63 62 65 33 62 32 61 39 37 35 35 66 65 38 62  7cbe3b2a9755fe8b
a890: 62 39 35 61 65 37 32 36 32 39 38 65 30 34 64 66  b95ae726298e04df
a8a0: 30 35 32 30 31 61 37 63 63 66 32 30 34 36 62 38  05201a7ccf2046b8
a8b0: 32 38 33 36 65 30 39 32 64 61 39 34 61 34 65 62  2836e092da94a4eb
a8c0: 31 63 32 39 31 34 35 30 31 32 31 37 31 38 31 35  1c29145012171815
a8d0: 39 34 36 38 65 38 61 33 33 30 66 63 32 62 31 32  9468e8a330fc2b12
a8e0: 37 32 63 36 36 31 66 62 36 32 33 39 37 65 38 37  72c661fb62397e87
a8f0: 34 66 66 63 64 37 63 63 63 62 65 35 34 32 35 61  4ffcd7cccbe5425a
a900: 66 37 32 35 37 39 31 30 30 31 63 30 63 30 33 35  f725791001c0c035
a910: 65 61 34 31 63 38 63 34 38 64 61 62 64 32 30 36  ea41c8c48dabd206
a920: 64 64 62 32 31 37 36 36 36 65 32 62 36 38 38 32  ddb217666e2b6882
a930: 33 37 63 32 31 32 37 65 39 36 65 62 30 34 39 64  37c2127e96eb049d
a940: 39 34 31 62 33 34 31 32 36 62 33 37 33 65 31 33  941b34126b373e13
a950: 34 35 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74  45]} \..-body {t
a960: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65  ls::digest -dige
a970: 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74  st SHA3-224 -dat
a980: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74  a $data} \..-mat
a990: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
a9a0: 20 31 35 31 38 30 64 66 35 35 35 34 33 38 37 33   15180df55543873
a9b0: 33 37 66 30 34 64 65 32 66 33 37 61 31 36 62 32  37f04de2f37a16b2
a9c0: 38 31 32 35 61 64 62 64 30 32 62 36 66 61 36 63  8125adbd02b6fa6c
a9d0: 66 64 62 32 34 31 39 35 64 0a 0a 74 63 6c 74 65  fdb24195d..tclte
a9e0: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48  st::test Hash_SH
a9f0: 41 33 2d 32 32 34 2d 32 2e 31 31 38 20 7b 53 48  A3-224-2.118 {SH
aa00: 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20  A3_224ShortMsg} 
aa10: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
aa20: 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74  SHA3_224 \..-set
aa30: 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69  up {set data [bi
aa40: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
aa50: 32 32 61 38 66 62 34 33 64 35 34 66 66 66 38 32  22a8fb43d54fff82
aa60: 37 34 39 63 64 63 65 39 38 61 62 65 38 61 64 61  749cdce98abe8ada
aa70: 66 63 64 34 34 33 66 66 65 31 36 62 66 30 65 39  fcd443ffe16bf0e9
aa80: 39 33 34 31 65 31 66 37 30 36 34 66 63 30 37 61  9341e1f7064fc07a
aa90: 35 39 30 37 63 38 31 36 61 62 64 62 33 32 36 63  5907c816abdb326c
aaa0: 33 30 66 65 66 30 66 35 38 34 36 65 39 65 33 31  30fef0f5846e9e31
aab0: 33 66 33 32 62 36 30 32 63 39 65 30 30 33 35 32  3f32b602c9e00352
aac0: 37 30 36 33 35 38 66 63 62 37 66 62 38 31 65 61  706358fcb7fb81ea
aad0: 66 31 38 35 37 61 37 62 30 66 66 64 64 66 32 37  f1857a7b0ffddf27
aae0: 62 37 34 31 61 34 36 35 39 36 31 38 30 36 63 63  b741a465961806cc
aaf0: 66 36 37 32 63 31 37 39 39 33 66 32 38 34 62 32  f672c17993f284b2
ab00: 61 61 61 39 61 32 63 38 35 34 32 35 30 61 34 32  aaa9a2c854250a42
ab10: 31 32 61 61 37 39 33 37 61 39 62 66 65 65 66 63  12aa7937a9bfeefc
ab20: 33 30 65 63 35 66 30 30 36 37 63 33 61 61 66 33  30ec5f0067c3aaf3
ab30: 34 61 31 64 63 65 32 65 65 36 5d 7d 20 5c 0a 09  4a1dce2ee6]} \..
ab40: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65  -body {tls::dige
ab50: 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d  st -digest SHA3-
ab60: 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d  224 -data $data}
ab70: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
ab80: 20 2d 72 65 73 75 6c 74 20 64 31 31 66 63 62 62   -result d11fcbb
ab90: 62 32 66 61 30 33 31 30 39 66 39 35 32 61 35 36  b2fa03109f952a56
aba0: 65 31 36 38 36 37 63 37 30 39 30 34 35 35 32 65  e16867c70904552e
abb0: 62 35 38 30 61 36 36 35 39 33 31 34 62 64 35 66  b580a6659314bd5f
abc0: 65 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  e..tcltest::test
abd0: 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32   Hash_SHA3-224-2
abe0: 2e 31 31 39 20 7b 53 48 41 33 5f 32 32 34 53 68  .119 {SHA3_224Sh
abf0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
ac00: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
ac10: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
ac20: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
ac30: 6f 64 65 20 68 65 78 20 36 38 37 32 37 36 33 36  ode hex 68727636
ac40: 66 66 33 38 63 30 62 61 38 39 39 39 64 64 65 33  ff38c0ba8999dde3
ac50: 63 62 64 39 35 30 33 39 30 30 64 35 63 63 62 30  cbd9503900d5ccb0
ac60: 31 64 33 63 39 62 37 39 35 39 66 62 34 31 31 65  1d3c9b7959fb411e
ac70: 65 64 66 39 35 63 63 65 31 38 30 35 63 65 66 36  edf95cce1805cef6
ac80: 36 37 30 64 31 65 31 31 33 33 39 30 31 63 63 30  670d1e1133901cc0
ac90: 36 62 35 35 63 34 31 64 39 34 35 65 36 35 34 63  6b55c41d945e654c
aca0: 30 64 31 38 30 33 35 34 39 38 64 34 66 39 32 64  0d18035498d4f92d
acb0: 31 36 37 61 65 32 31 62 39 32 37 63 62 61 33 61  167ae21b927cba3a
acc0: 38 31 30 61 34 31 35 39 34 38 38 35 61 30 30 62  810a41594885a00b
acd0: 66 66 33 35 34 66 66 63 37 35 33 65 33 36 38 32  ff354ffc753e3682
ace0: 37 34 64 30 31 33 37 34 34 36 39 66 31 62 33 66  74d01374469f1b3f
acf0: 37 37 39 33 65 34 33 36 64 64 63 30 38 32 32 61  7793e436ddc0822a
ad00: 64 36 39 38 66 31 33 62 64 31 35 66 62 33 65 64  d698f13bd15fb3ed
ad10: 31 30 65 30 62 39 37 66 61 63 35 66 38 37 37 38  10e0b97fac5f8778
ad20: 64 39 63 65 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20  d9ce]} \..-body 
ad30: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69  {tls::digest -di
ad40: 67 65 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64  gest SHA3-224 -d
ad50: 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d  ata $data} \..-m
ad60: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
ad70: 6c 74 20 32 31 63 37 31 62 64 30 39 65 62 66 35  lt 21c71bd09ebf5
ad80: 64 30 39 31 35 35 33 34 37 63 34 66 34 37 36 62  d09155347c4f476b
ad90: 38 66 39 63 35 61 65 64 34 35 37 39 35 37 33 32  8f9c5aed45795732
ada0: 31 31 38 38 37 61 62 36 30 38 34 0a 0a 74 63 6c  11887ab6084..tcl
adb0: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
adc0: 53 48 41 33 2d 32 32 34 2d 32 2e 31 32 30 20 7b  SHA3-224-2.120 {
add0: 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67  SHA3_224ShortMsg
ade0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
adf0: 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73  s SHA3_224 \..-s
ae00: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b  etup {set data [
ae10: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
ae20: 78 20 31 36 37 63 62 37 37 32 66 30 39 36 62 32  x 167cb772f096b2
ae30: 65 33 62 31 35 39 39 63 63 65 33 34 34 30 64 31  e3b1599cce3440d1
ae40: 61 66 35 37 63 35 62 37 64 66 35 64 32 66 34 36  af57c5b7df5d2f46
ae50: 30 62 39 31 61 63 63 37 65 35 32 63 39 66 64 62  0b91acc7e52c9fdb
ae60: 31 39 37 39 33 62 63 30 38 33 33 37 35 31 64 30  19793bc0833751d0
ae70: 39 66 33 66 36 36 34 61 34 31 36 37 30 39 35 35  9f3f664a41670955
ae80: 38 36 61 35 36 34 34 32 30 61 37 38 31 30 31 32  86a564420a781012
ae90: 35 62 38 33 32 65 33 38 61 65 37 62 62 33 61 30  5b832e38ae7bb3a0
aea0: 64 31 34 34 30 33 65 66 36 31 35 37 63 32 30 64  d14403ef6157c20d
aeb0: 33 64 36 37 65 36 65 31 33 61 34 34 31 31 35 62  3d67e6e13a44115b
aec0: 31 39 66 66 31 66 62 38 62 36 34 66 66 61 30 31  19ff1fb8b64ffa01
aed0: 38 31 33 33 62 36 64 35 33 32 64 39 64 61 36 39  8133b6d532d9da69
aee0: 62 39 62 66 66 62 63 64 37 34 31 38 39 30 37 31  b9bffbcd74189071
aef0: 61 35 37 31 30 31 65 37 32 33 39 34 30 31 65 61  a57101e7239401ea
af00: 35 30 61 64 31 65 61 30 34 61 61 62 39 36 31 63  50ad1ea04aab961c
af10: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
af20: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
af30: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
af40: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
af50: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 63   exact -result c
af60: 34 36 63 62 32 64 66 65 62 38 62 39 36 31 65 36  46cb2dfeb8b961e6
af70: 65 38 34 64 37 32 65 30 35 31 31 31 65 30 34 64  e84d72e05111e04d
af80: 36 32 65 33 66 39 33 61 30 35 35 31 36 34 62 31  62e3f93a055164b1
af90: 33 35 62 39 30 37 32 0a 0a 74 63 6c 74 65 73 74  35b9072..tcltest
afa0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
afb0: 2d 32 32 34 2d 32 2e 31 32 31 20 7b 53 48 41 33  -224-2.121 {SHA3
afc0: 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a  _224ShortMsg} \.
afd0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48  .-constraints SH
afe0: 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70  A3_224 \..-setup
aff0: 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61   {set data [bina
b000: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 62 38  ry decode hex b8
b010: 38 66 66 37 32 38 63 38 66 38 32 39 38 34 31 61  8ff728c8f829841a
b020: 31 34 65 35 36 31 39 34 62 62 66 32 37 38 64 36  14e56194bbf278d6
b030: 39 66 38 38 33 31 37 61 38 31 62 34 37 34 39 61  9f88317a81b4749a
b040: 61 35 66 64 62 63 39 33 38 33 34 38 36 65 30 39  a5fdbc9383486e09
b050: 62 66 66 39 36 61 32 63 35 62 35 62 64 66 33 39  bff96a2c5b5bdf39
b060: 32 63 34 32 36 33 34 33 38 61 65 66 34 33 33 33  2c4263438aef4333
b070: 34 63 33 33 31 37 30 65 66 34 64 38 39 61 37 36  4c33170ef4d89a76
b080: 32 36 33 63 62 39 37 34 35 66 33 66 65 61 37 34  263cb9745f3fea74
b090: 65 33 35 66 62 66 39 31 66 37 32 32 62 62 31 33  e35fbf91f722bb13
b0a0: 35 31 62 35 36 34 33 36 63 64 64 32 39 39 32 65  51b56436cdd2992e
b0b0: 36 31 65 36 32 36 36 37 35 33 37 34 39 36 31 31  61e6266753749611
b0c0: 61 39 62 34 34 39 64 63 65 32 38 31 63 36 30 30  a9b449dce281c600
b0d0: 65 33 37 32 35 31 38 31 33 34 34 36 63 31 62 31  e37251813446c1b1
b0e0: 36 63 38 35 38 63 66 36 65 61 36 34 32 34 63 64  6c858cf6ea6424cd
b0f0: 63 36 65 39 38 36 30 66 30 37 35 31 30 66 5d 7d  c6e9860f07510f]}
b100: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a   \..-body {tls::
b110: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53  digest -digest S
b120: 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64  HA3-224 -data $d
b130: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  ata} \..-match e
b140: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 38 39  xact -result 889
b150: 31 63 64 66 65 34 38 36 61 35 38 32 65 38 33 34  1cdfe486a582e834
b160: 30 62 64 38 62 38 39 33 39 39 36 64 37 61 34 65  0bd8b893996d7a4e
b170: 35 34 37 65 33 62 66 35 30 35 35 31 39 30 32 65  547e3bf50551902e
b180: 37 32 32 66 32 0a 0a 74 63 6c 74 65 73 74 3a 3a  722f2..tcltest::
b190: 74 65 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32  test Hash_SHA3-2
b1a0: 32 34 2d 32 2e 31 32 32 20 7b 53 48 41 33 5f 32  24-2.122 {SHA3_2
b1b0: 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d  24ShortMsg} \..-
b1c0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33  constraints SHA3
b1d0: 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b  _224 \..-setup {
b1e0: 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79  set data [binary
b1f0: 20 64 65 63 6f 64 65 20 68 65 78 20 35 32 30 66   decode hex 520f
b200: 32 37 61 34 64 30 39 36 64 34 31 39 33 64 32 62  27a4d096d4193d2b
b210: 63 30 39 38 33 63 66 38 33 62 62 62 35 30 38 34  c0983cf83bbb5084
b220: 38 34 35 62 34 31 38 34 34 38 30 30 63 31 66 35  845b41844800c1f5
b230: 36 36 39 62 34 66 36 37 66 35 37 38 35 63 39 63  669b4f67f5785c9c
b240: 38 38 36 65 61 63 35 31 62 30 35 39 30 30 35 63  886eac51b059005c
b250: 63 33 63 61 66 32 66 37 64 63 66 63 32 30 35 63  c3caf2f7dcfc205c
b260: 32 33 30 61 38 63 39 32 34 66 36 30 34 33 38 36  230a8c924f604386
b270: 36 39 36 66 33 64 35 64 64 32 61 36 38 35 30 39  696f3d5dd2a68509
b280: 38 37 39 64 39 39 31 61 61 34 39 33 31 34 64 37  879d991aa49314d7
b290: 32 37 31 61 38 61 38 65 66 37 31 31 62 34 32 38  271a8a8ef711b428
b2a0: 32 35 64 33 63 64 30 30 37 31 61 65 33 62 66 36  25d3cd0071ae3bf6
b2b0: 31 30 39 37 37 32 62 66 61 63 31 62 31 36 37 66  109772bfac1b167f
b2c0: 61 64 39 39 35 66 39 39 62 37 61 66 63 32 63 35  ad995f99b7afc2c5
b2d0: 37 33 66 32 63 65 36 34 39 33 65 32 35 34 31 31  73f2ce6493e25411
b2e0: 31 30 31 64 63 61 37 39 62 36 64 32 66 31 5d 7d  101dca79b6d2f1]}
b2f0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a   \..-body {tls::
b300: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53  digest -digest S
b310: 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64  HA3-224 -data $d
b320: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  ata} \..-match e
b330: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 32 31 36  xact -result 216
b340: 65 61 35 30 39 39 37 35 39 36 66 37 31 65 64 63  ea50997596f71edc
b350: 39 34 65 64 39 36 65 32 62 36 38 36 36 32 38 36  94ed96e2b6866286
b360: 34 30 66 39 34 61 33 63 36 34 61 64 65 66 30 35  40f94a3c64adef05
b370: 63 32 62 36 33 0a 0a 74 63 6c 74 65 73 74 3a 3a  c2b63..tcltest::
b380: 74 65 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32  test Hash_SHA3-2
b390: 32 34 2d 32 2e 31 32 33 20 7b 53 48 41 33 5f 32  24-2.123 {SHA3_2
b3a0: 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d  24ShortMsg} \..-
b3b0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33  constraints SHA3
b3c0: 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b  _224 \..-setup {
b3d0: 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79  set data [binary
b3e0: 20 64 65 63 6f 64 65 20 68 65 78 20 37 35 63 32   decode hex 75c2
b3f0: 33 65 35 35 36 31 37 38 66 30 30 34 34 30 35 33  3e556178f0044053
b400: 33 62 63 64 32 35 32 35 37 39 33 34 64 30 63 36  3bcd25257934d0c6
b410: 66 35 65 36 38 61 36 34 66 31 61 61 35 31 31 62  f5e68a64f1aa511b
b420: 65 65 39 34 33 35 63 35 32 37 37 62 30 32 31 34  ee9435c5277b0214
b430: 35 66 61 65 31 66 64 65 64 63 65 33 62 36 62 37  5fae1fdedce3b6b7
b440: 62 34 37 30 31 35 63 35 34 37 62 65 35 35 64 30  b47015c547be55d0
b450: 30 64 66 61 33 39 39 39 39 32 30 64 35 38 36 64  0dfa3999920d586d
b460: 62 65 63 66 37 66 66 39 35 61 37 37 35 31 36 30  becf7ff95a775160
b470: 64 30 35 37 33 30 38 62 33 32 63 36 36 31 63 31  d057308b32c661c1
b480: 37 65 35 64 36 61 37 37 32 31 36 36 62 66 36 39  7e5d6a772166bf69
b490: 62 39 39 31 39 65 65 39 31 66 65 39 33 38 37 37  b9919ee91fe93877
b4a0: 61 35 30 37 31 31 39 33 39 63 38 35 61 39 63 66  a50711939c85a9cf
b4b0: 31 61 62 36 35 63 32 38 66 61 39 34 38 37 39 36  1ab65c28fa948796
b4c0: 32 33 66 61 65 63 65 32 30 65 31 34 35 38 62 38  23faece20e1458b8
b4d0: 38 32 31 33 38 33 66 64 61 32 32 35 33 37 36 32  821383fda2253762
b4e0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
b4f0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
b500: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
b510: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
b520: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 64   exact -result d
b530: 31 36 33 31 30 32 38 61 38 65 30 65 63 34 61 64  1631028a8e0ec4ad
b540: 63 36 38 39 63 61 62 62 61 38 62 66 36 38 31 64  c689cabba8bf681d
b550: 31 31 65 32 65 32 61 35 30 35 39 66 32 39 33 66  11e2e2a5059f293f
b560: 37 65 66 35 62 65 33 0a 0a 74 63 6c 74 65 73 74  7ef5be3..tcltest
b570: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
b580: 2d 32 32 34 2d 32 2e 31 32 34 20 7b 53 48 41 33  -224-2.124 {SHA3
b590: 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a  _224ShortMsg} \.
b5a0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48  .-constraints SH
b5b0: 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70  A3_224 \..-setup
b5c0: 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61   {set data [bina
b5d0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 64 32  ry decode hex d2
b5e0: 33 33 37 33 62 39 34 30 35 30 32 34 64 30 63 34  3373b9405024d0c4
b5f0: 62 31 37 61 61 35 30 33 66 37 65 32 66 66 37 64  b17aa503f7e2ff7d
b600: 33 30 38 30 38 33 31 32 34 65 64 32 63 62 63 34  308083124ed2cbc4
b610: 64 39 39 30 62 39 62 65 65 30 64 37 30 62 39 36  d990b9bee0d70b96
b620: 33 35 38 37 32 66 63 66 64 61 65 61 35 38 61 32  35872fcfdaea58a2
b630: 62 36 39 36 64 31 66 64 38 63 39 34 39 32 63 64  b696d1fd8c9492cd
b640: 32 65 63 31 31 31 37 39 65 65 37 35 35 61 61 65  2ec11179ee755aae
b650: 35 36 36 33 36 32 36 32 31 39 63 30 39 38 31 33  5663626219c09813
b660: 34 38 61 38 62 65 35 30 63 39 62 64 66 37 37 62  48a8be50c9bdf77b
b670: 30 36 31 31 32 31 63 64 65 32 34 36 36 34 39 61  061121cde246649a
b680: 66 31 66 33 30 62 64 37 65 38 34 61 39 33 64 39  f1f30bd7e84a93d9
b690: 35 32 66 38 30 32 35 66 38 35 34 64 37 62 64 33  52f8025f854d7bd3
b6a0: 64 35 39 64 30 65 63 64 30 37 65 36 64 34 64 39  d59d0ecd07e6d4d9
b6b0: 30 39 62 32 33 63 37 61 65 30 33 66 61 30 36 66  09b23c7ae03fa06f
b6c0: 65 31 64 65 31 63 33 34 32 34 39 39 39 66 63 63  e1de1c3424999fcc
b6d0: 33 36 31 38 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20  3618]} \..-body 
b6e0: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69  {tls::digest -di
b6f0: 67 65 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64  gest SHA3-224 -d
b700: 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d  ata $data} \..-m
b710: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
b720: 6c 74 20 37 32 36 66 36 35 38 34 66 66 39 65 61  lt 726f6584ff9ea
b730: 39 39 38 66 66 33 32 36 63 39 66 37 33 32 39 31  998ff326c9f73291
b740: 61 63 65 38 37 32 36 64 38 36 39 37 65 37 61 61  ace8726d8697e7aa
b750: 39 34 66 31 65 64 34 32 66 37 65 0a 0a 74 63 6c  94f1ed42f7e..tcl
b760: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
b770: 53 48 41 33 2d 32 32 34 2d 32 2e 31 32 35 20 7b  SHA3-224-2.125 {
b780: 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67  SHA3_224ShortMsg
b790: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
b7a0: 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73  s SHA3_224 \..-s
b7b0: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b  etup {set data [
b7c0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
b7d0: 78 20 36 66 30 35 37 66 39 31 34 38 30 66 65 63  x 6f057f91480fec
b7e0: 65 65 38 61 37 65 33 38 37 39 64 62 66 38 63 35  ee8a7e3879dbf8c5
b7f0: 32 30 34 30 66 39 36 66 35 39 32 39 63 36 62 38  2040f96f5929c6b8
b800: 62 36 61 65 61 32 32 33 62 39 31 38 34 33 64 64  b6aea223b91843dd
b810: 65 62 61 33 38 37 61 32 32 38 38 32 36 34 64 66  eba387a2288264df
b820: 33 64 32 34 31 64 31 34 62 35 62 36 62 63 37 64  3d241d14b5b6bc7d
b830: 65 66 65 39 62 63 66 31 37 34 66 35 30 36 30 61  efe9bcf174f5060a
b840: 38 38 64 65 31 66 38 36 66 66 66 35 39 66 65 64  88de1f86fff59fed
b850: 35 32 61 33 65 35 37 34 66 32 36 32 30 39 32 32  52a3e574f2620922
b860: 64 63 30 63 31 32 33 31 36 65 35 38 36 39 62 37  dc0c12316e5869b7
b870: 37 39 61 31 38 65 38 36 39 37 65 61 30 61 35 30  79a18e8697ea0a50
b880: 62 66 32 30 61 35 30 66 31 36 39 65 64 38 61 33  bf20a50f169ed8a3
b890: 30 38 66 37 38 35 62 64 39 38 65 66 65 36 66 64  08f785bd98efe6fd
b8a0: 66 34 63 61 63 34 35 37 34 64 63 61 65 39 62 62  f4cac4574dcae9bb
b8b0: 65 35 66 33 64 37 66 35 36 61 31 31 62 61 64 32  e5f3d7f56a11bad2
b8c0: 38 32 66 63 39 63 38 34 61 37 5d 7d 20 5c 0a 09  82fc9c84a7]} \..
b8d0: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65  -body {tls::dige
b8e0: 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d  st -digest SHA3-
b8f0: 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d  224 -data $data}
b900: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
b910: 20 2d 72 65 73 75 6c 74 20 36 62 34 30 65 35 63   -result 6b40e5c
b920: 38 36 64 62 33 64 39 63 33 38 34 63 32 32 61 34  86db3d9c384c22a4
b930: 36 63 62 65 66 35 66 38 65 38 63 34 32 37 62 62  6cbef5f8e8c427bb
b940: 36 62 66 34 33 32 36 38 65 64 64 39 31 38 61 65  6bf43268edd918ae
b950: 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  b..tcltest::test
b960: 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32   Hash_SHA3-224-2
b970: 2e 31 32 36 20 7b 53 48 41 33 5f 32 32 34 53 68  .126 {SHA3_224Sh
b980: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
b990: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
b9a0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
b9b0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
b9c0: 6f 64 65 20 68 65 78 20 36 66 37 37 38 37 34 64  ode hex 6f77874d
b9d0: 63 61 64 39 34 37 39 66 35 62 63 61 63 33 37 36  cad9479f5bcac376
b9e0: 33 36 36 32 63 63 33 30 63 62 39 39 38 32 33 63  3662cc30cb99823c
b9f0: 35 66 66 34 36 39 64 63 62 64 36 34 63 30 32 38  5ff469dcbd64c028
ba00: 32 38 36 62 30 65 35 37 39 35 38 30 66 64 33 61  286b0e579580fd3a
ba10: 31 37 62 35 36 62 30 39 39 62 39 37 62 66 36 32  17b56b099b97bf62
ba20: 64 35 35 35 37 39 38 66 37 61 32 35 30 65 30 38  d555798f7a250e08
ba30: 62 30 65 34 66 32 33 38 63 33 66 63 66 36 38 34  b0e4f238c3fcf684
ba40: 31 39 38 62 64 34 38 61 36 38 63 32 30 38 61 36  198bd48a68c208a6
ba50: 32 36 38 62 65 32 62 62 34 31 36 65 64 61 33 30  268be2bb416eda30
ba60: 31 31 62 35 32 33 33 38 38 62 63 65 38 33 35 37  11b523388bce8357
ba70: 62 37 66 32 36 31 32 32 36 34 30 34 32 30 34 36  b7f2612264042046
ba80: 31 61 62 63 61 62 63 62 35 30 30 34 35 31 39 61  1abcabcb5004519a
ba90: 64 66 61 32 64 34 33 64 62 37 31 38 62 63 65 37  dfa2d43db718bce7
baa0: 64 30 63 38 66 31 62 34 36 34 35 63 38 39 33 31  d0c8f1b4645c8931
bab0: 35 63 36 35 64 66 31 66 30 38 34 32 65 35 37 34  5c65df1f0842e574
bac0: 31 32 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74  12]} \..-body {t
bad0: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65  ls::digest -dige
bae0: 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74  st SHA3-224 -dat
baf0: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74  a $data} \..-mat
bb00: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
bb10: 20 30 32 32 38 36 32 36 63 36 33 63 32 30 34 36   0228626c63c2046
bb20: 35 64 35 31 33 39 64 31 61 66 30 62 39 63 65 31  5d5139d1af0b9ce1
bb30: 37 65 33 33 34 65 62 65 31 30 61 35 65 65 65 32  7e334ebe10a5eee2
bb40: 63 61 66 65 39 36 63 62 31 0a 0a 74 63 6c 74 65  cafe96cb1..tclte
bb50: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48  st::test Hash_SH
bb60: 41 33 2d 32 32 34 2d 32 2e 31 32 37 20 7b 53 48  A3-224-2.127 {SH
bb70: 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20  A3_224ShortMsg} 
bb80: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
bb90: 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74  SHA3_224 \..-set
bba0: 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69  up {set data [bi
bbb0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
bbc0: 65 61 38 34 31 62 64 34 31 62 32 32 65 34 63 39  ea841bd41b22e4c9
bbd0: 38 62 32 32 33 33 33 32 39 31 38 65 62 37 39 31  8b223332918eb791
bbe0: 66 35 31 64 31 39 37 38 35 34 30 37 38 35 66 39  f51d1978540785f9
bbf0: 63 36 31 37 36 37 35 64 62 64 30 32 37 32 31 38  c617675dbd027218
bc00: 33 31 66 37 65 37 66 64 66 61 37 37 31 34 61 66  31f7e7fdfa7714af
bc10: 37 64 36 37 31 62 35 38 38 61 36 34 66 34 39 64  7d671b588a64f49d
bc20: 38 35 35 36 62 35 64 31 63 34 34 38 31 31 36 38  8556b5d1c4481168
bc30: 33 39 37 37 31 66 61 66 35 31 61 38 35 64 62 62  39771faf51a85dbb
bc40: 31 62 62 66 66 35 39 66 61 64 38 65 33 66 65 33  1bbff59fad8e3fe3
bc50: 63 34 65 62 38 36 33 31 61 61 30 35 30 66 35 30  c4eb8631aa050f50
bc60: 35 64 66 38 35 37 35 37 65 64 39 65 39 64 31 61  5df85757ed9e9d1a
bc70: 32 36 61 38 61 30 65 39 36 66 65 65 61 61 37 61  26a8a0e96feeaa7a
bc80: 66 32 30 34 63 64 32 33 66 64 30 65 36 64 34 63  f204cd23fd0e6d4c
bc90: 61 38 64 35 66 66 32 35 62 39 31 61 30 66 39 34  a8d5ff25b91a0f94
bca0: 63 34 32 61 38 38 37 32 39 37 62 32 33 30 66 36  c42a887297b230f6
bcb0: 64 35 64 35 37 32 37 31 65 30 37 63 5d 7d 20 5c  d5d57271e07c]} \
bcc0: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69  ..-body {tls::di
bcd0: 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41  gest -digest SHA
bce0: 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74  3-224 -data $dat
bcf0: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
bd00: 63 74 20 2d 72 65 73 75 6c 74 20 66 66 33 33 63  ct -result ff33c
bd10: 36 34 32 33 31 64 65 64 66 63 32 34 37 65 31 31  64231dedfc247e11
bd20: 65 33 35 61 61 66 38 32 64 32 38 33 61 39 61 64  e35aaf82d283a9ad
bd30: 36 32 30 33 34 31 30 32 65 65 32 62 62 35 64 34  62034102ee2bb5d4
bd40: 36 30 39 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  609..tcltest::te
bd50: 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34  st Hash_SHA3-224
bd60: 2d 32 2e 31 32 38 20 7b 53 48 41 33 5f 32 32 34  -2.128 {SHA3_224
bd70: 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f  ShortMsg} \..-co
bd80: 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32  nstraints SHA3_2
bd90: 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  24 \..-setup {se
bda0: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  t data [binary d
bdb0: 65 63 6f 64 65 20 68 65 78 20 37 32 31 36 61 38  ecode hex 7216a8
bdc0: 32 35 30 32 39 64 61 31 63 39 61 39 33 32 38 64  25029da1c9a9328d
bdd0: 34 39 39 62 33 66 66 39 38 66 36 65 31 38 62 38  499b3ff98f6e18b8
bde0: 61 66 33 36 38 65 32 62 31 39 65 66 63 31 63 30  af368e2b19efc1c0
bdf0: 31 32 31 62 33 35 62 39 36 35 61 62 32 38 32 66  121b35b965ab282f
be00: 35 35 32 33 32 33 35 36 64 37 66 61 64 30 30 32  55232356d7fad002
be10: 66 65 33 66 30 62 36 61 62 37 38 33 33 62 32 63  fe3f0b6ab7833b2c
be20: 62 36 66 32 65 33 39 32 62 30 63 33 37 34 31 34  b6f2e392b0c37414
be30: 63 62 64 33 36 36 31 65 35 33 38 63 38 36 31 33  cbd3661e538c8613
be40: 61 65 30 63 39 32 39 31 39 32 38 33 30 33 66 37  ae0c9291928303f7
be50: 37 35 64 64 32 61 32 34 34 35 61 32 37 65 38 32  75dd2a2445a27e82
be60: 35 61 31 61 33 35 34 34 61 39 62 34 31 31 65 62  5a1a3544a9b411eb
be70: 33 61 61 38 37 64 30 66 64 63 64 63 64 38 35 63  3aa87d0fdcdcd85c
be80: 31 37 30 35 31 31 64 62 36 32 30 65 37 34 37 32  170511db620e7472
be90: 39 36 62 64 63 33 61 66 61 33 39 34 38 39 63 31  96bdc3afa39489c1
bea0: 38 31 66 35 61 62 63 37 36 61 38 61 34 30 34 65  81f5abc76a8a404e
beb0: 34 37 65 34 61 32 31 34 5d 7d 20 5c 0a 09 2d 62  47e4a214]} \..-b
bec0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
bed0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
bee0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
bef0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
bf00: 72 65 73 75 6c 74 20 39 34 34 30 64 33 37 31 30  result 9440d3710
bf10: 62 34 33 65 37 39 38 39 39 65 31 31 36 39 38 37  b43e79899e116987
bf20: 33 36 36 62 32 64 64 33 36 62 34 34 62 32 66 33  366b2dd36b44b2f3
bf30: 39 65 33 37 37 66 61 32 64 34 66 65 31 34 33 0a  9e377fa2d4fe143.
bf40: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
bf50: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31  ash_SHA3-224-2.1
bf60: 32 39 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72  29 {SHA3_224Shor
bf70: 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  tMsg} \..-constr
bf80: 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c  aints SHA3_224 \
bf90: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61  ..-setup {set da
bfa0: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
bfb0: 65 20 68 65 78 20 34 34 61 38 35 30 38 61 33 63  e hex 44a8508a3c
bfc0: 33 39 37 36 64 35 36 33 65 39 33 33 37 30 35 62  3976d563e933705b
bfd0: 65 34 64 62 65 65 62 63 37 32 36 33 30 34 62 35  e4dbeebc726304b5
bfe0: 31 31 32 30 33 64 66 37 63 37 64 31 65 66 63 65  11203df7c7d1efce
bff0: 62 36 65 30 36 65 39 31 66 31 65 35 37 66 33 64  b6e06e91f1e57f3d
c000: 38 65 36 63 31 30 35 64 66 64 66 38 32 36 32 64  8e6c105dfdf8262d
c010: 39 38 34 38 31 36 66 65 37 61 64 38 66 38 64 63  984816fe7ad8f8dc
c020: 39 35 61 62 35 39 36 66 66 66 34 38 33 30 31 66  95ab596fff48301f
c030: 38 64 30 33 31 33 37 62 61 33 37 64 61 62 64 63  8d03137ba37dabdc
c040: 34 61 36 65 36 36 34 35 38 33 61 32 36 62 38 65  4a6e664583a26b8e
c050: 64 63 34 32 64 33 63 32 34 30 35 35 31 36 63 35  dc42d3c2405516c5
c060: 31 33 38 36 63 33 33 61 37 66 32 38 37 35 61 33  1386c33a7f2875a3
c070: 30 38 37 37 30 32 63 61 36 37 32 31 66 35 36 31  087702ca6721f561
c080: 39 35 30 35 33 66 65 35 32 36 33 61 32 39 63 38  95053fe5263a29c8
c090: 64 38 35 33 38 64 63 65 36 63 65 31 34 36 62 38  d8538dce6ce146b8
c0a0: 62 34 33 61 65 35 32 30 65 65 37 39 61 35 61 34  b43ae520ee79a5a4
c0b0: 35 30 63 36 61 32 5d 7d 20 5c 0a 09 2d 62 6f 64  50c6a2]} \..-bod
c0c0: 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d  y {tls::digest -
c0d0: 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34 20  digest SHA3-224 
c0e0: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09  -data $data} \..
c0f0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
c100: 73 75 6c 74 20 61 32 37 34 33 64 33 34 31 30 32  sult a2743d34102
c110: 33 66 66 35 66 37 37 35 64 39 30 31 38 35 64 33  3ff5f775d90185d3
c120: 31 33 39 61 37 37 35 36 62 30 61 36 35 63 31 39  139a7756b0a65c19
c130: 65 65 38 37 36 65 62 65 62 39 32 61 65 0a 0a 74  ee876ebeb92ae..t
c140: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73  cltest::test Has
c150: 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31 33 30  h_SHA3-224-2.130
c160: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
c170: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
c180: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
c190: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
c1a0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
c1b0: 68 65 78 20 61 38 65 66 34 31 30 37 66 34 31 65  hex a8ef4107f41e
c1c0: 62 62 63 35 37 39 39 61 37 31 36 62 36 62 35 30  bbc5799a716b6b50
c1d0: 65 38 37 63 31 39 65 39 37 36 30 34 32 61 66 63  e87c19e976042afc
c1e0: 61 37 37 30 32 36 38 32 65 30 61 32 33 39 38 62  a7702682e0a2398b
c1f0: 34 32 34 35 33 34 33 30 64 31 35 65 64 35 63 39  42453430d15ed5c9
c200: 64 36 32 34 34 38 36 30 38 32 31 32 65 64 36 35  d62448608212ed65
c210: 64 33 33 61 35 63 61 32 62 63 64 63 61 37 37 32  d33a5ca2bcdca772
c220: 38 30 33 37 64 66 32 65 35 66 39 66 64 39 65 39  8037df2e5f9fd9e9
c230: 37 34 64 30 33 31 35 64 64 65 38 32 39 30 32 34  74d0315dde829024
c240: 31 65 33 65 32 62 32 63 63 30 36 66 38 63 36 35  1e3e2b2cc06f8c65
c250: 33 65 62 63 39 35 62 63 32 31 39 35 63 32 34 64  3ebc95bc2195c24d
c260: 36 39 30 63 61 65 64 34 32 66 65 37 64 39 36 35  690caed42fe7d965
c270: 38 39 66 33 61 38 35 65 61 65 39 62 61 64 39 39  89f3a85eae9bad99
c280: 35 61 62 38 32 39 65 36 37 34 61 62 63 66 62 38  5ab829e674abcfb8
c290: 65 66 61 61 63 62 31 65 65 65 35 37 30 33 66 35  efaacb1eee5703f5
c2a0: 32 62 39 37 39 64 35 64 39 39 61 31 63 31 36 39  2b979d5d99a1c169
c2b0: 34 38 35 35 61 30 5d 7d 20 5c 0a 09 2d 62 6f 64  4855a0]} \..-bod
c2c0: 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d  y {tls::digest -
c2d0: 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34 20  digest SHA3-224 
c2e0: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09  -data $data} \..
c2f0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
c300: 73 75 6c 74 20 62 34 31 31 61 32 38 66 66 34 36  sult b411a28ff46
c310: 35 31 33 64 30 63 33 64 36 33 63 66 37 38 61 39  513d0c3d63cf78a9
c320: 62 36 33 35 33 34 36 36 63 62 61 33 62 39 32 36  b6353466cba3b926
c330: 61 38 64 38 39 35 65 65 31 34 66 64 64 0a 0a 74  a8d895ee14fdd..t
c340: 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73  cltest::test Has
c350: 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31 33 31  h_SHA3-224-2.131
c360: 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d   {SHA3_224ShortM
c370: 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69  sg} \..-constrai
c380: 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09  nts SHA3_224 \..
c390: 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61 74 61  -setup {set data
c3a0: 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20   [binary decode 
c3b0: 68 65 78 20 66 36 34 39 64 38 30 31 62 34 30 34  hex f649d801b404
c3c0: 30 62 37 62 35 31 35 32 66 35 38 61 30 31 65 37  0b7b5152f58a01e7
c3d0: 38 35 32 66 35 36 35 65 66 63 37 37 62 35 64 61  852f565efc77b5da
c3e0: 66 65 34 36 30 37 65 65 65 39 35 33 62 30 62 61  fe4607eee953b0ba
c3f0: 36 37 37 34 63 35 35 37 33 66 31 63 37 39 37 36  6774c5573f1c7976
c400: 37 31 32 31 64 39 34 33 38 31 63 33 62 61 39 30  7121d94381c3ba90
c410: 31 33 65 62 65 66 32 66 62 38 62 30 62 66 39 66  13ebef2fb8b0bf9f
c420: 30 38 31 66 39 36 65 63 66 31 33 63 66 61 64 30  081f96ecf13cfad0
c430: 34 65 34 34 63 31 31 65 62 62 33 35 38 31 36 30  4e44c11ebb358160
c440: 61 38 39 30 34 39 62 66 61 64 35 65 38 65 32 34  a89049bfad5e8e24
c450: 31 64 37 31 36 38 39 64 64 65 65 63 66 66 30 32  1d71689ddeecff02
c460: 37 38 30 36 33 66 64 38 36 62 30 61 64 34 37 35  78063fd86b0ad475
c470: 63 36 61 32 35 32 36 35 66 35 35 36 62 33 30 64  c6a25265f556b30d
c480: 64 62 35 30 30 37 38 65 32 31 36 32 36 37 65 64  db50078e216267ed
c490: 63 64 34 61 32 62 37 30 31 36 33 34 35 64 34 62  cd4a2b7016345d4b
c4a0: 37 36 38 30 36 64 37 62 30 32 63 36 32 35 66 33  76806d7b02c625f3
c4b0: 66 37 31 37 65 30 66 36 5d 7d 20 5c 0a 09 2d 62  f717e0f6]} \..-b
c4c0: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
c4d0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
c4e0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
c4f0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
c500: 72 65 73 75 6c 74 20 62 39 34 64 65 62 61 64 63  result b94debadc
c510: 38 33 33 64 35 37 30 36 63 64 34 37 33 36 62 62  833d5706cd4736bb
c520: 31 64 63 37 35 30 33 39 38 32 37 38 33 32 61 65  1dc75039827832ae
c530: 34 30 38 38 35 39 65 32 65 36 61 36 39 34 31 0a  408859e2e6a6941.
c540: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
c550: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31  ash_SHA3-224-2.1
c560: 33 32 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72  32 {SHA3_224Shor
c570: 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  tMsg} \..-constr
c580: 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c  aints SHA3_224 \
c590: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61  ..-setup {set da
c5a0: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
c5b0: 65 20 68 65 78 20 65 62 37 31 62 34 35 61 34 39  e hex eb71b45a49
c5c0: 34 65 37 36 34 36 32 65 64 66 34 31 61 39 66 64  4e76462edf41a9fd
c5d0: 63 62 62 33 66 34 36 66 62 38 36 33 62 39 65 32  cbb3f46fb863b9e2
c5e0: 35 39 64 30 63 38 66 34 61 37 39 38 39 38 35 31  59d0c8f4a7989851
c5f0: 36 65 65 62 65 38 63 39 30 63 33 65 61 35 61 36  6eebe8c90c3ea5a6
c600: 37 35 34 34 30 66 33 63 37 62 31 61 31 38 63 31  75440f3c7b1a18c1
c610: 34 64 63 32 30 63 35 66 33 64 64 32 37 37 38 38  4dc20c5f3dd27788
c620: 63 36 36 64 34 34 38 61 63 64 37 33 32 32 36 33  c66d448acd732263
c630: 32 37 66 35 32 63 64 36 35 63 65 63 63 38 62 65  27f52cd65cecc8be
c640: 61 61 32 61 63 66 61 33 34 64 39 30 65 66 38 62  aa2acfa34d90ef8b
c650: 66 65 38 32 34 65 31 32 62 61 39 38 37 30 62 64  fe824e12ba9870bd
c660: 63 34 39 36 35 62 38 63 65 64 39 66 66 39 63 65  c4965b8ced9ff9ce
c670: 31 33 61 35 62 64 33 39 65 38 32 34 38 39 33 61  13a5bd39e824893a
c680: 66 34 31 30 64 30 38 61 64 65 30 63 66 38 30 32  f410d08ade0cf802
c690: 65 37 64 63 30 32 62 30 62 37 31 64 36 63 32 61  e7dc02b0b71d6c2a
c6a0: 35 63 33 33 35 36 32 32 39 30 38 34 65 35 33 62  5c3356229084e53b
c6b0: 33 61 65 34 65 35 31 62 33 38 34 66 5d 7d 20 5c  3ae4e51b384f]} \
c6c0: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69  ..-body {tls::di
c6d0: 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41  gest -digest SHA
c6e0: 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74  3-224 -data $dat
c6f0: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
c700: 63 74 20 2d 72 65 73 75 6c 74 20 66 62 62 65 63  ct -result fbbec
c710: 30 35 65 65 31 66 62 35 66 35 63 64 31 31 30 36  05ee1fb5f5cd1106
c720: 65 64 37 33 38 34 38 35 30 30 35 39 63 64 63 64  ed7384850059cdcd
c730: 61 34 37 34 62 61 37 63 65 63 30 34 30 37 61 32  a474ba7cec0407a2
c740: 37 32 62 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  72b..tcltest::te
c750: 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34  st Hash_SHA3-224
c760: 2d 32 2e 31 33 33 20 7b 53 48 41 33 5f 32 32 34  -2.133 {SHA3_224
c770: 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f  ShortMsg} \..-co
c780: 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32  nstraints SHA3_2
c790: 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  24 \..-setup {se
c7a0: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  t data [binary d
c7b0: 65 63 6f 64 65 20 68 65 78 20 34 65 63 61 30 63  ecode hex 4eca0c
c7c0: 35 31 64 33 30 38 32 39 62 39 61 31 64 32 37 31  51d30829b9a1d271
c7d0: 32 64 61 31 66 61 63 33 31 66 35 32 39 34 32 64  2da1fac31f52942d
c7e0: 37 37 63 39 66 32 30 63 32 62 66 36 64 33 37 35  77c9f20c2bf6d375
c7f0: 31 30 32 38 64 37 64 34 66 30 64 33 33 36 64 33  1028d7d4f0d336d3
c800: 64 63 39 32 62 32 37 65 63 33 36 38 63 61 61 34  dc92b27ec368caa4
c810: 34 34 34 62 33 31 38 30 63 31 65 33 37 65 39 38  444b3180c1e37e98
c820: 62 35 38 66 32 35 65 36 34 37 61 39 61 36 33 36  b58f25e647a9a636
c830: 31 66 30 62 30 34 63 66 37 38 64 31 37 39 35 35  1f0b04cf78d17955
c840: 37 36 36 31 36 38 65 65 62 61 61 39 39 33 61 34  766168eebaa993a4
c850: 33 35 61 38 38 65 30 62 33 39 33 30 37 34 32 33  35a88e0b39307423
c860: 64 36 65 61 64 38 37 66 36 33 39 61 66 65 61 37  d6ead87f639afea7
c870: 35 62 61 34 34 62 62 63 36 62 64 30 66 62 35 61  5ba44bbc6bd0fb5a
c880: 63 38 34 61 31 32 63 32 63 36 65 64 39 35 33 39  c84a12c2c6ed9539
c890: 61 37 63 30 66 39 61 62 62 30 63 31 64 63 39 34  a7c0f9abb0c1dc94
c8a0: 38 33 65 32 66 33 32 31 61 38 35 32 34 34 39 32  83e2f321a8524492
c8b0: 36 64 66 64 39 35 65 32 66 30 35 36 32 34 61 61  6dfd95e2f05624aa
c8c0: 37 61 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74  7a]} \..-body {t
c8d0: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65  ls::digest -dige
c8e0: 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74  st SHA3-224 -dat
c8f0: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74  a $data} \..-mat
c900: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
c910: 20 66 65 33 31 33 65 62 37 34 66 39 35 35 63 30   fe313eb74f955c0
c920: 63 62 62 31 63 34 34 36 64 64 34 66 66 38 35 33  cbb1c446dd4ff853
c930: 66 33 32 62 33 32 33 32 64 39 33 66 61 62 61 37  f32b3232d93faba7
c940: 64 62 36 64 31 66 61 62 38 0a 0a 74 63 6c 74 65  db6d1fab8..tclte
c950: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48  st::test Hash_SH
c960: 41 33 2d 32 32 34 2d 32 2e 31 33 34 20 7b 53 48  A3-224-2.134 {SH
c970: 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20  A3_224ShortMsg} 
c980: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
c990: 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74  SHA3_224 \..-set
c9a0: 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69  up {set data [bi
c9b0: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
c9c0: 39 37 37 38 34 64 31 34 64 62 36 32 61 37 66 39  97784d14db62a7f9
c9d0: 38 66 35 61 63 33 64 66 37 34 32 65 30 31 33 34  8f5ac3df742e0134
c9e0: 38 39 65 63 30 62 38 37 37 37 62 30 35 65 66 38  89ec0b8777b05ef8
c9f0: 32 62 62 61 30 36 65 64 63 35 63 33 61 38 30 37  2bba06edc5c3a807
ca00: 62 31 39 31 63 36 35 35 31 33 63 61 33 66 63 37  b191c65513ca3fc7
ca10: 36 39 30 36 31 35 65 35 36 63 32 37 37 33 63 30  690615e56c2773c0
ca20: 33 36 65 64 65 66 32 39 61 61 63 35 30 63 32 32  36edef29aac50c22
ca30: 31 31 65 32 30 33 39 32 30 31 38 66 63 33 33 64  11e20392018fc33d
ca40: 38 33 63 34 33 36 66 32 37 34 66 37 63 36 30 36  83c436f274f7c606
ca50: 32 63 33 34 32 30 30 32 35 65 37 30 33 37 39 39  2c3420025e703799
ca60: 33 66 31 62 38 63 64 64 65 62 66 34 61 65 62 32  3f1b8cddebf4aeb2
ca70: 30 34 32 31 66 63 38 32 39 63 37 66 62 32 33 32  0421fc829c7fb232
ca80: 35 35 33 37 32 34 35 35 63 36 39 32 34 34 61 30  55372455c69244a0
ca90: 32 31 30 65 36 61 39 65 31 33 62 31 35 35 61 35  210e6a9e13b155a5
caa0: 65 63 39 64 36 64 30 39 30 30 65 35 34 61 38 66  ec9d6d0900e54a8f
cab0: 34 64 39 66 37 61 32 35 35 65 33 61 37 66 64 30  4d9f7a255e3a7fd0
cac0: 36 66 31 32 31 38 65 35 64 31 5d 7d 20 5c 0a 09  6f1218e5d1]} \..
cad0: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65  -body {tls::dige
cae0: 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d  st -digest SHA3-
caf0: 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d  224 -data $data}
cb00: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
cb10: 20 2d 72 65 73 75 6c 74 20 35 35 30 34 66 33 39   -result 5504f39
cb20: 31 33 31 37 37 33 35 35 30 62 36 66 34 35 39 66  131773550b6f459f
cb30: 33 33 61 35 62 35 37 61 32 63 65 36 30 63 65 38  33a5b57a2ce60ce8
cb40: 62 62 37 38 63 35 37 34 66 65 66 38 33 64 63 66  bb78c574fef83dcf
cb50: 37 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  7..tcltest::test
cb60: 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32   Hash_SHA3-224-2
cb70: 2e 31 33 35 20 7b 53 48 41 33 5f 32 32 34 53 68  .135 {SHA3_224Sh
cb80: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
cb90: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
cba0: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
cbb0: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
cbc0: 6f 64 65 20 68 65 78 20 31 65 65 39 30 34 37 33  ode hex 1ee90473
cbd0: 35 31 65 32 61 31 33 65 34 61 32 64 35 61 38 32  51e2a13e4a2d5a82
cbe0: 36 65 33 30 34 66 65 66 38 32 32 34 31 66 62 61  6e304fef82241fba
cbf0: 62 35 31 30 30 38 33 35 65 31 66 38 35 30 61 32  b5100835e1f850a2
cc00: 30 65 35 31 65 33 34 39 33 38 62 39 33 64 63 38  0e51e34938b93dc8
cc10: 35 32 65 35 38 61 61 62 38 61 64 62 30 63 33 63  52e58aab8adb0c3c
cc20: 63 66 36 31 62 65 39 63 39 30 62 35 33 37 31 33  cf61be9c90b53713
cc30: 63 37 37 65 64 30 61 35 33 37 30 33 30 39 65 36  c77ed0a5370309e6
cc40: 66 31 39 62 32 39 30 66 31 64 36 34 32 35 35 30  f19b290f1d642550
cc50: 66 37 33 38 63 33 36 38 31 38 64 64 66 66 37 34  f738c36818ddff74
cc60: 66 37 37 63 61 65 30 34 61 66 35 35 36 31 37 34  f77cae04af556174
cc70: 30 33 62 30 38 63 37 61 39 66 31 37 65 38 66 62  03b08c7a9f17e8fb
cc80: 61 30 63 32 31 35 32 33 35 37 35 33 38 34 62 34  a0c21523575384b4
cc90: 34 61 63 34 39 34 39 65 37 63 39 64 66 62 64 31  4ac4949e7c9dfbd1
cca0: 65 66 36 61 36 38 34 66 36 36 36 63 36 37 38 35  ef6a684f666c6785
ccb0: 36 66 38 66 38 34 64 62 61 31 39 63 62 33 38 61  6f8f84dba19cb38a
ccc0: 32 33 62 30 65 66 61 64 36 65 65 64 32 32 39 63  23b0efad6eed229c
ccd0: 35 33 36 66 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20  536f]} \..-body 
cce0: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69  {tls::digest -di
ccf0: 67 65 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64  gest SHA3-224 -d
cd00: 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d  ata $data} \..-m
cd10: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
cd20: 6c 74 20 62 38 66 32 35 33 35 31 32 64 61 62 66  lt b8f253512dabf
cd30: 39 64 38 39 64 32 30 38 30 38 33 30 66 32 33 64  9d89d2080830f23d
cd40: 61 35 38 39 33 62 30 66 38 37 65 64 63 30 62 64  a5893b0f87edc0bd
cd50: 36 32 34 65 61 37 36 37 66 31 34 0a 0a 74 63 6c  624ea767f14..tcl
cd60: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
cd70: 53 48 41 33 2d 32 32 34 2d 32 2e 31 33 36 20 7b  SHA3-224-2.136 {
cd80: 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67  SHA3_224ShortMsg
cd90: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
cda0: 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73  s SHA3_224 \..-s
cdb0: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b  etup {set data [
cdc0: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
cdd0: 78 20 31 66 33 36 33 64 32 66 37 61 61 38 39 65  x 1f363d2f7aa89e
cde0: 32 62 36 63 35 65 31 37 32 66 35 33 30 64 31 61  2b6c5e172f530d1a
cdf0: 33 35 35 33 31 64 30 30 38 33 61 35 61 63 66 63  35531d0083a5acfc
ce00: 64 32 33 32 64 36 34 64 62 30 36 31 33 34 62 38  d232d64db06134b8
ce10: 32 33 32 64 61 32 33 36 38 66 37 61 34 36 65 61  232da2368f7a46ea
ce20: 64 39 61 39 63 65 35 35 63 64 36 61 66 38 63 64  d9a9ce55cd6af8cd
ce30: 62 64 64 31 35 38 32 62 36 62 61 64 35 36 63 35  bdd1582b6bad56c5
ce40: 32 61 31 35 37 36 39 63 33 66 34 33 64 63 64 36  2a15769c3f43dcd6
ce50: 38 64 61 36 30 66 36 65 37 32 33 32 66 64 32 61  8da60f6e7232fd2a
ce60: 65 63 66 62 33 66 63 64 30 30 30 32 39 66 38 65  ecfb3fcd00029f8e
ce70: 35 63 34 65 64 37 63 61 33 62 33 66 39 63 66 36  5c4ed7ca3b3f9cf6
ce80: 38 39 32 30 64 62 64 37 34 37 66 62 34 33 66 35  8920dbd747fb43f5
ce90: 33 32 62 31 30 33 34 64 39 66 34 39 64 35 34 36  32b1034d9f49d546
cea0: 61 61 38 39 33 62 65 36 38 66 63 33 30 38 34 36  aa893be68fc30846
ceb0: 35 38 66 32 32 33 34 33 62 39 30 36 38 38 37 37  58f22343b9068877
cec0: 33 38 37 62 38 66 36 38 39 30 33 30 37 31 66 65  387b8f68903071fe
ced0: 35 38 37 37 30 38 33 62 65 30 36 38 64 36 32 36  5877083be068d626
cee0: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
cef0: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
cf00: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
cf10: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
cf20: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 65   exact -result e
cf30: 35 39 61 31 39 36 38 36 64 66 33 36 62 66 35 66  59a19686df36bf5f
cf40: 65 37 39 38 61 39 35 36 35 37 32 32 62 38 65 30  e798a9565722b8e0
cf50: 62 64 64 39 66 38 65 65 64 62 62 62 34 61 33 34  bdd9f8eedbbb4a34
cf60: 61 39 63 61 37 61 62 0a 0a 74 63 6c 74 65 73 74  a9ca7ab..tcltest
cf70: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
cf80: 2d 32 32 34 2d 32 2e 31 33 37 20 7b 53 48 41 33  -224-2.137 {SHA3
cf90: 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a  _224ShortMsg} \.
cfa0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48  .-constraints SH
cfb0: 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70  A3_224 \..-setup
cfc0: 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61   {set data [bina
cfd0: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 65 63  ry decode hex ec
cfe0: 66 35 64 39 65 32 39 63 31 63 30 34 63 31 31 61  f5d9e29c1c04c11a
cff0: 39 35 30 33 63 63 32 32 33 64 30 63 65 65 34 38  9503cc223d0cee48
d000: 36 36 66 61 32 36 64 66 32 62 34 66 37 63 31 61  66fa26df2b4f7c1a
d010: 30 31 37 39 33 39 37 31 38 66 35 34 35 37 34 36  017939718f545746
d020: 63 30 66 31 33 37 63 39 31 36 39 36 39 32 31 39  c0f137c916969219
d030: 34 31 30 35 62 32 61 63 66 30 30 31 65 32 66 30  4105b2acf001e2f0
d040: 65 37 30 66 32 33 33 32 35 31 37 61 32 30 63 30  e70f2332517a20c0
d050: 35 38 39 39 36 34 34 61 66 34 35 34 63 62 38 65  5899644af454cb8e
d060: 30 30 65 35 33 36 33 35 39 33 64 63 38 33 66 37  00e5363593dc83f7
d070: 38 64 36 36 62 64 30 36 37 30 63 65 38 66 61 61  8d66bd0670ce8faa
d080: 37 32 34 34 66 66 32 38 64 30 64 65 35 39 65 39  7244ff28d0de59e9
d090: 36 34 64 63 36 38 64 38 37 61 33 30 65 63 30 63  64dc68d87a30ec0c
d0a0: 65 30 33 65 34 39 61 37 33 63 65 30 37 64 66 65  e03e49a73ce07dfe
d0b0: 61 32 61 64 35 34 66 61 36 36 37 62 64 66 62 65  a2ad54fa667bdfbe
d0c0: 32 66 32 32 32 32 38 39 34 64 38 33 30 64 64 65  2f2222894d830dde
d0d0: 34 64 63 39 61 65 65 33 63 61 65 66 61 34 30 38  4dc9aee3caefa408
d0e0: 38 36 38 33 64 37 65 38 62 39 61 39 36 36 5d 7d  8683d7e8b9a966]}
d0f0: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a   \..-body {tls::
d100: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53  digest -digest S
d110: 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64  HA3-224 -data $d
d120: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  ata} \..-match e
d130: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 61 38 38  xact -result a88
d140: 36 65 62 39 34 66 31 35 64 66 32 30 38 62 65 31  6eb94f15df208be1
d150: 32 32 39 31 32 64 34 65 64 66 30 32 35 36 31 34  22912d4edf025614
d160: 38 32 32 37 38 61 39 66 38 34 37 64 64 63 39 31  82278a9f847ddc91
d170: 63 39 62 64 32 0a 0a 74 63 6c 74 65 73 74 3a 3a  c9bd2..tcltest::
d180: 74 65 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32  test Hash_SHA3-2
d190: 32 34 2d 32 2e 31 33 38 20 7b 53 48 41 33 5f 32  24-2.138 {SHA3_2
d1a0: 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d  24ShortMsg} \..-
d1b0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33  constraints SHA3
d1c0: 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b  _224 \..-setup {
d1d0: 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79  set data [binary
d1e0: 20 64 65 63 6f 64 65 20 68 65 78 20 39 66 34 34   decode hex 9f44
d1f0: 33 35 37 36 36 34 62 35 65 33 61 39 35 38 37 38  357664b5e3a95878
d200: 30 36 34 31 63 63 61 35 32 30 34 39 66 33 62 34  0641cca52049f3b4
d210: 39 66 30 37 34 38 34 62 35 66 37 36 32 61 35 35  9f07484b5f762a55
d220: 37 31 66 37 63 39 35 34 31 62 34 33 34 36 66 38  71f7c9541b4346f8
d230: 31 66 61 34 31 36 66 30 34 30 36 35 61 38 30 30  1fa416f04065a800
d240: 30 33 38 36 34 37 35 34 62 33 62 35 34 31 31 34  03864754b3b54114
d250: 61 37 37 61 34 39 33 38 63 38 62 32 31 61 39 65  a77a4938c8b21a9e
d260: 34 64 33 65 35 64 35 39 63 39 66 63 63 64 34 64  4d3e5d59c9fccd4d
d270: 36 38 66 36 39 39 66 39 37 35 64 61 30 39 39 33  68f699f975da0993
d280: 32 30 61 62 36 35 35 61 37 66 62 35 31 33 32 38  20ab655a7fb51328
d290: 64 32 63 36 66 66 34 36 30 62 39 62 34 30 38 35  d2c6ff460b9b4085
d2a0: 38 65 39 39 66 38 38 61 33 35 62 65 37 62 36 61  8e99f88a35be7b6a
d2b0: 39 37 64 36 62 34 37 37 38 61 66 32 63 35 35 39  97d6b4778af2c559
d2c0: 65 36 31 36 65 65 36 30 38 63 33 32 62 30 31 38  e616ee608c32b018
d2d0: 61 37 35 33 33 32 31 65 33 32 31 62 65 33 33 33  a753321e321be333
d2e0: 62 62 36 66 36 31 38 66 36 36 36 66 39 61 37 37  bb6f618f666f9a77
d2f0: 33 34 61 62 33 31 31 32 38 35 39 33 32 33 5d 7d  34ab3112859323]}
d300: 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a   \..-body {tls::
d310: 64 69 67 65 73 74 20 2d 64 69 67 65 73 74 20 53  digest -digest S
d320: 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64  HA3-224 -data $d
d330: 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65  ata} \..-match e
d340: 78 61 63 74 20 2d 72 65 73 75 6c 74 20 38 38 33  xact -result 883
d350: 39 66 37 35 35 65 65 65 38 34 65 31 35 63 35 38  9f755eee84e15c58
d360: 36 62 35 32 65 32 39 61 34 31 64 64 63 36 34 30  6b52e29a41ddc640
d370: 61 63 34 33 32 63 66 33 31 33 37 30 36 38 30 39  ac432cf313706809
d380: 38 37 61 34 34 0a 0a 74 63 6c 74 65 73 74 3a 3a  87a44..tcltest::
d390: 74 65 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32  test Hash_SHA3-2
d3a0: 32 34 2d 32 2e 31 33 39 20 7b 53 48 41 33 5f 32  24-2.139 {SHA3_2
d3b0: 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d  24ShortMsg} \..-
d3c0: 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33  constraints SHA3
d3d0: 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b  _224 \..-setup {
d3e0: 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79  set data [binary
d3f0: 20 64 65 63 6f 64 65 20 68 65 78 20 63 31 61 61   decode hex c1aa
d400: 31 32 36 36 66 32 32 33 63 31 34 38 62 66 61 33  1266f223c148bfa3
d410: 64 30 61 62 32 39 66 32 37 38 33 33 34 64 38 66  d0ab29f278334d8f
d420: 63 62 66 62 66 30 66 34 65 62 65 66 35 63 31 62  cbfbf0f4ebef5c1b
d430: 37 61 37 36 36 62 34 31 35 31 35 35 65 31 65 61  7a766b415155e1ea
d440: 37 35 64 30 66 65 32 35 34 36 31 31 35 34 31 31  75d0fe2546115411
d450: 66 61 63 65 64 37 61 30 34 61 32 37 33 33 39 62  faced7a04a27339b
d460: 36 62 63 64 36 32 65 37 34 30 36 39 37 64 30 36  6bcd62e740697d06
d470: 63 65 33 63 64 32 65 30 66 30 30 32 33 38 63 34  ce3cd2e0f00238c4
d480: 34 63 31 64 39 66 61 61 38 35 65 66 65 62 62 62  4c1d9faa85efebbb
d490: 62 33 38 38 30 33 31 33 31 30 38 31 32 34 63 35  b3880313108124c5
d4a0: 66 33 32 37 37 63 31 66 30 33 64 64 66 34 33 30  f3277c1f03ddf430
d4b0: 61 34 62 62 34 64 38 38 62 36 37 62 36 65 33 66  a4bb4d88b67b6e3f
d4c0: 37 66 39 36 66 63 33 39 65 35 61 61 32 63 61 37  7f96fc39e5aa2ca7
d4d0: 65 31 31 66 64 35 64 31 33 30 30 61 63 61 31 34  e11fd5d1300aca14
d4e0: 34 63 35 31 36 36 32 36 39 61 31 31 36 38 61 32  4c5166269a1168a2
d4f0: 65 35 33 63 30 31 63 30 30 62 38 37 32 63 36 33  e53c01c00b872c63
d500: 66 36 38 33 33 65 35 61 63 65 30 39 62 65 64 66  f6833e5ace09bedf
d510: 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74 6c 73  ]} \..-body {tls
d520: 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65 73 74  ::digest -digest
d530: 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74 61 20   SHA3-224 -data 
d540: 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74 63 68  $data} \..-match
d550: 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74 20 34   exact -result 4
d560: 33 39 65 33 63 37 61 30 64 36 35 35 61 33 30 61  39e3c7a0d655a30a
d570: 39 37 34 39 61 66 64 65 66 62 37 65 30 34 38 38  9749afdefb7e0488
d580: 31 34 33 33 35 38 34 39 64 66 37 36 64 35 32 36  14335849df76d526
d590: 63 32 38 37 37 32 37 0a 0a 74 63 6c 74 65 73 74  c287727..tcltest
d5a0: 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48 41 33  ::test Hash_SHA3
d5b0: 2d 32 32 34 2d 32 2e 31 34 30 20 7b 53 48 41 33  -224-2.140 {SHA3
d5c0: 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20 5c 0a  _224ShortMsg} \.
d5d0: 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20 53 48  .-constraints SH
d5e0: 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74 75 70  A3_224 \..-setup
d5f0: 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69 6e 61   {set data [bina
d600: 72 79 20 64 65 63 6f 64 65 20 68 65 78 20 30 61  ry decode hex 0a
d610: 33 36 37 64 33 37 38 39 38 32 37 63 63 64 34 62  367d3789827ccd4b
d620: 65 66 35 66 65 38 65 62 37 38 63 32 30 35 30 33  ef5fe8eb78c20503
d630: 32 34 31 66 30 37 66 62 38 63 34 31 64 38 31 65  241f07fb8c41d81e
d640: 39 37 66 62 35 33 66 33 38 39 31 39 36 32 63 61  97fb53f3891962ca
d650: 33 63 39 37 36 33 39 35 61 63 31 31 64 31 66 39  3c976395ac11d1f9
d660: 62 61 37 62 32 30 61 35 32 39 31 32 65 38 65 33  ba7b20a52912e8e3
d670: 65 64 39 32 34 36 36 63 61 35 61 61 38 30 38 31  ed92466ca5aa8081
d680: 36 36 61 64 65 37 33 37 62 61 38 61 30 32 31 33  66ade737ba8a0213
d690: 65 38 66 65 65 38 64 36 37 36 30 38 65 65 39 61  e8fee8d67608ee9a
d6a0: 65 64 39 65 38 32 31 65 64 63 39 65 35 37 35 66  ed9e821edc9e575f
d6b0: 31 66 30 37 63 33 36 38 36 31 36 39 36 35 36 61  1f07c3686169656a
d6c0: 65 30 39 61 30 61 30 66 37 30 61 62 64 31 30 63  e09a0a0f70abd10c
d6d0: 63 33 31 61 38 65 66 36 65 37 34 39 36 64 35 36  c31a8ef6e7496d56
d6e0: 31 30 32 66 64 38 66 66 39 38 34 65 39 61 39 66  102fd8ff984e9a9f
d6f0: 34 34 65 35 34 34 39 35 63 39 36 36 63 66 30 32  44e54495c966cf02
d700: 38 66 32 61 38 34 32 33 62 34 36 34 31 39 64 65  8f2a8423b46419de
d710: 35 34 35 34 31 64 39 61 30 38 62 64 39 36 35 34  54541d9a08bd9654
d720: 61 63 39 38 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20  ac98]} \..-body 
d730: 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69  {tls::digest -di
d740: 67 65 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64  gest SHA3-224 -d
d750: 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d  ata $data} \..-m
d760: 61 74 63 68 20 65 78 61 63 74 20 2d 72 65 73 75  atch exact -resu
d770: 6c 74 20 34 30 33 31 38 30 33 36 61 35 39 35 36  lt 40318036a5956
d780: 33 30 65 34 31 33 35 66 31 30 37 30 33 62 65 31  30e4135f10703be1
d790: 64 37 35 39 61 36 63 37 65 35 31 34 36 65 30 66  d759a6c7e5146e0f
d7a0: 63 38 32 61 62 65 62 61 31 38 34 0a 0a 74 63 6c  c82abeba184..tcl
d7b0: 74 65 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f  test::test Hash_
d7c0: 53 48 41 33 2d 32 32 34 2d 32 2e 31 34 31 20 7b  SHA3-224-2.141 {
d7d0: 53 48 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67  SHA3_224ShortMsg
d7e0: 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74  } \..-constraint
d7f0: 73 20 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73  s SHA3_224 \..-s
d800: 65 74 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b  etup {set data [
d810: 62 69 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65  binary decode he
d820: 78 20 38 61 30 35 62 30 30 61 65 32 64 35 66 36  x 8a05b00ae2d5f6
d830: 35 32 66 30 32 66 39 38 61 31 62 30 33 35 30 30  52f02f98a1b03500
d840: 33 66 38 66 61 37 62 61 31 62 31 37 66 63 33 37  3f8fa7ba1b17fc37
d850: 37 38 63 64 62 31 63 61 65 33 35 61 65 31 66 37  78cdb1cae35ae1f7
d860: 36 38 65 61 31 36 65 64 30 35 64 32 35 66 35 31  68ea16ed05d25f51
d870: 35 66 37 35 61 32 33 64 62 34 36 38 33 34 38 39  5f75a23db4683489
d880: 31 31 64 34 61 37 34 39 63 35 31 63 65 33 39 36  11d4a749c51ce396
d890: 31 35 63 30 37 38 39 32 33 31 38 32 33 33 61 36  15c07892318233a6
d8a0: 36 37 63 37 66 30 30 65 39 37 33 66 61 65 39 38  67c7f00e973fae98
d8b0: 65 37 63 38 65 39 61 38 62 37 39 30 32 34 38 30  e7c8e9a8b7902480
d8c0: 64 38 37 61 63 35 62 65 66 38 63 34 32 35 32 36  d87ac5bef8c42526
d8d0: 36 31 65 36 65 38 61 32 65 34 62 64 38 61 38 37  61e6e8a2e4bd8a87
d8e0: 30 66 65 38 33 62 31 61 61 37 37 33 65 64 35 33  0fe83b1aa773ed53
d8f0: 35 32 62 32 61 62 65 31 39 33 37 30 32 63 36 64  52b2abe193702c6d
d900: 66 62 34 61 61 38 32 33 39 65 35 35 65 61 36 66  fb4aa8239e55ea6f
d910: 63 35 30 37 61 37 30 34 65 32 35 34 30 65 32 33  c507a704e2540e23
d920: 63 39 31 37 61 30 31 61 31 63 62 34 34 32 30 62  c917a01a1cb4420b
d930: 30 37 66 62 39 30 65 65 32 65 5d 7d 20 5c 0a 09  07fb90ee2e]} \..
d940: 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65  -body {tls::dige
d950: 73 74 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d  st -digest SHA3-
d960: 32 32 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d  224 -data $data}
d970: 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74   \..-match exact
d980: 20 2d 72 65 73 75 6c 74 20 39 61 32 36 66 30 35   -result 9a26f05
d990: 34 65 35 37 61 65 61 31 34 32 34 32 64 37 38 30  4e57aea14242d780
d9a0: 31 66 33 64 36 31 64 64 63 61 31 35 32 33 62 37  1f3d61ddca1523b7
d9b0: 33 38 66 63 32 36 66 65 63 66 61 35 64 39 61 36  38fc26fecfa5d9a6
d9c0: 61 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74  a..tcltest::test
d9d0: 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32   Hash_SHA3-224-2
d9e0: 2e 31 34 32 20 7b 53 48 41 33 5f 32 32 34 53 68  .142 {SHA3_224Sh
d9f0: 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73  ortMsg} \..-cons
da00: 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34  traints SHA3_224
da10: 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20   \..-setup {set 
da20: 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63  data [binary dec
da30: 6f 64 65 20 68 65 78 20 62 61 36 34 34 32 63 36  ode hex ba6442c6
da40: 64 32 31 33 39 32 30 31 64 66 65 66 33 32 63 31  d2139201dfef32c1
da50: 66 66 62 30 63 65 39 32 64 64 36 34 30 39 31 62  ffb0ce92dd64091b
da60: 64 35 30 37 63 32 35 30 35 39 35 33 39 35 65 39  d507c250595395e9
da70: 39 33 64 39 61 35 31 32 34 62 35 31 39 39 36 34  93d9a5124b519964
da80: 30 63 32 66 65 35 31 34 38 32 37 37 34 62 36 61  0c2fe51482774b6a
da90: 32 37 64 31 61 31 37 35 31 66 65 30 64 34 66 65  27d1a1751fe0d4fe
daa0: 35 66 64 30 32 64 62 61 31 35 32 65 64 33 63 33  5fd02dba152ed3c3
dab0: 34 34 66 64 39 32 34 39 61 66 30 36 64 61 38 35  44fd9249af06da85
dac0: 66 39 36 66 30 62 65 66 30 61 38 66 65 66 62 31  f96f0bef0a8fefb1
dad0: 62 35 30 31 38 38 35 62 39 37 66 37 30 64 64 38  b501885b97f70dd8
dae0: 34 32 64 31 32 66 61 31 39 62 65 66 61 30 33 30  42d12fa19befa030
daf0: 38 30 63 33 64 36 62 38 61 65 32 61 30 64 31 33  80c3d6b8ae2a0d13
db00: 65 32 66 63 38 62 66 63 33 66 65 31 32 37 37 65  e2fc8bfc3fe1277e
db10: 66 30 36 37 30 63 61 63 30 65 35 32 62 62 39 33  f0670cac0e52bb93
db20: 63 34 33 34 34 66 36 64 62 31 33 64 30 35 31 38  c4344f6db13d0518
db30: 38 64 35 33 66 62 63 36 31 30 36 35 33 38 66 35  8d53fbc6106538f5
db40: 30 66 66 64 65 64 61 32 65 39 31 35 66 61 62 39  0ffdeda2e915fab9
db50: 32 31 5d 7d 20 5c 0a 09 2d 62 6f 64 79 20 7b 74  21]} \..-body {t
db60: 6c 73 3a 3a 64 69 67 65 73 74 20 2d 64 69 67 65  ls::digest -dige
db70: 73 74 20 53 48 41 33 2d 32 32 34 20 2d 64 61 74  st SHA3-224 -dat
db80: 61 20 24 64 61 74 61 7d 20 5c 0a 09 2d 6d 61 74  a $data} \..-mat
db90: 63 68 20 65 78 61 63 74 20 2d 72 65 73 75 6c 74  ch exact -result
dba0: 20 35 38 34 37 30 64 61 35 38 34 37 36 62 63 62   58470da58476bcb
dbb0: 38 39 34 35 30 63 35 32 31 66 63 33 39 36 63 36  89450c521fc396c6
dbc0: 64 63 35 31 62 39 66 62 36 34 36 35 63 39 37 39  dc51b9fb6465c979
dbd0: 61 62 61 35 66 38 65 62 34 0a 0a 74 63 6c 74 65  aba5f8eb4..tclte
dbe0: 73 74 3a 3a 74 65 73 74 20 48 61 73 68 5f 53 48  st::test Hash_SH
dbf0: 41 33 2d 32 32 34 2d 32 2e 31 34 33 20 7b 53 48  A3-224-2.143 {SH
dc00: 41 33 5f 32 32 34 53 68 6f 72 74 4d 73 67 7d 20  A3_224ShortMsg} 
dc10: 5c 0a 09 2d 63 6f 6e 73 74 72 61 69 6e 74 73 20  \..-constraints 
dc20: 53 48 41 33 5f 32 32 34 20 5c 0a 09 2d 73 65 74  SHA3_224 \..-set
dc30: 75 70 20 7b 73 65 74 20 64 61 74 61 20 5b 62 69  up {set data [bi
dc40: 6e 61 72 79 20 64 65 63 6f 64 65 20 68 65 78 20  nary decode hex 
dc50: 39 36 66 64 62 37 36 66 38 33 62 66 31 32 62 33  96fdb76f83bf12b3
dc60: 66 34 66 33 32 32 62 66 36 31 33 66 63 33 38 62  f4f322bf613fc38b
dc70: 32 63 38 65 30 36 37 38 38 35 36 32 33 30 34 31  2c8e067885623041
dc80: 38 62 36 62 30 36 32 66 62 33 35 38 34 38 38 64  8b6b062fb358488d
dc90: 36 65 65 64 37 63 35 63 30 36 35 36 65 63 34 38  6eed7c5c0656ec48
dca0: 63 39 62 62 66 32 64 61 36 61 31 34 37 33 65 65  c9bbf2da6a1473ee
dcb0: 61 34 33 66 61 61 36 38 32 30 34 66 32 37 32 33  a43faa68204f2723
dcc0: 39 39 32 38 31 37 32 61 33 65 34 39 63 35 32 62  9928172a3e49c52b
dcd0: 35 38 65 38 36 31 32 38 32 63 34 34 30 31 37 30  58e861282c440170
dce0: 32 33 33 37 65 35 63 65 32 38 30 61 66 66 30 30  2337e5ce280aff00
dcf0: 35 32 38 65 62 32 36 61 63 33 36 38 64 62 30 63  528eb26ac368db0c
dd00: 64 30 61 64 30 65 62 32 36 32 61 66 32 32 36 61  d0ad0eb262af226a
dd10: 39 62 31 36 65 66 33 62 62 64 33 32 35 36 31 34  9b16ef3bbd325614
dd20: 34 38 38 66 38 32 30 33 36 33 63 61 36 65 61 37  488f820363ca6ea7
dd30: 37 64 61 34 61 37 65 38 33 34 35 35 35 34 65 35  7da4a7e8345554e5
dd40: 37 36 32 33 37 33 32 65 65 36 33 32 36 35 33 34  7623732ee6326534
dd50: 38 31 39 65 61 64 66 65 38 31 63 37 66 35 31 64  819eadfe81c7f51d
dd60: 38 31 65 63 35 31 65 31 65 33 66 63 5d 7d 20 5c  81ec51e1e3fc]} \
dd70: 0a 09 2d 62 6f 64 79 20 7b 74 6c 73 3a 3a 64 69  ..-body {tls::di
dd80: 67 65 73 74 20 2d 64 69 67 65 73 74 20 53 48 41  gest -digest SHA
dd90: 33 2d 32 32 34 20 2d 64 61 74 61 20 24 64 61 74  3-224 -data $dat
dda0: 61 7d 20 5c 0a 09 2d 6d 61 74 63 68 20 65 78 61  a} \..-match exa
ddb0: 63 74 20 2d 72 65 73 75 6c 74 20 62 65 39 32 64  ct -result be92d
ddc0: 34 61 36 39 34 36 64 65 30 65 39 33 64 35 62 62  4a6946de0e93d5bb
ddd0: 65 34 32 30 36 35 31 61 38 62 65 66 62 39 37 63  e420651a8befb97c
dde0: 62 64 62 35 64 36 33 62 32 32 61 61 65 63 66 34  bdb5d63b22aaecf4
ddf0: 35 33 64 0a 0a 74 63 6c 74 65 73 74 3a 3a 74 65  53d..tcltest::te
de00: 73 74 20 48 61 73 68 5f 53 48 41 33 2d 32 32 34  st Hash_SHA3-224
de10: 2d 32 2e 31 34 34 20 7b 53 48 41 33 5f 32 32 34  -2.144 {SHA3_224
de20: 53 68 6f 72 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f  ShortMsg} \..-co
de30: 6e 73 74 72 61 69 6e 74 73 20 53 48 41 33 5f 32  nstraints SHA3_2
de40: 32 34 20 5c 0a 09 2d 73 65 74 75 70 20 7b 73 65  24 \..-setup {se
de50: 74 20 64 61 74 61 20 5b 62 69 6e 61 72 79 20 64  t data [binary d
de60: 65 63 6f 64 65 20 68 65 78 20 30 65 65 66 39 34  ecode hex 0eef94
de70: 37 66 31 65 34 66 30 31 63 64 62 35 34 38 31 63  7f1e4f01cdb5481c
de80: 61 36 65 61 61 32 35 66 32 63 61 63 61 34 63 34  a6eaa25f2caca4c4
de90: 30 31 36 31 32 38 38 38 66 65 63 65 66 35 32 65  01612888fecef52e
dea0: 32 38 33 37 34 38 63 38 64 66 63 37 62 34 37 32  283748c8dfc7b472
deb0: 35 39 33 32 32 63 31 66 34 66 39 38 35 66 39 38  59322c1f4f985f98
dec0: 66 36 61 64 34 34 63 31 33 31 31 37 66 35 31 65  f6ad44c13117f51e
ded0: 30 35 31 37 63 30 39 37 34 64 36 63 37 62 37 38  0517c0974d6c7b78
dee0: 61 66 37 34 31 39 62 63 63 65 39 35 37 62 38 62  af7419bcce957b8b
def0: 63 31 64 62 38 38 30 31 63 35 65 32 38 30 33 31  c1db8801c5e28031
df00: 32 65 66 37 38 64 36 61 61 34 37 61 39 63 62 39  2ef78d6aa47a9cb9
df10: 38 62 38 36 36 61 61 65 63 33 64 35 65 32 36 33  8b866aaec3d5e263
df20: 39 32 64 64 61 36 62 62 64 65 33 66 65 63 65 38  92dda6bbde3fece8
df30: 61 30 36 32 38 62 33 30 39 35 35 62 35 35 66 30  a0628b30955b55f0
df40: 33 37 31 31 61 38 65 31 65 62 39 65 34 30 39 61  3711a8e1eb9e409a
df50: 37 63 66 38 34 66 35 36 63 38 64 30 64 30 66 38  7cf84f56c8d0d0f8
df60: 62 39 62 61 31 38 34 63 37 37 38 66 61 65 39 30  b9ba184c778fae90
df70: 64 63 30 66 35 63 33 33 32 39 63 62 38 36 64 63  dc0f5c3329cb86dc
df80: 66 37 34 33 62 62 61 65 5d 7d 20 5c 0a 09 2d 62  f743bbae]} \..-b
df90: 6f 64 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74  ody {tls::digest
dfa0: 20 2d 64 69 67 65 73 74 20 53 48 41 33 2d 32 32   -digest SHA3-22
dfb0: 34 20 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c  4 -data $data} \
dfc0: 0a 09 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d  ..-match exact -
dfd0: 72 65 73 75 6c 74 20 39 38 65 63 35 32 63 32 31  result 98ec52c21
dfe0: 63 62 39 38 38 62 31 34 33 34 62 31 36 35 33 64  cb988b1434b1653d
dff0: 64 34 61 63 38 30 36 64 31 31 38 64 65 36 61 66  d4ac806d118de6af
e000: 31 62 62 34 37 31 63 31 36 35 37 37 63 33 34 0a  1bb471c16577c34.
e010: 0a 74 63 6c 74 65 73 74 3a 3a 74 65 73 74 20 48  .tcltest::test H
e020: 61 73 68 5f 53 48 41 33 2d 32 32 34 2d 32 2e 31  ash_SHA3-224-2.1
e030: 34 35 20 7b 53 48 41 33 5f 32 32 34 53 68 6f 72  45 {SHA3_224Shor
e040: 74 4d 73 67 7d 20 5c 0a 09 2d 63 6f 6e 73 74 72  tMsg} \..-constr
e050: 61 69 6e 74 73 20 53 48 41 33 5f 32 32 34 20 5c  aints SHA3_224 \
e060: 0a 09 2d 73 65 74 75 70 20 7b 73 65 74 20 64 61  ..-setup {set da
e070: 74 61 20 5b 62 69 6e 61 72 79 20 64 65 63 6f 64  ta [binary decod
e080: 65 20 68 65 78 20 65 36 35 64 65 39 31 66 64 63  e hex e65de91fdc
e090: 62 37 36 30 36 66 31 34 64 62 63 66 63 39 34 63  b7606f14dbcfc94c
e0a0: 39 63 39 34 61 35 37 32 34 30 61 36 62 32 63 33  9c94a57240a6b2c3
e0b0: 31 65 64 34 31 30 33 34 36 63 34 64 63 30 31 31  1ed410346c4dc011
e0c0: 35 32 36 35 35 39 65 34 34 32 39 36 66 63 39 38  526559e44296fc98
e0d0: 38 63 63 35 38 39 64 65 32 64 63 37 31 33 64 30  8cc589de2dc713d0
e0e0: 65 38 32 34 39 32 64 34 39 39 31 62 64 38 63 34  e82492d4991bd8c4
e0f0: 63 35 65 36 63 37 34 63 37 35 33 66 63 30 39 33  c5e6c74c753fc093
e100: 34 35 32 32 35 65 31 64 62 38 64 35 36 35 66 30  45225e1db8d565f0
e110: 63 65 32 36 66 35 66 35 64 39 66 34 30 34 61 32  ce26f5f5d9f404a2
e120: 38 63 66 30 30 62 64 36 35 35 61 35 66 65 30 34  8cf00bd655a5fe04
e130: 65 64 62 36 38 32 39 34 32 64 36 37 35 62 38 36  edb682942d675b86
e140: 32 33 35 66 32 33 35 39 36 35 61 64 34 32 32 62  235f235965ad422b
e150: 61 35 30 38 31 61 32 31 38 36 35 62 38 32 30 39  a5081a21865b8209
e160: 61 65 38 31 37 36 33 65 31 63 34 63 30 63 63 63  ae81763e1c4c0ccc
e170: 62 63 63 64 61 61 64 35 33 39 63 66 37 37 33 34  bccdaad539cf7734
e180: 31 33 61 35 30 66 35 66 66 31 32 36 37 62 39 32  13a50f5ff1267b92
e190: 33 38 66 35 36 30 32 61 64 63 30 36 37 36 34 66  38f5602adc06764f
e1a0: 37 37 35 64 33 63 5d 7d 20 5c 0a 09 2d 62 6f 64  775d3c]} \..-bod
e1b0: 79 20 7b 74 6c 73 3a 3a 64 69 67 65 73 74 20 2d  y {tls::digest -
e1c0: 64 69 67 65 73 74 20 53 48 41 33 2d 32 32 34 20  digest SHA3-224 
e1d0: 2d 64 61 74 61 20 24 64 61 74 61 7d 20 5c 0a 09  -data $data} \..
e1e0: 2d 6d 61 74 63 68 20 65 78 61 63 74 20 2d 72 65  -match exact -re
e1f0: 73 75 6c 74 20 32 36 65 63 39 64 66 35 34 64 39  sult 26ec9df54d9
e200: 61 66 65 31 31 37 31 30 37 37 32 62 66 62 65 63  afe11710772bfbec
e210: 63 63 38 33 64 39 64 30 34 33 39 64 33 35 33 30  cc83d9d0439d3530
e220: 37 37 37 63 38 31 62 38 61 65 36 61 33 0a 0a 23  777c81b8ae6a3..#
e230: 20 43 6c 65 61 6e 75 70 0a 3a 3a 74 63 6c 74 65   Cleanup.::tclte
e240: 73 74 3a 3a 63 6c 65 61 6e 75 70 54 65 73 74 73  st::cleanupTests
e250: 0a 72 65 74 75 72 6e 0a                          .return.