Netlogo To randomly select one of 3 procedures

Question

How do I randomly select one of 3 procedures?

Please see below:

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

Thank you. I am quite unfamiliar with the syntax.

Answer 1

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

Answer 2

Maybe not too much elegant, but that may work:

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