Fire (Big) Benchmark

No preview image

1 collaborator

Uri_dolphin3 Uri Wilensky (Author)

Tags

(This model has yet to be categorized with any tags)
Model group CCL | Visible to everyone | Changeable by group members (CCL)
Model was written in NetLogo 4.0pre8 • Viewed 242 times • Downloaded 26 times • Run 0 times
Download the 'Fire (Big) Benchmark' modelDownload this modelEmbed this model

Do you have questions or comments about this model? Ask them here! (You'll first need to log in.)


VERSION

$Id: Fire (Big) Benchmark.nlogo 37529 2008-01-03 20:38:02Z craig $

Comments and Questions

Please start the discussion about this model! (You'll first need to log in.)

Click to Run Model

globals [ initial-trees burned-trees result ]
patches-own [ fire counts ]

to benchmark
  random-seed 362
  reset-timer
  setup
  repeat 35 [ go ]
  set result timer
end 

to benchmark-__fire
  random-seed 362
  reset-timer
  setup
  repeat 35 [ __fire ]
  set result timer
end 

to setup
  ca
  ask patches [
   set fire 0
   if pxcor > 1 + min-pxcor
     [if (random 100) < density
       [set pcolor green]]
   if pxcor = 1 + min-pycor
     [set pcolor red set fire 1]
  ]
  set initial-trees count patches with [pcolor = green]
  set burned-trees 0
end 

to go
  if (count patches with [burning?]) = 0
    [ stop ]
  ask patches  [
    if pcolor = green
    [ set counts (sum [fire] of neighbors4) ] ]
  ask patches [
    ifelse pcolor = green [
      if counts > 0
      [set fire 1
        set pcolor red
        set burned-trees burned-trees + 1 ]]
    [ if burning?
      [ set pcolor pcolor - 0.3] ]
  ]
  tick
end 

to-report burning?  ;; patch procedure
  report (pcolor > (red - 4)) and (pcolor < (red + 1))
end 

to-report percent-burned
  ifelse initial-trees > 0
    [ report (burned-trees / initial-trees) * 100 ]
    [ report 0 ]
end 

There are 2 versions of this model.

Uploaded by When Description Download
Uri Wilensky almost 14 years ago Fire (Big) Benchmark Download this version
Uri Wilensky almost 14 years ago Fire (Big) Benchmark Download this version

Attached files

No files

This model does not have any ancestors.

This model does not have any descendants.