Changeset 2220 for LMDZ5/branches/testing/libf/grid/dimension/makdim

Timestamp:

Mar 3, 2015, 2:41:13 PM (10 years ago)

Author:

Laurent Fairhead

Message:

Merged trunk changes -r2186:2216 into testing branch

Location:

LMDZ5/branches/testing

Files:

• . (modified) (1 prop)
• libf/grid/dimension/makdim (modified) (5 diffs)

LMDZ5/branches/testing/libf/grid/dimension/makdim

@@ -5 +5 @@
 if (( $# < 1 )) || (( $# > 3 ))
 then
- echo "Wrong number of parameters in $0 !!!"
- echo " Usage:"
- echo "  $0 [im] [jm] lm"
- echo " where im, jm and lm are the dimensions"
- exit
+    echo "Wrong number of parameters in $0 !!!"
+    echo " Usage:"
+    echo "  $0 [im] [jm] lm"
+    echo " where im, jm and lm are the dimensions"
+    exit 1
+fi
+
+if (($1 % 8 != 0)) && (( $# = 3 ))
+then
+    echo "The number of longitudes must be a multiple of 8."
+    echo "See the files dyn3d/groupe.F and dyn3dmem/groupe_loc.F."
+    exit 1
 fi
 
 # build "fichnom", the relevant 'dimensions.im.jm.lm' file name
 for i in $*
-  do
-  list=$list.$i
+do
+    list=$list.$i
 done
 fichdim=dimensions${list}
 
 if [ ! -f $fichdim ]
-    then
+then
 #    echo "$fichdim does not exist"
 
     # assign values of im, jm and lm
     if [ $# -ge 3 ]
-        then
+    then
         im=$1
         jm=$2
@@ -31 +38 @@
         ndm=1
     elif [ $# -ge 2 ]
-        then
+    then
         im=1
         jm=$1
@@ -37 +44 @@
         ndm=1
     elif [ $# -ge 1 ]
-        then
+    then
         im=1
         jm=1
@@ -45 +52 @@
 
 # since the file doesn't exist, we create it
-cat << EOF > $fichdim
+    cat << EOF > $fichdim
 !-----------------------------------------------------------------------
 !   INCLUDE 'dimensions.h'
@@ -64 +71 @@
 # remove 'old' dimensions.h file (if any) and replace it with new one
 if [ -f ../dimensions.h ] ; then
-\rm ../dimensions.h
+    \rm ../dimensions.h
 fi
 tar cf - $fichdim | ( cd .. ; tar xf - ; mv $fichdim dimensions.h )