rail, 625 bytes

Result

WA

Code [DL]

$ ':'
 \
  \-(!a!)(a)(a)#

$ 'pop'
 \
  \-(!a!)#


$ 'getb'
 \                           /-{pop}i{pop}(r)#
  \-80--(!r!)---{:}0g-------<
     /                       |
     |   /-0-                | 
     \-a--   >-q[0]im2(r)s1--/
         \-1-


$ 'isok'
 \                                /-(r)-#
  \-2m(!q!)[0](!r!)55m--{:}1a0g--<
                      /           |
 @-------------------/            |
   \           \                  |
   |           >-q(q)ma1{:}{:}s1--/
   \-(!r!)[1]-/

$ 'f'
 \
  \--{getb}{isok}o-#

$ 'main' 
 |
 5
 9
 m
 5
 a           #
 \----{:}0g-<
   /         |
   |         |
   \-{f}s1---/

stdin

11001110
00000110
00011011
00110001
01001110
10110101
01101001
00000011
10100000
00100100
01110111
00110111
00000000
11010010
10111101
01111000
00101000
01000001
00010101
01001111
10110000
11100111
00010111
10110100
00001111
00000011
10011001
00011100
11010000
00010001
00010100
00000001
10110011
11010100
01101010
01000010
01011011
10001000
11000101
11011001
11111101
00101101
01111000
10101011
11000100
11011100
00001010
10111110
10011100
01110101

stdout

stderr

Crash: Type mismatch

strace