cycling/compare_matches.m

   1 function [ scores ] = compare_matches(wrf_single, wrf_cycle, wrf_time_step )
   2 %functio gets comparison scores for two simulations
   3 %inputs:
   4 %  wrf_single, wrf_cycle - strings, paths to wrfouts to be compared
   5 %  wrf_time_step         - string, optional timestep to be read
   6
   7 close all
   8 if nargin > 2
   9     ts = wrf_time_step;
  10     scores(1) = match_detections(wrf_single,10,ts);
  11     scores(2) = match_detections(wrf_cycle,10,ts);
  12 else
  13     scores(1) = match_detections(wrf_single);
  14     scores(2) = match_detections(wrf_cycle);
  15 end
  16
  17
  18 figure(1), xs = xlim; ys = ylim;
  19 figure(2), xc = xlim; yc = ylim;
  20
  21 x = [xs(:);xc(:)];
  22 y = [ys(:);yc(:)];
  23
  24 x_lim = [min(x(:)) max(x(:))];
  25 y_lim = [min(y(:)) max(y(:))];
  26
  27
  28 figure(1), xlim(x_lim), ylim(y_lim)
  29 figure(2), xlim(x_lim), ylim(y_lim)
  30
  31 end
  32