()
| 690 | |
| 691 | #[test] |
| 692 | fn infer_const() { |
| 693 | let mut env = test_env(); |
| 694 | let mut tc = TypeChecker::new(&mut env); |
| 695 | let nat = AE::cnst(mk_id("Nat"), Box::new([])); |
| 696 | let ty = tc.infer(&nat).unwrap(); |
| 697 | // Nat : Sort 1 |
| 698 | assert_eq!(ty, sort1()); |
| 699 | } |
| 700 | |
| 701 | #[test] |
| 702 | fn infer_lam() { |