9 lines
121 B
Tcsh
Executable File
9 lines
121 B
Tcsh
Executable File
#!/bin/tcsh
|
|
foreach fil (*.inp)
|
|
set u=${fil:au:r}
|
|
if (-e $u.340) then
|
|
rm $fil
|
|
echo "$fil $u.340"
|
|
endif
|
|
end
|