logic <- function(a, b) {
  print(a && b)
  print(a || b)
  print(! a)
}

logic(TRUE, TRUE)
logic(TRUE, FALSE)
logic(FALSE, FALSE)