C+
C NAME:
C	Time2Local2UT
C PURPOSE:
C       Read system clock, including fraction of day, convert to day of year, 
C       and calculate the day of year in Universal Time (Greenwich).
C CATEGORY:
C	Time calculation
C CALLING SEQUENCE:
	subroutine Time2Local2UT(hr,t)
C INPUTS:
C	hr	integer		offset time (in hours) from Greenwich
C				(i.e. UT-local time)
C OUTPUTS:
C	t(2)	integer		2-element standard time
C CALLS:
C	Time2System, Time2HMS, Time2Add
C PROCEDURE:
C	Time2System is used to get the system time.
C	The specified offset (in hours) is added.
C MODIFICATION HISTORY:
C	NOV-2004, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
C-
	    integer	hr
	    integer	t(2)

	integer		dt(4)

	call Time2System(t)		! Get system time

	dt(1) = hr			! Hours
	dt(2) = 0
	dt(3) = 0
	dt(4) = 0
	call Time2HMS(1,dt,dt)		! Convert to 2-element standard time
	call Time2Add(t,dt,t)		! Add offset to system time

	return
	end