@@ -177,15 +177,15 @@ end
177
177
@test pits == CartesianIndex{2 }[CartesianIndex (1 , 1 ), CartesianIndex (3 , 1 ), CartesianIndex (1 , 3 ), CartesianIndex (1 , 4 )]
178
178
179
179
# non default cellarea
180
- area, _ = WWF. waterflows (dem, fill (10.0 , size (dem)))
180
+ area, _ = WWF. waterflows (dem, fill (10.0 , size (dem)), bnd_as_pits = false )
181
181
@test area == [10.0 10.0 50.0 10.0 ; 10.0 10.0 10.0 10.0 ; 50.0 30.0 20.0 10.0 ]
182
182
end
183
183
184
184
@testset " DEM: peaks2" begin
185
185
xs, dem = peaks2 ()
186
186
ys = xs
187
187
@test size (dem)== (length (xs), length (ys))
188
- area, slen, dir, nout, nin, pits, c, bnds = WWF. waterflows (dem, drain_pits= false );
188
+ area, slen, dir, nout, nin, pits, c, bnds = WWF. waterflows (dem, drain_pits= false , bnd_as_pits = false );
189
189
# plotarea_dem(xs, ys, dem, area, pits)
190
190
@test length (pits) == 6
191
191
@test maximum (slen)== 67
195
195
@test sum (diff (c[:])) == 5
196
196
@test sort (unique (c))[[1 ,end ]] == [1 ,6 ]
197
197
198
- area, slen, dir, nout, nin, pits, c, bnds = WWF. waterflows (dem, drain_pits= true );
198
+ area, slen, dir, nout, nin, pits, c, bnds = WWF. waterflows (dem, drain_pits= true , bnd_as_pits = false )
199
199
# plotarea_dem(xs, ys, dem, area, pits)
200
200
@test length (pits) == 4
201
201
@test maximum (slen)== 118
312
312
xs = - 1.5 : dx: 1
313
313
ys = - 0.5 : dx: 3.0
314
314
dem = dem1 .(xs, ys' , withpit= true )
315
- area, slen, dir, nout, nin, pits = WWF. waterflows (dem)
315
+ area, slen, dir, nout, nin, pits = WWF. waterflows (dem, bnd_as_pits = false )
316
316
demf = WWF. fill_dem (dem, pits, dir)
317
317
@test sum (demf.- dem) ≈ 2.1499674517313414
318
318
@test sum (demf.- dem .> 0 ) == 5
323
323
(xs, ys), dem = dem_one_point ()
324
324
mask = .! isnan .(dem)
325
325
# should not error
326
- area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true )
326
+ area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true , bnd_as_pits = false )
327
327
@test mask[pits[1 ]]
328
328
@test length (pits)== 1
329
329
# @test all(getindex.(Ref(mask), pits).==0) # tests that there are no interior pits left
334
334
(xs, ys), dem = dem_two_points ()
335
335
mask = .! isnan .(dem)
336
336
# should not error
337
- area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true )
337
+ area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true , bnd_as_pits = false )
338
338
@test mask[pits[1 ]]
339
339
@test mask[pits[2 ]]
340
340
@test length (pits)== 2
345
345
(xs, ys), dem = dem_patho1 ()
346
346
mask = .! isnan .(dem)
347
347
# should not error
348
- area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true )
348
+ area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true , bnd_as_pits = false )
349
349
@test length (pits)== 2
350
350
area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true , bnd_as_pits= true )
351
351
@test all (getindex .(Ref (mask), pits).== 0 )
357
357
# also mask border points
358
358
mask[1 ,:] .= false ; mask[end ,:] .= false ; mask[:,1 ] .= false ; mask[:,end ] .= false
359
359
# should not have a pit in the interior
360
- area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true )
360
+ area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true , bnd_as_pits = false )
361
361
@test all (getindex .(Ref (mask), pits).== 0 )
362
362
area, slen, dir, nout, nin, pits = WWF. waterflows (dem, drain_pits= true , bnd_as_pits= true )
363
363
@test all (getindex .(Ref (mask), pits).== 0 )
0 commit comments