#lang racket

(define some-list (list "b" "a" "c"))

(match some-list
  [(list "a" x y) (printf "~a, ~a\n" x y)]
  [(list "b" x y) (printf "~a, ~a\n" x y)])