Being able to replace both the if and prog functions is a good example of why cond should be used more often.
Code:
(cond 
  ((/= (getvar "ucsicon") 3)
    (setvar "ucsicon" 3)
    (princ "\nSet ucs icon to display at the origin.") ; Added on August 22, 2018 - UCS Icon at Origin
  )
)