File: userpsfix

package info (click to toggle)
nwchem 7.3.1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 1,352,308 kB
  • sloc: fortran: 4,965,533; ansic: 259,769; f90: 30,773; sh: 22,069; python: 19,545; cpp: 15,679; java: 12,311; perl: 6,733; csh: 4,122; makefile: 4,109; sed: 246; awk: 115; exp: 111; asm: 106; pascal: 76
file content (32 lines) | stat: -rwxr-xr-x 778 bytes parent folder | download | duplicates (7)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
#!/bin/csh 
@ count = 1
while ($count)
  if ($count < 10) then
     if (-e user.00${count}) then
        echo "mv user.00${count} user.00${count}.ps"
        mv user.00${count} user.00${count}.ps
        @ count++
     else
        @ count = 0
     endif
  else if ($count < 100) then
     if (-e user.0${count}) then
        echo "mv user.0${count} user.0${count}.ps"
        mv user.0${count} user.0${count}.ps
        @ count++
     else
        @ count = 0
     endif
  else if ($count < 1000) then
     if (-e user.${count}) then
        echo "mv user.${count} user.${count}.ps"
        mv user.${count} user.${count}.ps
        @ count++
     else
        @ count = 0
     endif
  else
    echo "count value of $count requires a fix in userpsfix"
    exit 911
  endif
end