Subarreglos con elementos idénticos

Crea una función que reciba un arreglo bidimensional y devuelva la cantidad de subarreglos que contienen únicamente elementos idénticos.

Ejemplos

countIdentical([
  [1],
  [2],
  [3],
  [4]
]) ➞ 4

// Los arreglos de un solo elemento también cuentan como arreglos con elementos idénticos.


countIdentical([
  [1, 2],
  [2, 3],
  [3, 4],
  [4, 4]
]) ➞ 1


countIdentical([
  [33, 33],
  [5],
  ["a", "a"],
  [2, 2, 2],
  [1, 2, 2],
  [3, 1]
]) ➞ 4

// 4 arreglos con elementos idénticos: [33, 33], [5], ["a", "a"] y [2, 2, 2]


countIdentical([
  ["@", "@", "@", "@"],
  [2, 3], [3, 4], [4, 4]
]) ➞ 2

Notas

Los arreglos de un solo elemento se consideran, por definición, arreglos con elementos idénticos.