fix drawing order again

This commit is contained in:
nek0 2018-08-07 14:04:12 +02:00
parent e6c0c1ad70
commit fff7dfbbce

View file

@ -395,12 +395,14 @@ drawTile ud ctx posanims pr pc row col img =
all delimit mb
where
delimit b
| nnr > fst (matmax b) || nnc < snd (matmin b) =
True
| nnr > fst (matmin b) && nnr < fst (matmax b) =
nnc < snd (matmin b)
| nnc > snd (matmin b) && nnc < snd (matmax b) =
nnr > fst (matmax b)
| otherwise =
True
False
nnr = case mbnds of
Just (Boundaries (minr, minc) (maxr, maxc)) -> maxr
Nothing -> nr - fromIntegral ((floor nr) :: Int) :: Double