summaryrefslogtreecommitdiffstats
path: root/petascope/test/testcases-wcps/31-Discrete_Fourier.test
diff options
context:
space:
mode:
authorConstantin <jucovschi@gmail.com>2010-06-02 20:09:42 +0200
committerConstantin <jucovschi@gmail.com>2010-06-02 20:09:42 +0200
commit40e12c6af9d05c3413efaf535c35c625b736cbb9 (patch)
tree6a9f6b86b55724e659ca270171496d82362de9cc /petascope/test/testcases-wcps/31-Discrete_Fourier.test
parentfcda34adb1c78d0929778e1324c873552d21ee1d (diff)
downloadrasdaman-upstream-40e12c6af9d05c3413efaf535c35c625b736cbb9.tar.gz
rasdaman-upstream-40e12c6af9d05c3413efaf535c35c625b736cbb9.tar.xz
rasdaman-upstream-40e12c6af9d05c3413efaf535c35c625b736cbb9.zip
preparing for joining with rasdaman open source
Diffstat (limited to 'petascope/test/testcases-wcps/31-Discrete_Fourier.test')
-rw-r--r--petascope/test/testcases-wcps/31-Discrete_Fourier.test23
1 files changed, 23 insertions, 0 deletions
diff --git a/petascope/test/testcases-wcps/31-Discrete_Fourier.test b/petascope/test/testcases-wcps/31-Discrete_Fourier.test
new file mode 100644
index 0000000..8fbbc07
--- /dev/null
+++ b/petascope/test/testcases-wcps/31-Discrete_Fourier.test
@@ -0,0 +1,23 @@
+for c in (rgb) return
+encode(
+
+ coverage DFT
+ over $xx x(65:70),
+ $xy y(65:70)
+ values
+ condense +
+ over $ux x(65:70),
+ $uy y(65:70)
+ using
+ c[x($ux),y($uy)]
+ *
+ cos(
+ ( -2 * (22.0/7.0) )
+ *
+ (
+ ( (double) ($ux*$xx) / (70 - 65 + 1) )
+ +
+ ( (double) ($uy*$xy) / (70 - 65 + 1 ) )
+ )
+ )
+, "jpeg")