get_curr_date Subroutine

public subroutine get_curr_date(yr, mon, day, tod, offset)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	yr
integer,	intent(out)			::	mon
integer,	intent(out)			::	day
integer,	intent(out)			::	tod
integer,	intent(in),	optional		::	offset