On Sat, Sep 4, 2010 at 1:03 PM, Liam Healy <lhe...@common-lisp.net> wrote:
> Yup randomness is removed.  I'll write the on-stride and off-stride tests, but
> I now I need to understand where to apply them.


Sumant,

I've created a function gsll::off-stride in
tests/fast-fourier-transform.lisp that copies the array for all
elements except the on-stride elements.  For example:

(off-stride
   #4m(#C(0.26385453 0.0) #C(1002.0 1003.0) #C(0.106692255 0.0)
#C(1006.0 1007.0)
      #C(0.8149124 0.0) #C(1010.0 1011.0) #C(0.19136061 0.0) #C(1014.0 1015.0))
   2)

#4m(#C(1002.0 1003.0) #C(1006.0 1007.0) #C(1010.0 1011.0) #C(1014.0 1015.0))

Together with the function grid:stride, which copies just the
on-stride elements:

(grid:stride
   #4m(#C(0.26385453 0.0) #C(1002.0 1003.0) #C(0.106692255 0.0)
#C(1006.0 1007.0)
      #C(0.8149124 0.0) #C(1010.0 1011.0) #C(0.19136061 0.0) #C(1014.0 1015.0))
   2)

#4m(#C(0.26385453 0.0) #C(0.106692255 0.0) #C(0.8149124 0.0)
#C(0.19136061 0.0))

I think you have should everything you need to do the tests.

Liam

_______________________________________________
Gsll-devel mailing list
Gsll-devel@common-lisp.net
http://common-lisp.net/cgi-bin/mailman/listinfo/gsll-devel

Reply via email to