netcdf_write_3d
[wrf-fire-matlab.git] / cycling / make_ps.m
blob8b5ea4bab9ce24579a97c374737eba96999c8ad2
1 function ps = make_ps(w,ts,red)
2 %ts is test_struct
4 w.tign_g = ts.c;
5 if ~exist('red','var')
6     ps.red = subset_domain(w,1);
7 else
8     ps.red = red;
9 end
10 new_pts = fixpoints2grid(ps.red,[ts.points(:,1),ts.points(:,2)]);
12 ps.paths = ts.paths;
13 ps.points = ts.points;
14 ps.grid_pts = ts.grid_pts;
15 ps.idx = new_pts(:,1:2);
16 ps.graph = ts.graph;
17 ps.raw_dist = ts.raw_dist;
19 end % function