foreach STN ( 582 )       #地点番号　
foreach ccyy ( 2005 )
 foreach mm ( 07 08 09 )
   ### INPUT FILE NAME
   set FWIN = ./data/ks${ccyy}${mm}.win
   set FTEM = ./data/ks${ccyy}${mm}.tem

   foreach dd ( 01 02 03 04 )
    foreach hh ( 09 21 )      ### 00Z 12Z

    ###OUTPUT FILE NAME
    set OWIN = "47${STN}_${ccyy}${mm}${dd}${hh}.win"
    set OTEM = "47${STN}_${ccyy}${mm}${dd}${hh}.tem"
#------------------------ #### MAKE INPUT FILE
 cat > $INP << EOF
${STN}
${ccyy}
${mm}
${dd}
${hh}
${FWIN}
${FTEM}
${OWIN}
${OTEM}

EOF
#------------------------ #### END OF INPUT

    ### program exec
    $PRG < $INP

   end ## HH
  end ## DD
 end ## MM
end ## CCYY
end ## STN