Variance issue for `Function`

[oberblastmeister]

I'm pretty sure the A parameter for Function<A, R> should be contravariant, but it is covariant because of (PhantomData<A>, PhantomData<R>). Changing it to PhantomData<fn(A) -> R> should fix this