Just use foldLeftany of the following
... foldLeft(Option.empty[X]) ...or ... foldLeft(None: Option[X]) ...or... foldLeft[Option[X]](None) ...
, fold foldLeft. fold, A1 A, , fold, , .
, Option[List[Int]] <: Option[Seq[Int]] , Any :
List(Some(List(1,2,3))).fold[Option[Seq[Int]]](None)((_, _) => Some(Seq(1)))
> res2: Option[Seq[Int]] = Some(List(1))
, , Option[X] Y, Y - ie Y <: Option[X], fold , .
. singleton? .