Raket opsendelse

1 collaborator

WHAT IS IT?

This is an simulation of a rocket launch.

HOW IT WORKS

It calculates the thrust of the rocket, with inputs of the exhaustion velocity (udstødningshastighed in Danish) and the change of mass per second. Also the mass of the rocket and the

HOW TO USE IT

Change the values of the parameters and watch how heigh the rockets

THINGS TO NOTICE

This is a simple program where the rocket only moves vertically. It is possible to compare the numerical calculation in this simulation with the rocket equation.

THINGS TO TRY

Try to do figure out how the exhaustion velocitet affects the height of the rocket.

EXTENDING THE MODEL

It will be quite easy to change the program so it accounts for the changing gravitational pull of the Earth. Also the air-resistance can be added.

NETLOGO FEATURES

This program does not use the agentbased features.

RELATED MODELS

CREDITS AND REFERENCES

Writting by Solveig Skadhauge.

Comments and Questions

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

Click to Run Model

globals [mass acceleration velocity height dm/dt N]

to setup
  clear-all
  reset-ticks
  create-turtles 1 [
    set shape "rocket"
    set size 3
    set heading 0
    setxy 0 1
    set color red
  ]
  set velocity 0
  set acceleration 0
  set height 0
  set mass raket_masse + brændstofmasse      ; startsmasse
  set dm/dt masseændring_per_tid   ; masseændring  per tid
  set N 10
  setup-world
end 

to setup-world
ask patches [
    set pcolor 99.8
    if pycor < 1 [ set pcolor green]
  ]
end 

to go
  let deltat 1 / N
  repeat N [
  let thrust ( dm/dt * udstødningshastighed )
  ifelse mass >  raket_masse [
  set mass (mass - dm/dt * deltat)
  ]
  [ set dm/dt 0]
  set acceleration (thrust / mass -  9.82)
  set velocity (velocity + acceleration * deltat)
  set height (height + velocity * deltat)
  ]
  if height < 0 [setup-world stop]
  ask turtles [
    setxy xcor height / 1000
  ]
  paint-sky
  tick
end 

to paint-sky
    ask patches [ set pcolor 100 - ( min list  (height / 10000)  10 )]
end

There are 5 versions of this model.

Uploaded by	When	Description	Download
Solveig Skadhauge	almost 4 years ago	Change the turtles ycor to visualize better	Download this version
Solveig Skadhauge	almost 4 years ago	Change N to make it faster	Download this version
Solveig Skadhauge	almost 4 years ago	made a reat loop to make simulation faster	Download this version
Solveig Skadhauge	almost 4 years ago	Colors and time	Download this version
Solveig Skadhauge	almost 4 years ago	Initial upload	Download this version

Attached files

File	Type	Description	Last updated
Raket opsendelse.png	preview	preview image	almost 4 years ago, by Solveig Skadhauge	Download

This model does not have any ancestors.

This model does not have any descendants.

NetLogo