Skip to content

Commit

Permalink
turn off debug
Browse files Browse the repository at this point in the history
  • Loading branch information
mdsumner committed Apr 25, 2024
1 parent dadcb9d commit e1cb2ac
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions R/tile_spec.R
Expand Up @@ -67,11 +67,11 @@ tile_spec <- function(dimension, extent, zoom = 0, blocksize = c(256L, 256L),
idimension <- blocksize * 2 ^ zoom

v <- vcrop(extent, idimension, global, snap = "out")
print(v)

col <- col_from_x(idimension, global, v$extent[1:2]) %/% blocksize[1]
row <- row_from_y(idimension, global, v$extent[3:4]) %/% blocksize[2]
maxcolrow <- idimension / blocksize
print(maxcolrow)


xs <- seq(col[1], col[2])
ys <- seq(row[1], row[2])
Expand Down Expand Up @@ -132,7 +132,7 @@ tile_zoom <- function(dimension, extent, blocksize = c(256L, 256L),
idimension <- blocksize

v <- vcrop(extent, idimension, global, snap = "out")
print(transform[c(2, 6)])

nativeresolution <- diff(extent)[c(1, 3)]/dimension
for (zoom in 0:23) {

Expand Down

0 comments on commit e1cb2ac

Please sign in to comment.