Fix failing unit tests in simulation_tests.jl

test/simulation_tests.jl

@@ -12,8 +12,13 @@
     @test typeof(model.dataoutputs) == Dict{String,DataOutput}
     @test typeof(model.logger) == TeeLogger{Tuple{ConsoleLogger, ConsoleLogger}}
     @test length(model.dataoutputs) == 6
-    @test model.events == Vector{FarmEvent}()
-    @test Ps.nagents(model) == 2092+0+321 # farmplots+farmers+animals
+    @test length(model.farmplots) == 2092
+    @test length(model.farmers) == 1
+    @test length(model.animals) == 307
+    @test typeof(model.events) == Vector{FarmEvent}
+    @test all(x -> x == Ps.sowing, getfield.(model.events, :management))
+    @test length(model.events) == length(model.farmplots)  # one sowing event for each farmplot
+    @test Ps.nagents(model) == length(model.farmplots) + length(model.farmers) + length(model.animals)
 end
 
 @testset "Parameter scanning" begin