aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorWojtek Kosior <kwojtus@protonmail.com>2019-06-01 17:31:57 +0200
committerWojtek Kosior <kwojtus@protonmail.com>2019-06-01 17:31:57 +0200
commit1b408f5296b72706f7521ff60abfe764ebcc34e4 (patch)
tree02a46eb78f14fb9dfd0b011011b37cda000e25f6
parentf894d4ea34045c97aea2fc0853696431797d9f81 (diff)
downloadfortran-assignment2-1b408f5296b72706f7521ff60abfe764ebcc34e4.tar.gz
fortran-assignment2-1b408f5296b72706f7521ff60abfe764ebcc34e4.zip
plot function's frequency spectrum
-rw-r--r--Makefile3
-rw-r--r--src/f1_dft.gnuplot5
2 files changed, 8 insertions, 0 deletions
diff --git a/Makefile b/Makefile
index 8c77b48..9fd14fb 100644
--- a/Makefile
+++ b/Makefile
@@ -10,6 +10,9 @@ f1 : src/f1.f90
res/f1_original.txt : f1
./f1 > res/f1_original.txt
+res/f1_dft.txt : f1
+ ./f1 dft > res/f1_dft.txt
+
res/%.png : src/%.gnuplot res/%.txt
gnuplot -c $<
diff --git a/src/f1_dft.gnuplot b/src/f1_dft.gnuplot
new file mode 100644
index 0000000..216be5a
--- /dev/null
+++ b/src/f1_dft.gnuplot
@@ -0,0 +1,5 @@
+set terminal png size 1440, 900
+set output 'res/f1_dft.png'
+set logscale y
+set xrange [0:1000]
+plot 'res/f1_dft.txt' title 'dft' with lines \ No newline at end of file