partial2 f a = \b -> (f a b)

add a b = a + b

myadd = partial2 add 21

main = do
    print (myadd 21); -- -> 42