Changeset 973 in lmdz_wrf for trunk/tools

Timestamp:

Jun 29, 2016, 6:09:47 PM (8 years ago)

Author:

lfita

Message:

Adding `compute_vars': to compute the variables

File:

• trunk/tools/model_graphics.bash (modified) (3 diffs)

trunk/tools/model_graphics.bash

@@ -727 +727 @@
 }
 
+function compute_vars() {
+# Function to compute variables
+#   Iwdir= input folder
+#   Owdir= output folder
+#   Files= files to use
+#   Moddims= list of names of dimensions of the file
+#   Modvdims= list of names of the dimensions variables of the file
+#   VarCompute= list of variables to compute as ';' list of 
+#     [CFvarn]|[varkind]|[headerf]|[varmod]|[vardiag]
+#   Filescratch= wether files have to be compute from the scratch or not
+    fname='compute_vars'
+
+    Iwdir=$1
+    Owdir=$2
+    Files=$3
+    Moddims=$4
+    Modvdims=$5
+    VarCompute=$6
+    Filescratch=$7
+
+    cd $Owdir
+    ic=1
+    isc=1
+    cvars=`echo ${VarCompute} | tr ';' ' '`
+    for cvar in ${cvars}; do
+      CFv=`echo ${cvar} | tr '|' ' ' | awk '{print $1}'`
+      vark=`echo ${cvar} | tr '|' ' ' | awk '{print $2}'`
+      fileh=`echo ${cvar} | tr '|' ' ' | awk '{print $3}'`
+      modv=`echo ${cvar} | tr '|' ' ' | awk '{print $4}'`
+      diagv=`echo ${cvar} | tr '|' ' ' | awk '{print $5}'`
+      if ${dbg}; then echo "        "${CFv}"; "${modv}" "${diagv}; fi
+
+      if test ! ${modv} = 'None' || test ! ${diagv} = 'None'; then
+        compute_variable ${Iwdir} ${Files} ${Owdir} ${cvar} ${Moddims} ${Modvdims}   \
+          ${Filescratch}
+        ic=`expr ${ic} + 1`
+
+        if test ! ${vark} = 'diff' && test ! ${vark} = 'combo'; then
+          if test ${vark} = 'pinterp'; then
+            fhead=${fileh}'p'
+          else
+            fhead=${fileh}
+          fi
+          compute_statistics ${iwdir} ${CFv}_${fhead}.nc ${owdir} ${cvar}            \
+            ${moddims} ${modvdims} ${filescratch}
+          isc=`expr ${isc} + 1`
+        else
+          if test ${vark} = 'diff'; then
+            echo "  "${main}": differences will be calculated when all the "         \
+              "model/experiments will be done !"
+          elif test ${vark} = 'combo'; then
+            echo "  "${main}": combos will be calculated later when all the "        \
+              "variables will be done !"
+          fi
+        fi
+      else
+        if ${dbg}; then echo "        not '"${CFv}"' for model '"${mod}"' !!"; fi
+      fi
+
+      # exit
+# end of computing vars
+    done
+}
+
 function compute_statistics(){
 # Function to compute different statistics
@@ -1485 +1549 @@
 testfs: ${testfiles}
 EOF
-
-      exit
     else
       echo $warnmsg
@@ -1501 +1563 @@
 ## 
     echo "      Computing all variables ..."
-    cd $owdir
-    ic=1
-    isc=1
-    cvars=`echo ${varcompute} | tr ';' ' '`
-    for cvar in ${cvars}; do
-      CFv=`echo ${cvar} | tr '|' ' ' | awk '{print $1}'`
-      vark=`echo ${cvar} | tr '|' ' ' | awk '{print $2}'`
-      fileh=`echo ${cvar} | tr '|' ' ' | awk '{print $3}'`
-      modv=`echo ${cvar} | tr '|' ' ' | awk '{print $4}'`
-      diagv=`echo ${cvar} | tr '|' ' ' | awk '{print $5}'`
-      if ${dbg}; then echo "        "${CFv}"; "${modv}" "${diagv}; fi
-
-      if test ! ${modv} = 'None' || test ! ${diagv} = 'None'; then
-        compute_variable ${iwdir} ${files} ${owdir} ${cvar} ${moddims} ${modvdims}   \
-          ${filescratch}
-        ic=`expr ${ic} + 1`
-
-        if test ! ${vark} = 'diff' && test ! ${vark} = 'combo'; then
-          if test ${vark} = 'pinterp'; then
-            fhead=${fileh}'p'
-          else
-            fhead=${fileh}
-          fi
-          compute_statistics ${iwdir} ${CFv}_${fhead}.nc ${owdir} ${cvar}            \
-            ${moddims} ${modvdims} ${filescratch}
-          isc=`expr ${isc} + 1`
-        else
-          if test ${vark} = 'diff'; then
-            echo "  "${main}": differences will be calculated when all the "         \
-              "model/experiments will be done !"
-          elif test ${vark} = 'combo'; then
-            echo "  "${main}": combos will be calculated later when all the "        \
-              "variables will be done !"
-          fi
-        fi
-      else
-        if ${dbg}; then echo "        not '"${CFv}"' for model '"${mod}"' !!"; fi
-      fi
-
-      # exit
-# end of computing vars
-    done
-
+
+    compute_vars ${iwdir} ${owdir} ${files} ${moddims} ${modvdims} ${varcompute} ${filescratch}
+
+    exit
     # Computing combos
     if ${combo}; then