[AutoDiff] Remove 'valueWithDerivative(of:)' and 'valueWithGradient(of:)'.

`valueWithDerivative(of:)` and `valueWithGradient(of:)` are the curried version of `valueWithDerivative(at:in:)` and `valueWithGradient(at:in:)`, respectively. They are not included the proposal and are not being used by any client that I know of. This patch removes them.

Author: rxwei

stdlib/public/Differentiation/DifferentialOperators.swift

@@ -297,61 +297,3 @@ public func gradient<T, U, V, R>(
   where R : FloatingPoint, R.TangentVector == R {
   return { x, y, z in gradient(at: x, y, z, in: f) }
 }
-
-// Value with derivative (curried)
-
-@inlinable
-public func valueWithDerivative<T: FloatingPoint, R>(
-  of f: @escaping @differentiable (T) -> R
-) -> (T) -> (value: R, derivative: R.TangentVector)
-  where T.TangentVector == T {
-  return { x in valueWithDerivative(at: x, in: f) }
-}
-
-@inlinable
-public func valueWithDerivative<T: FloatingPoint, U: FloatingPoint, R>(
-  of f: @escaping @differentiable (T, U) -> R
-) -> (T, U) -> (value: R, derivative: R.TangentVector)
-  where T.TangentVector == T,
-        U.TangentVector == U {
-  return { (x, y) in valueWithDerivative(at: x, y, in: f) }
-}
-
-@inlinable
-public func valueWithDerivative<
-  T: FloatingPoint, U: FloatingPoint, V: FloatingPoint, R>(
-  of f: @escaping @differentiable (T, U, V) -> R
-) -> (T, U, V) -> (value: R, derivative: R.TangentVector)
-  where T.TangentVector == T,
-        U.TangentVector == U,
-        V.TangentVector == V {
-  return { (x, y, z) in valueWithDerivative(at: x, y, z, in: f) }
-}
-
-// Value with gradient (curried)
-
-@inlinable
-public func valueWithGradient<T, R>(
-  of f: @escaping @differentiable (T) -> R
-) -> (T) -> (value: R, gradient: T.TangentVector)
-  where R : FloatingPoint, R.TangentVector == R {
-  return { x in valueWithGradient(at: x, in: f) }
-}
-
-@inlinable
-public func valueWithGradient<T, U, R>(
-  of f: @escaping @differentiable (T, U) -> R
-) -> (T, U) -> (value: R, gradient: (T.TangentVector, U.TangentVector))
-  where R : FloatingPoint, R.TangentVector == R {
-  return { x, y in valueWithGradient(at: x, y, in: f) }
-}
-
-@inlinable
-public func valueWithGradient<T, U, V, R>(
-  of f: @escaping @differentiable (T, U, V) -> R
-) -> (T, U, V)
-  -> (value: R,
-      gradient: (T.TangentVector, U.TangentVector, V.TangentVector))
-  where R : FloatingPoint, R.TangentVector == R {
-  return { x, y, z in valueWithGradient(at: x, y, z, in: f) }
-}

test/AutoDiff/stdlib/differential_operators.swift.gyb

@@ -59,13 +59,6 @@ DifferentialOperatorTestSuite.test("gradient_curried_${arity}") {
   expectEqual(${expectedGradients}, gradF(${args}))
 }
 
-DifferentialOperatorTestSuite.test("valueWithGradient_curried_${arity}") {
-  let valueWithGradF = valueWithGradient(of: exampleDiffFunc_${arity})
-  let (value, grad) = valueWithGradF(${args})
-  expectEqual(${expectedValue}, value)
-  expectEqual(${expectedGradients}, grad)
-}
-
 % end
 
 runAllTests()