1 (* Make sure that arrays
of odd
-size words work
. *)
5 val v
= Vector.tabulate (10, W
.fromInt
)
6 val () = print (concat
[W
.toString (Vector.sub (v
, 9)), "\n"])
9 structure S
= F (Word5
)
10 structure S
= F (Word7
)
11 structure S
= F (Word9
)
12 structure S
= F (Word14
)
13 structure S
= F (Word17
)
14 structure S
= F (Word22
)
15 structure S
= F (Word30
)