<table width="100%" cellspacing=0 cellpadding=2>
    <tr> 
        <th class="darkheader" valign="top" width="80"> q<br>(AU) </th>
        <th class="darkheader" valign="top" width="80"> e </th>
        <th class="darkheader" valign="top" width="80"> i<br>(deg) </th>
        <th class="darkheader" valign="top" width="80"> node<br>(deg) </th>
        <th class="darkheader" valign="top" width="80"> arg_peri<br>(deg) </th>
        <th class="darkheader" valign="top" width="80"> time_peri<br>(MJD) </th>
        <th class="darkheader" valign="top" width="80"> h<sub>V</sub> </th>
        <th class="darkheader" valign="top" width="80"> epoch<br>(MJD) </th>
        <th class="darkheader" valign="top"> Object Name </th>
    </tr>

    <tr>
        <td> <% sprintf "%.8f", $ssm->q %> </td>
        <td> <% sprintf "%.5f", $ssm->e %> </td>
        <td> <% sprintf "%.5f", $ssm->i %> </td>
        <td> <% sprintf "%.6f", $ssm->node %> </td>
        <td> <% sprintf "%.6f", $ssm->argPeri %> </td>
        <td> <% sprintf "%.6f", $ssm->timePeri %> </td>
        <td> <% sprintf "%.4f", $ssm->hV %> </td>
        <td> <% sprintf "%.6f", $ssm->epoch %> </td>
        <td align="center"> <% $ssm->objectName %> </td>
    </tr>
</table>

<%args>
$ssmId => undef
</%args>

<%init>
# If orbs specified, it's a list of orbit objects.  
use PS::MOPS::DC::SSM;
my $inst = $m->notes('INST');
my $ssm = modcs_retrieve($inst, ssmId => $ssmId);
</%init>
