|=  a=*
^-  tape
?^  a
  "noun"
?:  =((mod a 2) 0)
  "even"
"odd"