What does this evaluates to

(eval
  (list 'apply
    (list 'quote
      (list 'quote
        (list (list 'a 'b 'c)
          (list 'a 'b 'c)
        )
      )
    )
    (list  'quote
      (list
        (list
          (list 'f  'l)
          (list 'apply
            (list 'quote 'strcat)
            (list 'f (list 'reverse 'l))
          )
        )
        (list (list 'l)
          (list 'if 'l
            (list 'cons (list  'chr
              (list (list 'quote (list (list  'x) (list  'if  'x  'x 97)))
              (list 'car 'l))) (list 'f (list 'cdr 'l)))
          )
        )
        (list 118 111 110 nil 98 nil 108 nil 66 32 114 105 109 105 100 nil 108 86)
      )
    )
  )
)