12744Swollman#! /bin/sh 2339630Sphilip: 'Determine whether year is of appropriate type (this file is obsolete).' 32744Swollman 4163299Sru: 'This file is in the public domain, so clarified as of' 5163299Sru: '2006-07-17 by Arthur David Olson.' 62744Swollman 764496Swollmancase $#-$1 in 864496Swollman 2-|2-0*|2-*[!0-9]*) 9270728Spluknet echo "$0: wild year: $1" >&2 1064496Swollman exit 1 ;; 1164496Swollmanesac 1264496Swollman 132744Swollmancase $#-$2 in 14149511Swollman 2-even) 1564496Swollman case $1 in 1664496Swollman *[24680]) exit 0 ;; 1764496Swollman *) exit 1 ;; 1864496Swollman esac ;; 1964496Swollman 2-nonpres|2-nonuspres) 2064496Swollman case $1 in 2164496Swollman *[02468][048]|*[13579][26]) exit 1 ;; 2264496Swollman *) exit 0 ;; 2364496Swollman esac ;; 24149511Swollman 2-odd) 2564496Swollman case $1 in 2664496Swollman *[13579]) exit 0 ;; 2764496Swollman *) exit 1 ;; 2864496Swollman esac ;; 2964496Swollman 2-uspres) 3064496Swollman case $1 in 3164496Swollman *[02468][048]|*[13579][26]) exit 0 ;; 3264496Swollman *) exit 1 ;; 3364496Swollman esac ;; 34149511Swollman 2-*) 35270728Spluknet echo "$0: wild type: $2" >&2 ;; 362744Swollmanesac 3764496Swollman 3864496Swollmanecho "$0: usage is $0 year even|odd|uspres|nonpres|nonuspres" >&2 3967575Swollmanexit 1 40