source: issm/oecreview/Archive/23390-24306/ISSM-23524-23525.diff@ 24308

Last change on this file since 24308 was 24307, checked in by Mathieu Morlighem, 5 years ago

NEW: adding Archive/23390-24306

File size: 1.6 KB
RevLine 
[24307]1Index: ../trunk-jpl/externalpackages/semic/surface_physics.f90.patch
2===================================================================
3--- ../trunk-jpl/externalpackages/semic/surface_physics.f90.patch (nonexistent)
4+++ ../trunk-jpl/externalpackages/semic/surface_physics.f90.patch (revision 23525)
5@@ -0,0 +1,15 @@
6+--- surface_physics.f90 2018-12-10 08:27:55.000000000 +0100
7++++ my_surface_physics.f90 2018-12-10 08:58:14.000000000 +0100
8+@@ -775,9 +775,9 @@
9+ n_ksub = par%n_ksub
10+
11+ ! Read parameters from input namelist file
12+- open(7,file=trim(filename))
13+- read(7,nml=surface_physics)
14+- close(7)
15++ !open(7,file=trim(filename))
16++ !read(7,nml=surface_physics)
17++ !close(7)
18+ ! write(*,nml=surface_physics)
19+
20+ ! Store local parameter values in output object
21Index: ../trunk-jpl/externalpackages/semic/install.sh
22===================================================================
23--- ../trunk-jpl/externalpackages/semic/install.sh (revision 23524)
24+++ ../trunk-jpl/externalpackages/semic/install.sh (revision 23525)
25@@ -2,11 +2,11 @@
26 set -eu
27
28 #Some cleanup
29-rm -rf install src
30-mkdir install
31+#rm -rf install src
32+#mkdir install
33
34 #Download latest version
35-git clone https://github.com/mkrapp/semic.git src
36+#git clone https://github.com/mkrapp/semic.git src
37
38 if which ifort >/dev/null; then
39 FC="ifort"
40@@ -40,6 +40,9 @@
41 ) > Makefile
42 make
43
44+# patch surface_physics
45+patch surface_physics.f90 < ../surface_physics.f90.patch
46+
47 #Compile semic module surface_physics.f90
48 (
49 cat << EOF
Note: See TracBrowser for help on using the repository browser.