Changeset 2600 for palm/trunk/SCRIPTS/palmrun

Timestamp:

Nov 1, 2017 2:11:20 PM (7 years ago)

Author:

raasch

Message:

small changes concerning r2599, cycle number are now three digits wide

File:

• palm/trunk/SCRIPTS/palmrun (modified) (7 diffs)

palm/trunk/SCRIPTS/palmrun

@@ -27 +27 @@
 # -----------------
 # $Id$
+# cycle numbers are made three digits wide
+# 
+# 2566 2017-10-20 08:50:47Z raasch
 # execute command for combine_plot_fields added
 # "TEMPDIR" renamed "tempdir"
@@ -1017 +1020 @@
            then
               (( maxcycle = icycle ))
+
+                 # FOR COMPATIBILITY REASONS WITH OLDER VERSIONS
+                 # CHECK IF CYCLE NUMBER CONTAINS LEADING ZEROS
+              if [[ $(echo $cycle | cut -c1) = 0 ]]
+              then
+                 leading_zero=true
+              else
+                 leading_zero=false
+              fi
            fi
 
@@ -1022 +1034 @@
        rm filelist
 
+          # MAKE CYCLE NUMBER THREE DIGITS WIDE
+       if [[ $leading_zero = true ]]
+       then
+          cyclestring=`printf "%03d" $maxcycle`
+       else
+          cyclestring=$maxcycle
+       fi
+
           # APPEND CYCLE NUMBER TO FILENAME
        if (( maxcycle > 0 ))
@@ -1027 +1047 @@
           if [[ "${extin[$i]}" != " "  &&   "${extin[$i]}" != "" ]]
           then
-             filename=${filename}.$maxcycle.${extin[$i]}
+             filename=${filename}.$cyclestring.${extin[$i]}
           else
-             filename=${filename}.$maxcycle
+             filename=${filename}.$cyclestring
           fi
        else
@@ -1045 +1065 @@
           if [[ "${actionin[$i]}" = di ]]
           then
-             frelin[$i]=${endin[$i]}.$maxcycle
+             frelin[$i]=${endin[$i]}.$cyclestring
           else
-             frelin[$i]=${fname}${endin[$i]}.$maxcycle
+             frelin[$i]=${fname}${endin[$i]}.$cyclestring
           fi
        else
@@ -1161 +1181 @@
        if [[ "${actionout[$i]}" != a ]]
        then
+          cyclestring=`printf "%03d" $maxcycle`
           if (( maxcycle > 0 ))
           then
-             filename_tmp=${filename}.$maxcycle
+             filename_tmp=${filename}.$cyclestring
              if  cat /dev/null > $filename_tmp 
              then
@@ -2053 +2074 @@
           if (( cycnum[$i] > 0 ))
           then
-             pathout[$i]=${pathout[$i]}.${cycnum[$i]}
+             cyclestring=`printf "%03d" ${cycnum[$i]}`
+             pathout[$i]=${pathout[$i]}.$cyclestring
           fi
        fi