check18 = fnrk []
  where
    fnrk : [0] -> Bit
    fnrk [] = True