include builtins\timedate.e
set_timedate_formats({"Mmmm d yyyy h:mmpm tz"})
timedate td = parse_date_string("March 7 2009 7:30pm EST")
td = adjust_timedate(td,timedelta(hours:=12))  ?format_timedate(td)
-- extra credit, plus daylight savings
td = change_timezone(td,"ACDT")                ?format_timedate(td)
td = adjust_timedate(td,timedelta(days:=31*4)) ?format_timedate(td)