extra/math/transforms/bwt/bwt-tests.factor

   1 ! Copyright (C) 2012 John Benediktsson
   2 ! See http://factorcode.org/license.txt for BSD license
   3 USING: math.transforms.bwt tools.test ;
   4 IN: math.transforms.bwt.tests
   5
   6 { "asdf" } [ "asdf" bwt ibwt ] unit-test
   7
   8 {
   9     29
  10     "TEXYDST.E.IXIXIXXSSMPPS.B..E.S.EUSFXDIIOIIIT"
  11 } [
  12     "SIX.MIXED.PIXIES.SIFT.SIXTY.PIXIE.DUST.BOXES" bwt
  13 ] unit-test