fact: Definition CentersOfPixels (n m:positive) (pixels : raster n m) (tl br:Q2) : FinEnum Q2 := let (l,t) := tl in let (r,b) := br in let up := (UniformPartition l r n) in flat_map (fun (p:Q*list bool) => let (y,r):=p in map (fun x => (x,y)) (InterpRow up r)) (combine (UniformPartition t b m) (let (d):=pixels in d)).
imports: CoRN.algebra.RSetoid CoRN.metric2.Metric CoRN.metric2.UniformContinuity CoRN.raster.Raster CoRN.reals.fast.Interval CoRN.metric2.FinEnum CoRN.metric2.ProductMetric CoRN.logic.Classic