program main
  fn immediate_second() -> string
    index
      array string
        string "sun"
        string "moon"
        string "star"
      int 1
  fn local_pick() -> string
    local let words: (array string 3)
      array string
        string "red"
        string "green"
        string "blue"
    index
      var words
      int 2
  fn main() -> i32
    if
      binary =
        call local_pick
        string "blue"
      int 0
      int 1
  test "string immediate array index"
    binary =
      call immediate_second
      string "moon"
  test "string local array index"
    binary =
      call local_pick
      string "blue"