aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/f1.f902
-rw-r--r--src/f1_original.gnuplot4
2 files changed, 5 insertions, 1 deletions
diff --git a/src/f1.f90 b/src/f1.f90
index e1e621e..7f07afa 100644
--- a/src/f1.f90
+++ b/src/f1.f90
@@ -8,7 +8,7 @@ PROGRAM test
real(kind=8), parameter :: pi = acos(-1.0) ! also used from f1()
! rest of variables only used from "main" program code
- integer, parameter :: npoints = 1024, ncomplex = npoints / 2 + 1
+ integer, parameter :: npoints = 65536, ncomplex = npoints / 2 + 1
real(kind=8), parameter :: start = 0, end = 1
integer :: i
real(kind=8) :: t, &
diff --git a/src/f1_original.gnuplot b/src/f1_original.gnuplot
new file mode 100644
index 0000000..c0ecba8
--- /dev/null
+++ b/src/f1_original.gnuplot
@@ -0,0 +1,4 @@
+set terminal png size 1440, 900
+set output 'res/f1_original.png'
+set xrange [0:0.15]
+plot 'res/f1_original.txt' title 'original' with lines \ No newline at end of file