#!/bin/tcsh -f set NUMMER = $# while `expr $NUMMER != 0` echo $NUMMER nawk -f ~/PETC/NAWKBEFEHLEUSW/CHARMM/input_modify3.awk $argv[1] > $argv[1]:r.inp_1 mv $argv[1]:r.inp_1 $argv[1]:r.inp shift set NUMMER = `expr $NUMMER - 1` end unset $NUMMER