#!/bin/csh
pwd > qq
set system=`tail -5c qq`
rm qq
mv C$system.ts C$system.ts.initial

head -34 lda.ts > tt
cat points.ts >> tt
echo '&END' >> tt
mv tt C$system.ts


