Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Open sidebar
Knut Klingbeil
getm
Commits
faba4c14
Commit
faba4c14
authored
May 13, 2018
by
Knut
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
moved output of compilation options
parent
ba9b62f0
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
5 additions
and
4 deletions
+5
-4
src/getm/initialise.F90
src/getm/initialise.F90
+4
-1
src/getm/main.F90
src/getm/main.F90
+1
-3
No files found.
src/getm/initialise.F90
View file @
faba4c14
...
...
@@ -187,7 +187,10 @@
STDERR
LINE
STDERR
'getm: Started on '
,
dstr
,
' '
,
tstr
STDERR
LINE
call
print_version
()
call
compilation_options
()
STDERR
'Initialising....'
STDERR
LINE
LEVEL1
'the run id is: '
,
trim
(
runid
)
...
...
src/getm/main.F90
View file @
faba4c14
...
...
@@ -48,8 +48,6 @@
!-----------------------------------------------------------------------
!BOC
call
cmdline
call
print_version
()
call
compilation_options
()
#ifdef FORTRAN95
call
CPU_Time
(
t1
)
...
...
@@ -110,7 +108,7 @@
LEVEL1
'under the General Public License (GPL) - http://www.gnu.org '
STDERR
LINE
call
compilation_options
!
call compilation_options
end
program
getm
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment