Commit ce5863e8 authored by Knut's avatar Knut
Browse files

Merge branch 'ss_nn_MUDFLAT' into numerical_analyses

parents 5b8548d9 a261a1f4
......@@ -224,6 +224,10 @@
idpdy=_ZERO_
#endif
! must be nonzero for gotm_fabm in case of calc_temp=F
g1 = -9999*_ONE_
g2 = -9999*_ONE_
#ifdef DEBUG
write(debug,*) 'Leaving init_variables_3d()'
write(debug,*)
......
......@@ -206,7 +206,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)
......
......@@ -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
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment