#NETLOGO MOD WINDOWS#

Let eligible.animals animals in-cone stationary.radius stat.viewangle Set heading heading + each second the surveyor rotates '' degrees clockwise end to s.count.animals Set memory sentence memory of new.animalsĮnd Stationary surveyor procedures to do.stsurveyor.movement Set counted.animals sentence counted.animals new.records Let new.animals eligible.animals with only animals that were not previously counted are counted Let eligible.animals seen.animals with this only works for transects heading north, of course Let seen.animals animals in-cone visibility.length trans.viewangle Set heading heading + random-float-between (- ) įd speed each step is a second, so the speed is basically the distance end SURVEYOR PROCEDURES Transect surveyor procedures to do.tsurveyor.movementįd speed each step is a second, so the speed is basically the distance end to t.count.animals Output-print 'You need to re-run the model with this method enabled'Įnd animal PROCEDURES animal movement to do.animal.movement Output-print precision (observed.value / ) 3 Output-print 'The real value using the stationary method is' [output-print 'You need to re-run the model with this method enabled' Output-print precision (observed.value / ) 3] Output-print 'The real value using the transect method is' Output-type 'Roving surveyor swam ' output-type survey.time * output-type 'm and counted ' output-type unt output-print ' animals' the roving surveyor only tells how many animals it counted Output-type 'Stationary surveyor bias was ' output-print precision s.bias 2 Output-type 'Transect surveyor bias was ' output-print precision t.bias 2 outputs bias with 2 decimal places ]] [ if is not 1 (meaning it is 2), only ask every 2 secondsĮnd of go procedure Observer procedures to do.outputs Ifelse = 1 [ if is 1, ask surveyors to count animals every second Output-print 'The surveyor will not commit to sampling an area that it will not be able to see'Īsk transsurveyors [ move the surveyors Output-print 'ERROR: stationary.radius is set to a value greater than visibility.length' if the stationary radius is higher than visibility, stop and output an error description If stationary.radius > visibility.length [

Stop] end the simulation run when survey.time is reached, but include the last tick (if survey.time is 300, stop running at 301) If any? transsurveyors here I had to use 'if any?' because inspect will return an error if it finds nobody Set counted.animals sets counted.animals as an empty listĪsk transsurveyors [ empty the memory of all surveyors If show.paths? this shows the path of the surveyor Setxy (world-width / 2) (world-height / 2) Set species 'Sp1' There is only one species, but this is what surveyors register and count if animal density is set to some number, then use that to calculate the number of animals to deploy. Set stationary.area pi * stationary.radius ^ 2 Set transect.area transect.width * ( * survey.time) + transect.width * visibility.length on the original model, the final part of the sampled area of the transect is assumed to be a rectangle (transect.width x visibility.length) Set (transect.speed / 60) these 4 lines just convert interface speeds (in m/min) to m/s Set actual.area world-height * world-width Resize-world 0 (area.width - 1) 0 (area.length - 1)Īsk patches with create background gridĪsk patches with

#NETLOGO MOD WINDOWS#

Stop-inspecting-dead-agents clears surveyor detail windows from previous simulation runs Adapted and implemented in NetLogo by Miguel Pessanha Pais FOR MORE INFORMATION, LOOK IN THE INFO TAB Global variables not represented in the main screenīreed belt transect surveyorīreed stationary point count surveyorīreed roving surveyor roving surveyors can't calculate densities accurately, yet they can estimate speceis richness and frequency of occurence. AnimDens Model Original model implemented in R by Christine Ward-Paige et al.

Netlogo mod