veri jet skeleton, still not working

This commit is contained in:
~hatteb-mitlyd 2014-04-12 19:59:02 -07:00
parent dac62b87e2
commit e0dfb10b42

View File

@ -4184,6 +4184,7 @@
(can 0 ~[[b (etch rr)] [b ss]])
::
++ veri :: validate
~/ %veri
|= [s=@ m=@ pk=@] ^- ?
?: (gth (div b 4) (met 3 s)) |
?: (gth (div b 8) (met 3 pk)) |