chooese added by klgg213498 on Tue Oct 9 17:09:11 2012

; variant 1

(custom-cond value
  ( (condition1) (condition2) -> expression)
  (else expression)

; variant 2

(custom-cond value
  ( ( (condition1) (condition2) ) expression)
  (else expression)