From e51f2c020c09445def41264c65da695b02e0e9ce Mon Sep 17 00:00:00 2001
From: Guillaume Melquiond
Date: Tue, 23 Jul 2019 17:54:27 +0200
Subject: Add test from #10551.

---
 test-suite/arithmetic/diveucl_21.v | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'test-suite/arithmetic')

diff --git a/test-suite/arithmetic/diveucl_21.v b/test-suite/arithmetic/diveucl_21.v
index b888c97be3..bd76df12ce 100644
--- a/test-suite/arithmetic/diveucl_21.v
+++ b/test-suite/arithmetic/diveucl_21.v
@@ -23,3 +23,7 @@ Check (eq_refl (0,0) <<: diveucl_21 1 1 0 = (0,0)).
 Check (eq_refl : diveucl_21 9223372036854775807 0 1 = (0,0)).
 Check (eq_refl (0,0) <: diveucl_21 9223372036854775807 0 1 = (0,0)).
 Check (eq_refl (0,0) <<: diveucl_21 9223372036854775807 0 1 = (0,0)).
+
+Check (eq_refl : diveucl_21 9305446873517 1793572051078448654 4930380657631323783 = (17407905077428, 3068214991893055266)).
+Check (eq_refl (17407905077428, 3068214991893055266) <: diveucl_21 9305446873517 1793572051078448654 4930380657631323783 = (17407905077428, 3068214991893055266)).
+Check (eq_refl (17407905077428, 3068214991893055266) <<: diveucl_21 9305446873517 1793572051078448654 4930380657631323783 = (17407905077428, 3068214991893055266)).
-- 
cgit v1.2.3