bug in function type parameter variance checking

The typechecker accepts this:

``` ceylon
shared Boolean isInsideInterval<out Value>
        ([Value, Value] interval)(Value x)
        given Value satisfies Comparable<Value> 
        => let ([a,b]=interval) a <= x <= b;
```

That's inconsistent, since `Value` occurs contravariantly in the return type.
