brainstorming the flattening algorithm, slight API change

This commit is contained in:
aj
2010-11-09 23:32:25 -08:00
parent d00937c3e9
commit 216a8d9ff8
3 changed files with 259 additions and 100 deletions

View File

@@ -25,6 +25,11 @@ flatten() ->
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% recursively processes sets of similar zones until they're all done, passing zone sets to flatten_zone_set/1
flatten_zones(Zones) ->
flatten_zones(Zones, []).
make_next_flat(#flatzone{wall_to=W, std_to=S, utc_to=U, offset=O}) ->
make_next_flat({W,S,U}, O);
@@ -53,10 +58,6 @@ end_flat(Flat=#flatzone{}, {W,S,U}) ->
% recursively processes sets of similar zones until they're all done, passing zone sets to flatten_zone_set/1
flatten_zones(Zones) ->
flatten_zones(Zones, []).
flatten_zones([], Flats) ->
Flats;
flatten_zones([Z1|_]= AllZones, Flats) ->