let local base suffix = let dir = Wp_parameters.get_output () in Printf.sprintf "%s/%s%s" dir base suffix