Fix normal in TransformedGrid viz recipe (#1017)

Author: juliohm

ext/MeshesMakieExt.jl

@@ -14,7 +14,6 @@ using Colorfy
 
 using Unitful: numtype
 using Meshes: lentype
-using CoordRefSystems: Projected
 
 import TransformsBase as TB
 import Makie.GeometryBasics as GB

ext/grid/transformed.jl

@@ -20,8 +20,11 @@ function vizgrid!(plot::Viz{<:Tuple{TransformedGrid}}, M::Type{<:𝔼}, pdim::Va
     viz!(plot, grid; color, alpha, colormap, showsegments, segmentcolor, segmentsize)
     makietransform!(plot, trans)
   elseif pdim == Val(2) # visualize quadrangle mesh with texture using uv coords
+    # decide whether or not to reverse connectivity list
+    rfunc = Makie.@lift _reverse(crs($tgrid))
+
     verts = Makie.@lift map(asmakie, vertices($tgrid))
-    quads = Makie.@lift [GB.QuadFace(indices(e)) for e in elements(topology($tgrid))]
+    quads = Makie.@lift [GB.QuadFace($rfunc(indices(e))) for e in elements(topology($tgrid))]
 
     colorant = Makie.@lift process($color, $colormap, $colorrange, $alpha)
 
@@ -52,6 +55,9 @@ function vizgrid!(plot::Viz{<:Tuple{TransformedGrid}}, M::Type{<:𝔼}, pdim::Va
   end
 end
 
+_reverse(::Type{<:CRS}) = identity
+_reverse(::Type{<:LatLon}) = reverse
+
 # --------------
 # OPTIMIZATIONS
 # --------------