映射状态F::( t吨 -> 一 -> ( t吨 , [ b条 ])) -> t吨 -> F类 一 b条
映射状态F stf s0
映射状态F
机顶盒
机顶盒
机顶盒 时间: t吨 -> 一 -> ( t吨 , [ b条 ])
机顶盒
第0集 时间: t吨
countF=映射状态F count 0,其中count n _=(n+1,[n+1])
sumF=mapstateF add 0,其中add acc n=(acc+n,[acc+n])
mapstateF stf s0=absF(concatMapAccumlSP stf s0)