1module RemoveBasicsCurry exposing (fullyApplied) 2 3 4fullyApplied f = 5 f ( "1", 2 ) 6 7 8fullyApplied_comments f = 9 ({- A -} f) ( {- B -} "1", {- C -} 2 ) 10 11 12partiallyApplied f = 13 \b -> f ( "1", b ) 14 15 16partiallyApplied_comments f = 17 \b -> ({- A -} f) ( {- B -} "1", b ) 18 19 20functionOnly f = 21 \a b -> f ( a, b ) 22 23 24functionOnly_comments f = 25 \a b -> ({- A -} f) ( a, b ) 26 27 28unapplied = 29 \f a b -> f ( a, b ) 30 31 32extraArgs f = 33 f ( 1, 2 ) 3 4 5 34 35 36qualified f = 37 f ( "1", 2 ) 38 39 40nested f = 41 f ( f ( 1, 2 ), 3 ) 42