link_grib.csh

   1 #!/bin/csh
   2
   3 set alpha = ( A B C D E F G H I J K L M N O P Q R S T U V W X Y Z )
   4 set i1 = 1
   5 set i2 = 1
   6 set i3 = 1
   7
   8 if ( ${#argv} == 1 ) then
   9
  10    rm -f GRIBFILE.??? >& /dev/null
  11
  12    foreach f ( ${1}* )
  13
  14       ln -sf ${f} GRIBFILE.$alpha[$i3]$alpha[$i2]$alpha[$i1]
  15       @ i1 ++
  16
  17       if ( $i1 > 26 ) then
  18          set i1 = 1
  19          @ i2 ++
  20         if ( $i2 > 26 ) then
  21            set i2 = 1
  22            @ i3 ++
  23            if ( $i3 > 26 ) then
  24               echo "RAN OUT OF GRIB FILE SUFFIXES!"
  25            endif
  26         endif
  27       endif
  28
  29    end
  30 else if ( ${#argv} > 1 ) then
  31
  32    rm -f GRIBFILE.??? >& /dev/null
  33
  34    foreach f ( $* )
  35
  36       ln -sf ${f} GRIBFILE.$alpha[$i3]$alpha[$i2]$alpha[$i1]
  37       @ i1 ++
  38
  39       if ( $i1 > 26 ) then
  40          set i1 = 1
  41          @ i2 ++
  42         if ( $i2 > 26 ) then
  43            set i2 = 1
  44            @ i3 ++
  45            if ( $i3 > 26 ) then
  46               echo "RAN OUT OF GRIB FILE SUFFIXES!"
  47            endif
  48         endif
  49       endif
  50
  51    end
  52 else if ( ${#argv} == 0 ) then
  53    echo " "
  54    echo " "
  55    echo "   Please provide some GRIB data to link"
  56    echo " "
  57    echo " "
  58 endif
  59