Netlogo Чтобы случайно выбрать одну из 3 процедур

Question

Как выбрать случайным образом одну из 3 процедур?

Пожалуйста, смотрите ниже:

to move
   ifelse random-float 100 < 70 
   [move-forward]
   [move-left move-right move-back] ;; To randomly select one of these 3 procedures to execute.
end

Спасибо.Я совершенно незнаком с синтаксисом.

Answer 1

run one-of (list task move-left
                 task move-right
                 task move-back)

Answer 2

Может быть, не слишком элегантно, но это может сработать:

to move
  ifelse random-float 100 < 70 
  [move-forward]
  [let n random 3
    ifelse n = 0
    [move-left]
    [ifelse n = 1
      [move-right]
      [move-back]]]
end