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

.