OFFSET
1,2
MATHEMATICA
(* A377091list is defined at A377091 *)
PositionIndex[Map[Boole[# == Range[Min[#], Max[#]]] &, Abs[Most[SplitBy[A377091list[10000], Sign]]]]][1]
CROSSREFS
KEYWORD
nonn
AUTHOR
Paolo Xausa, Jan 25 2025
STATUS
approved
