subroutinestats_totalprivate
subroutine stats_total(site, described, b)
Write the row of totals of the list of files.
Arguments
| Name | Type | Intent | Attributes | Description |
|---|---|---|---|---|
| site | type(site_t) | in | the site | |
| described | logical | in | true if the table has descriptions | |
| b | type(buffer_t) | inout | the HTML |
Calls
Source
Show the code
subroutine stats_total(site, described, b)
type(site_t), intent(in) :: site !! the site
logical, intent(in) :: described !! true if the table has descriptions
type(buffer_t), intent(inout) :: b !! the HTML
type(file_stats_t) :: total
integer :: k
do k = 1, size(site%file_stats)
call add_stats(total, site%file_stats(k))
end do
call add(b, '<tfoot><tr><td>Total</td>')
call stats_cells(total, b)
if (described) call add(b, '<td></td>')
call add(b, '</tr></tfoot>'//achar(10))
end subroutine stats_total