#! 786
#ln -s struct.raw fort.19
#sed -f struct.sed fort.19 > struct.f
#rm fort.19
#
ifort -g -o structx struct.f