cp presetwk1.h presetwk.h
cp wind1.h wind.h
cp windlatlon1.h windlatlon.h
touch presetwk.f
ifort -w -o  presetwk presetwk.f
./presetwk < fnames_presetwk1.txt > out1          
##\rm wind.h windlatlon.h presetwk.h
