%batch_1220
n = [ 'Stor19a_02n180w_199807.out';...      
      'stor22a_02n180w_199811.out';...  
      'Stor18c_02n140w_199809.out';...
      'Stor20b_02n140w_199901.out';... 
      'stor23a_02n140w_199805.out';...
      'Stor18a_00_140w_199710.out';...   
      'Stor21a_02s140w_199805.out';...   
      'Stor21c_02s140w_199901.out';...   
      'Stor26d_02s140w_199809.out';...
      'Stor26a_02s125w_199710.out';...
      'stor24a_02n110w_199803.out';...   
      'Stor25e_02n110w_199904.out';...   
      'Stor17c_02n110w_199810.out'];

pth = 'j:\publish\nino97eqpac\TIW_note\raw_reprocess\';

[r c] = size(n);
for i = 1:r
   prcout([pth n(i,:)])
end