- problem description:
-- 2 inputs A and B
-- 2 outputs A and B
-- each input data has to be copied to the corresponding output

-- inputs
inA :: [Int]
inA = [4, 5, -1, 9, 8, 5, 6]

inA :: [Int]
inA = [4, 5, -1, 9, 8, 5, 6]
inA = [4, 5, -1, 9, 8, 5, 6]