let rec indent i = if i <= 0 then "" else "    "^(indent (i - 1))