Changeset 1810 for LMDZ5/trunk/create_make_gcm

Timestamp:

Jul 24, 2013, 10:06:39 AM (11 years ago)

Author:

Ehouarn Millour

Message:

Updating makelmdz and create_makelmdz for :

1 parallelism
2 compilation with various versions of orchidee
3 compilation in 1D mode
4 some cleaning

Also some updates in dyn3dmem:
1 allocate_field_mod.f90 renamed allocate_field_mod.F90
2 module dimensions renamed dimensions_mod
3 module allocate_field renamed allocate_field

FH

File:

• LMDZ5/trunk/create_make_gcm (modified) (2 diffs)

LMDZ5/trunk/create_make_gcm

@@ -42 +42 @@
 echo 'LIBF    = $(GCM)/libf'
 if [ "$CRAY" = '0' ] ; then
-#   echo 'LIBO    = $(GCM)/libo/$(MACHINE)'
    echo 'LIBO    = $(LIBOGCM)/$(MACHINE)'
 else
    echo 'LIBO    = $(GCM)/libo'
 fi
-#echo 'LOCAL_DIR=$(GCM)'
-#echo $localdir
 echo "LOCAL_DIR=`echo $localdir`"
 echo 'BIBIO    = $(LIBF)/bibio'
@@ -180 +177 @@
             strj=`echo $stri | tr [A-Z] [a-z]`
             str2=""
-            for dirinc in filtrez bibio grid dyn3d $diri $diri/*/ ; do
+            for dirinc in filtrez bibio grid dyn3d phydev $diri $diri/*/ ; do
 # Recherche dans l'ordre hierarchique inverse car seule la derniere
 # ligne est conservee
+               if [ $dirinc = phydev ] ; then
+                   dirstr='$(PHYS)'
+                   libstr='phy$(PHYS)'
+               else
+                   dirstr=$dirinc
+                   libstr=$dirinc
+               fi
                if [ -f $dirinc/$stri ] ; then
-                  str2='$(LIBF)/'$dirinc/$stri
+                  str2='$(LIBF)/'$dirstr/$stri
                elif [ -f $dirinc/$strj ] ; then
-                  str2='$(LIBF)/'$dirinc/$stri
+                  str2='$(LIBF)/'$dirstr/$stri
                elif [ -f $dirinc/$strj.F90 ]  || [ -f $dirinc/$strj.F ]  ; then 
-                  strlib=`echo $dirinc | awk -F/ ' { print $1 } '`
+                  strlib=`echo $libstr | awk -F/ ' { print $1 } '`
                   str2='$(LIBO)/lib'$strlib'.a('$strj'.o)'
                fi