lckclk

	event_occurred.l4.v = lckclk(event.u1.r)

	This logical function will return FORTRAN_TRUE if the accelerator
	clock event specified by "event" has occurred since a previous call
	to this function with the same event number.  Subsequent check
	requests will return FALSE until the event has been detected again
	on the accelerator clock. The first reference to this function in a
	program will erase all knowledge of previously recorded events and
	will always return FALSE.  Valid event numbers are in the range of
	0 - 255.

	This routine is deprecated.  Use lckclk_c instead.

	event		clock event number as follows:
			  0 -  255	event 0 - 255 of the clock specified
   	    	    	by Default Clock in the Utilities Window or the most
   	    	    	recent call to clock_set_multicast_type.

	This function returns status values as follows:

	FORTRAN_TRUE		event has occurred
	FALSE			event has not occurred

	This function requires the following include files:

	cnsparam_h, clib_h, tclk_events_h

	Related functions:

	lckclk_c, lckclk_api, lckclk_allocate, lckclk_free, evmon, evmon_usec_c,
	acctim, ticks_since_event, event_history, event_set_fake,
	reflected_events_c, clock_set_multicast_type, event_count_c,
	event_last_timestamp_c, clock_get_default_multicast_type,
	clock_type_convert_c, is_beam_sync_clock_type_c

	C/C++ usage:

	unsigned char	event = EVENT_MI_RESET_FIXED_TARG;
	int	event_occurred;

	event_occurred = lckclk(&event);