module SubfunctionWildcard where

subfunctionwildcard :: [a] -> [a] -> [a] -> [a]
subfunctionwildcard [] n1 n2 = n1
subfunctionwildcard [a] n1 n2 = a:n2
subfunctionwildcard [a,b] n1 n2 = b:a:n2
subfunctionwildcard [a,b,c] n1 n2 = c:a:b:n2
