test writing of selection

JuliaGeo · Oct 19, 2023 · 825ad5b · 825ad5b
1 parent deb6e7b
commit 825ad5b
Showing 1 changed file with 16 additions and 0 deletions.
diff --git a/test/test_select.jl b/test/test_select.jl
@@ -399,3 +399,19 @@ data1 = NCDataset(fname) do ds
 end;
 
 @test data[Dates.month.(time) .== 1] == data1
+
+ds = NCDataset(fname)
+ds1 = NCDatasets.@select(ds,Dates.month(time) == 1)
+outfname = tempname()
+write(outfname,ds1)
+close(ds)
+
+ds = NCDataset(outfname)
+@test all(Dates.month.(ds["time"][:]) .== 1)
+close(ds)
+
+ds = NCDataset(fname)
+data1 = NCDatasets.@select(ds["data"],Dates.month(time) == 1)
+t = data1["time"][:]
+@test all(Dates.month.(t) .== 1)
+close(ds)