Вопрос программирования Netlogo - Реализация температуры и давления в химическом равновесии - PullRequest
2 голосов
/ 04 марта 2010

Я пытаюсь что-то кодировать в Netlogo .. Я использую существующую модель Chemical Equilibrium и пытаюсь реализовать следующее:

Черепахи-собственные [скорость]

спроси черепах [

;; set velocity ( ambient-temperature = 30 )
;; fd velocity
if temp  > 40 [ "speed" increases of turtles  ]  
ifelse temperature < 30 [ speed of turtles decreases]

]

;; темп

но, похоже, не работает

(при температуре более 40 скорость черепах увеличивается если температура ниже 30, скорость черепах уменьшается) температура слайдера на модели

то же самое для давления спросить черепах [

;; if pressure > 50 then speed increases of turtles
;; if pressure < 50 then speed decreases of turtles

]

;; до давления

спасибо

1 Ответ

2 голосов
/ 04 марта 2010

Я думаю, что вы пытаетесь сделать что-то вроде этого:

turtles-own [speed]


to setup
  ca
  create-turtles 50 [
    set speed 1
  ]
end

to go
  ask turtles [
    if (temperature  > 40) [ 
      set speed min (list (speed + 1) 100) ;cap the speed at 100 otherwise it will shoot to infinity
    ]
    if (temperature < 30) [
      set speed max (list (speed - 1) 0); min speed is 0
    ]
    ;move
    forward speed
  ]  
end

Мне нужно было добавить минимальную и максимальную скорости (0 и 100 соответственно), иначе скорость бы быстро достигла бесконечности. Кроме того, «температура» является слайдером в моей модели.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...