1 /*********************************************************/ 2 /*Proof Rule Declarations*/ 3 /*Examiner Pro Edition, Version 9.1.0, Build Date 20101119, Build 19039*/ 4 /*Copyright (C) 2010 Altran Praxis Limited, Bath, U.K.*/ 5 /*********************************************************/ 6 7 8 /*DATE : 22-SEP-2011 11:10:48.96*/ 9 10 /*procedure Simple_Greatest_Common_Divisor.G_C_D*/ 11 12 13rule_family g_c_d_rules: 14 X requires [X:any] & 15 X <= Y requires [X:ire, Y:ire] & 16 X >= Y requires [X:ire, Y:ire]. 17 18g_c_d_rules(1): integer__size >= 0 may_be_deduced. 19g_c_d_rules(2): integer__first may_be_replaced_by -2147483648. 20g_c_d_rules(3): integer__last may_be_replaced_by 2147483647. 21g_c_d_rules(4): integer__base__first may_be_replaced_by -2147483648. 22g_c_d_rules(5): integer__base__last may_be_replaced_by 2147483647. 23g_c_d_rules(6): natural__size >= 0 may_be_deduced. 24g_c_d_rules(7): natural__first may_be_replaced_by 0. 25g_c_d_rules(8): natural__last may_be_replaced_by 2147483647. 26g_c_d_rules(9): natural__base__first may_be_replaced_by -2147483648. 27g_c_d_rules(10): natural__base__last may_be_replaced_by 2147483647. 28