let
class_of_status =
function
|
Unknown
->
"unknown"
|
Up_to_date
->
"good"
|
Outdated
->
"bad"