log using tiny, text replace
** Creates tiny ( 100 observation ) datasets
** by Jean Roth, jroth@nber.org, 2004-10-08

set mem 1000m
set more off

forvalues yr = 79/99 {
   display `yr'
   use /homes/data/morg/annual/morg`yr' in 1/100
   save /homes/data/morg/raw/tiny/tiny`yr', replace
}
forvalues yr = 0/3 {
   display `yr'
   use /homes/data/morg/annual/morg0`yr' in 1/100
   save /homes/data/morg/raw/tiny/tiny0`yr', replace
}


exit