<a name="#<% $event->eventId %>"></a>

<table width="90%">
<tr>
<td width>

<table border=0 cellspacing=0 cellpadding=2 width="100%">
<tr>
<td align="left" valign="top" width="20%">
<b>Attribution</b><br>
Event ID <% $event->eventId %><br>
<% $event->eventTime %><br>
<% sprintf qq{Eph Dist: %.3f"}, $event->ephemerisDistance %><br>
<% sprintf qq{1-&#963; Uncertainty: %.3f"}, $event->ephemerisUncertainty %><br>
<& eventClassification, event => $event &>
</td>
<td width="80%">
% my $trk;
% $trk = modct_retrieve($inst, trackletId => $event->trackletId);
<& ttable, trk => $trk, orbitId => $event->orbitId &>
<& otable, orbitId => $event->orbitId &>
</td>
</tr>
</table>

</td>
</tr>
</table>

<%args>
$event
</%args>

<%init>
my $inst = $m->notes('INST');
use PS::MOPS::DC::Tracklet;
</%init>
