max32 <- function(a,b,c) { maxabc = max2(a,b) maxabc = max2(maxabc,c) return(maxabc) }