void print_dates(sbrr handle) {
    for (int i = 0; i < sbrr_get_num_periods(handle); ++i) {
        DateTime d = sbrr_get_result_date(handle, i);
        char date[512];
        char time[512];
        datetime_dateToStr(d, date);
        datetime_timeToStr(d, time);
        printf("%s - %s\n", date, time);
    }
}
void report_CulvertControl(int j, double q0, double q, int condition, double yRatio)
//
//  Used for debugging only
//
{
    static   char* conditionTxt[] = {"transition", "unsubmerged", "submerged"};
    char     theDate[12];
    char     theTime[9];
	DateTime aDate = getDateTime(NewRoutingTime);
    datetime_dateToStr(aDate, theDate);
    datetime_timeToStr(aDate, theTime);
    fprintf(Frpt.file,
            "\n  %11s: %8s Culvert %s flow reduced from %.3f to %.3f cfs for %s flow (%.2f).",
            theDate, theTime, Link[j].ID, q0, q, conditionTxt[condition], yRatio);
}