source: LMDZ5/trunk/tools/install_1d_src.sh @ 1889

Last change on this file since 1889 was 1888, checked in by Laurent Fairhead, 11 years ago

Clean-up

  • Property svn:executable set to *
File size: 1.3 KB
Line 
1# This is a script in Bash.
2
3# This script installs the source files of LMDZ 1D. Run this script
4# from "libf".
5
6set -xe
7
8# cp --no-clobber phylmd/* phy1d:
9cd phylmd
10set +x
11for my_file in *
12  do
13  if [[ ! -a ../phy1d/$my_file ]]
14      then
15#     cp $my_file ../phy1d
16      cp -R $my_file ../phy1d
17  fi
18done
19set -x
20
21cd ../phy1d
22rm wrgradsfi.F # already in 1DUTILS.h
23
24sed -i -e "/add_phys_tend.*_vdf/s/add_phys_tend/add_pbl_tend/" physiq.F90
25
26sed -i -e "/SUBROUTINE *convers_timesteps/,/END SUBROUTINE convers_timesteps/{
27 /USE *phys_cal_mod/d
28 /use *ioipsl/a\\
29    USE phys_cal_mod
30 s/ioget_mon_len(annee_ref,day_ref)/mth_len/
31};/SUBROUTINE *phys_output_open/,/end *subroutine *phys_output_open/{
32 /USE *ioipsl/a\\
33  USE phys_cal_mod, only : hour
34 /ymds2ju.*annee_ref.*zjulian/c\\
35!!!      CALL ymds2ju(annee_ref, 1, idayref, 0.0, zjulian)       !jyg \\
36! correction pour l heure initiale                               !jyg \\
37!                                                                !jyg \\
38      CALL ymds2ju(annee_ref, 1, idayref, hour, zjulian)         !jyg
39}" phys_output_mod.F90
40
41 ln -s ../dyn3d/mod_const_mpi.F90 .
42 ln -s ../dyn3d/infotrac.F90 .
43 ln -s ../dyn3d/conf_gcm.F .
44 ln -s ../dyn3d/pres2lev* .
45 ln -s ../dyn3d/control_mod.F90 .
46 ln -s ../dyn3d/q_sat.F .
47 ln -s ../dyn3d/disvert.F90 .
Note: See TracBrowser for help on using the repository browser.