for(x in 1:2) for(y in letters[1:2])
{
  print(if2(x == 1, y == "a", list(
    "both conditions are true",
    else1 = x + 99,
    else2 =
    {
      yy <- rep.int(y, 10)
      paste(letters[1:10], yy)
    },
    "else" = NULL
  )))
}