let mutable currInput = ref (createMagicArray ())

let rec updateCurrentFrameInfo () =
    async {
        let line = file.ReadLine() // hope we are faster to read than to process frames with DSP
        let mas = line.Split [|' '|]
        let tmp = Array.init MagicSize <| fun i ->
            { r = 0xFF &&& (int mas.[i + 3] >>> 16)
              g = 0xFF &&& (int mas.[i + 3] >>> 8)
              b = 0xFF &&& int mas.[i + 3] }

        // ??????????????? ref ???????????????
        currInput := tmp // no explicit lock
        do! updateCurrentFrameInfo()
    }