c0dbee2000-08-01Mirar (Pontus Hagland) #! /bin/sh
de860a2000-08-12Mirar (Pontus Hagland) : '@(#)yearistype.sh 7.6' case $#-$1 in 2-|2-0*|2-*[!0-9]*) echo "$0: wild year - $1" >&2 exit 1 ;; esac
c0dbee2000-08-01Mirar (Pontus Hagland)  case $#-$2 in
de860a2000-08-12Mirar (Pontus Hagland)  2-even) case $1 in *[24680]) exit 0 ;; *) exit 1 ;; esac ;; 2-nonpres|2-nonuspres) case $1 in *[02468][048]|*[13579][26]) exit 1 ;; *) exit 0 ;; esac ;; 2-odd) case $1 in *[13579]) exit 0 ;; *) exit 1 ;; esac ;; 2-uspres) case $1 in *[02468][048]|*[13579][26]) exit 0 ;; *) exit 1 ;; esac ;; 2-*) echo "$0: wild type - $2" >&2 ;;
c0dbee2000-08-01Mirar (Pontus Hagland) esac
de860a2000-08-12Mirar (Pontus Hagland)  echo "$0: usage is $0 year even|odd|uspres|nonpres|nonuspres" >&2