alias c1 { return $+(04,$1-,) } 
alias c2 { return $+(03,$1-,) } 
alias c3 { return $+(12,$1-,) }