// Part of the Carbon Language project, under the Apache License v2.0 with LLVM
// Exceptions. See /LICENSE for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
// NOAUTOUPDATE

// TODO: Should this work?

package ExplorerTest api;

interface Vector {
  let Dim:! i32;
}
impl (i32, i32, i32) as Vector where .Dim = 3 {}

class Point(Scalar:! type, Dim:! i32) {}

fn F[Scalar:! type, V:! Vector where .Dim == 3](p: Point(Scalar, V.Dim), v: V) {}

fn G[Scalar:! type](p: Point(Scalar, 3)) {}
fn H[V:! Vector where .Dim == 3](v: V) {
  var p: Point(i32, V.Dim) = {};
  // CHECK:STDERR: COMPILATION ERROR: fail_match_in_deduction.carbon:[[@LINE+1]]: mismatch in non-deduced values, `(V).(Vector.Dim)` != `3`
  G(p);
}

fn Main() -> i32 {
  var p: Point(i32, 3) = {};
  // Deduce Point(Scalar, V.Dim) from Point(i32, 3).
  F(p, (0, 0, 0));
  // Deduce Point(Scalar, 3) from Point(i32, V.Dim).
  H((0, 0, 0));
  return 0;
}