cycling/choose_time_step.m

   1 function ts = choose_time_step(f)
   2 %lists time steps in wrfout for user selection
   3 %input   : f - string, path to wrfout file
   4 %output  : ts  - string, timestep
   5
   6 t=nc2struct(f,{'Times'},{});  nframes=size(t.times,2);
   7 alltimes=char(t.times');
   8 for i = 1: nframes
   9     fprintf('%d :   %s  \n',i,alltimes(i,:))
  10 end
  11 in_t = input_num('Which step to use? ',nframes);
  12 ts = alltimes(in_t,:);
  13
  14 end %function