Changeset 1381 for trunk/LMDZ.MARS/libf/aeronomars

Timestamp:

Feb 26, 2015, 5:37:20 PM (10 years ago)

Author:

emillour

Message:

Mars GCM:

• Update default location for "datadir" files, now at ​http://www.lmd.jussieu.fr/~lmdz/planets/mars/datadir or /u/lmdz/WWW/planets/mars/datadir for local users.

EM

Location:

trunk/LMDZ.MARS/libf/aeronomars

Files:

• inichim_newstart.F90 (modified) (3 diffs)
• param_read.F (modified) (1 diff)
• param_read_e107.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/aeronomars/inichim_newstart.F90

@@ -484 +484 @@
          write(*,*)'2) If necessary atmosfera_LMD_may.dat (and others)'
          write(*,*)'   can be obtained online on:'
-         write(*,*)' http://www.lmd.jussieu.fr/~forget/datagcm/datafile'
+         write(*,*)' http://www.lmd.jussieu.fr/~lmdz/planets/mars/datadir'
          stop
       end if
@@ -496 +496 @@
          write(*,*)'2) If necessary atmosfera_LMD_min.dat (and others)'
          write(*,*)'   can be obtained online on:'
-         write(*,*)' http://www.lmd.jussieu.fr/~forget/datagcm/datafile'
+         write(*,*)' http://www.lmd.jussieu.fr/~lmdz/planets/mars/datadir'
          stop
       end if
@@ -509 +509 @@
             write(*,*)'2) If necessary atmosfera_LMD_nitr.dat (and others)'
             write(*,*)'   can be obtained online on:'
-            write(*,*)' http://www.lmd.jussieu.fr/~forget/datagcm/datafile'
+            write(*,*)' http://www.lmd.jussieu.fr/~lmdz/planets/mars/datadir'
             STOP
          endif

trunk/LMDZ.MARS/libf/aeronomars/param_read.F

@@ -45 +45 @@
        write(*,*)'2) If necessary, EUVDAT (and other datafiles)'
        write(*,*)'   can be obtained online on:'
-       write(*,*)'   http://www.lmd.jussieu.fr/~forget/datagcm/datafile'
+       write(*,*)' http://www.lmd.jussieu.fr/~lmdz/planets/mars/datadir'
        STOP
       ENDIF

trunk/LMDZ.MARS/libf/aeronomars/param_read_e107.F

@@ -50 +50 @@
        write(*,*)'2) If necessary, EUVDAT (and other datafiles)'
        write(*,*)'   can be obtained online on:'
-       write(*,*)'   http://www.lmd.jussieu.fr/~forget/datagcm/datafile'
+       write(*,*)' http://www.lmd.jussieu.fr/~lmdz/planets/mars/datadir'
        STOP
       ENDIF