midnight UTC on the 1st day of the year when
[(y - 1970) mod i == 0]. This returns midnight on the
1st day of the next year > t. *)
+
+val check_valid_variable_name : string -> unit
+(** Check that [name] is a valid variable name that users are permitted
+ to set, and raise [Failure] if it is not. *)