let strict_cell_type tags =
      List.exists tags (function `strict_about `cell_type -> true | _ -> false)