let cell_type_to_string = function | Entry -> "entry" | Stat -> "stat" | Result -> "result" | Classic -> "classic"