Skip to content

Commit 3c624b2

Browse files
committed
added Fortran timings.
1 parent ea59edd commit 3c624b2

File tree

3 files changed

+20
-2
lines changed

3 files changed

+20
-2
lines changed

README.md

Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -124,3 +124,13 @@ Only the 2nd timing after warming up is given.
124124
7.177485 seconds (18 allocations: 3.053 MB)
125125
7.248687 seconds (18 allocations: 3.053 MB)
126126
```
127+
128+
Fortran timing for `100000` number of cells
129+
```sh
130+
real 0m4.781s
131+
user 0m4.760s
132+
sys 0m0.000s
133+
134+
```
135+
136+
That is 7.2s for Julia script vs. 4.8s for Fortran.

examples/scalar_law/PROGRAM1/fortran/GNUmakefile

Lines changed: 8 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -3,8 +3,15 @@
33
# to see the results after running, type
44
# xmgrace output
55
FC=gfortran
6+
FCFLAGS=-O4
7+
FLFLAGS=-O4
8+
9+
%.o: %.f
10+
$(FC) $(FCFLAGS) -c -o $@ $<
11+
612
flinearad : linaddmain.o consdiff.o linearad.o riemprob.o upwind.o
7-
$(FC) -o $@ linaddmain.o consdiff.o linearad.o riemprob.o \
13+
$(FC) $(FLFLAGS) -o $@ linaddmain.o consdiff.o linearad.o riemprob.o \
814
upwind.o
15+
916
clean :
1017
rm -f *.o flinearad

examples/scalar_law/PROGRAM1/fortran/linaddmain.f

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -24,7 +24,8 @@ program linaddmain
2424
c+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
2525
integer ncells
2626
! parameter (ncells=100)
27-
parameter (ncells=10000)
27+
! parameter (ncells=10000)
28+
parameter (ncells=100000)
2829
c+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
2930
include "linearad.i"
3031
include "const.i"

0 commit comments

Comments
 (0)