27 lines
804 B
Plaintext
27 lines
804 B
Plaintext
$# Displays gradings Summary for various purposes
|
|
$# --
|
|
<div>
|
|
<table>
|
|
<tr>
|
|
<th>
|
|
$# empty cell for row headers
|
|
$maybe _ <- hasPassings
|
|
<th colspan=2>_{MsgSheetGradingPassing'}
|
|
$maybe _ <- hasPoints
|
|
<th colspan=2>_{MsgSheetGradingPoints'}
|
|
<th>_{MsgSheetGradingCount'}
|
|
$# Number of Sheet/Submissions used for calculating maximum passes/points
|
|
$forall row <- rowWdgts
|
|
^{row}
|
|
$maybe nrNoGrade <- positiveSum $ numNotGraded
|
|
<tr>
|
|
<th>_{MsgSheetTypeNotGraded}
|
|
$maybe _ <- hasPassings
|
|
<td colspan=2>
|
|
$maybe _ <- hasPoints
|
|
<td colspan=2>
|
|
<td>#{display nrNoGrade}
|
|
$maybe _ <- positiveSum $ bonusSummary ^. _numSheets
|
|
<p>_{MsgSheetTypeInfo}
|
|
$nothing
|
|
<p>_{MsgSheetTypeInfo} |