f77 mstat.for
cat /home/data/soi/taxsim/asc/x1979*.asc \
    /home/data/soi/taxsim/asc/x19[89]*.asc  \
    /home/data/soi/taxsim/asc/x200[01].asc | ./a.out
