           /*********************************************************/
                           /*Proof Rule Declarations*/
                             /*Examiner GPL Edition*/

           /*********************************************************/


          /*procedure Process_Dns_Request.Set_TTL_Data_SOA_Response*/


rule_family set_ttl_data_rules:
     X      requires [X:any] &
     X <= Y requires [X:ire, Y:ire] &
     X >= Y requires [X:ire, Y:ire].

set_ttl_data_rules(1): integer__size >= 0 may_be_deduced.
set_ttl_data_rules(2): integer__first may_be_replaced_by -2147483648.
set_ttl_data_rules(3): integer__last may_be_replaced_by 2147483647.
set_ttl_data_rules(4): integer__base__first may_be_replaced_by -2147483648.
set_ttl_data_rules(5): integer__base__last may_be_replaced_by 2147483647.
set_ttl_data_rules(6): character__size >= 0 may_be_deduced.
set_ttl_data_rules(7): character__first may_be_replaced_by 0.
set_ttl_data_rules(8): character__last may_be_replaced_by 255.
set_ttl_data_rules(9): character__base__first may_be_replaced_by 0.
set_ttl_data_rules(10): character__base__last may_be_replaced_by 255.
set_ttl_data_rules(11): positive__size >= 0 may_be_deduced.
set_ttl_data_rules(12): positive__first may_be_replaced_by 1.
set_ttl_data_rules(13): positive__last may_be_replaced_by 2147483647.
set_ttl_data_rules(14): positive__base__first may_be_replaced_by -2147483648.
set_ttl_data_rules(15): positive__base__last may_be_replaced_by 2147483647.
set_ttl_data_rules(16): dns_types__packet_bytes_range__size >= 0 may_be_deduced.
set_ttl_data_rules(17): dns_types__packet_bytes_range__first may_be_replaced_by 1.
set_ttl_data_rules(18): dns_types__packet_bytes_range__last may_be_replaced_by 8180.
set_ttl_data_rules(19): dns_types__packet_bytes_range__base__first may_be_replaced_by -2147483648.
set_ttl_data_rules(20): dns_types__packet_bytes_range__base__last may_be_replaced_by 2147483647.
set_ttl_data_rules(21): dns_types__byte__size >= 0 may_be_deduced.
set_ttl_data_rules(22): dns_types__byte__size may_be_replaced_by 8.
set_ttl_data_rules(23): dns_types__byte__first may_be_replaced_by 0.
set_ttl_data_rules(24): dns_types__byte__last may_be_replaced_by 255.
set_ttl_data_rules(25): dns_types__byte__base__first may_be_replaced_by 0.
set_ttl_data_rules(26): dns_types__byte__base__last may_be_replaced_by 255.
set_ttl_data_rules(27): dns_types__byte__modulus may_be_replaced_by 256.
set_ttl_data_rules(28): unsigned_types__unsigned16__size >= 0 may_be_deduced.
set_ttl_data_rules(29): unsigned_types__unsigned16__first may_be_replaced_by 0.
set_ttl_data_rules(30): unsigned_types__unsigned16__last may_be_replaced_by 65535.
set_ttl_data_rules(31): unsigned_types__unsigned16__base__first may_be_replaced_by 0.
set_ttl_data_rules(32): unsigned_types__unsigned16__base__last may_be_replaced_by 65535.
set_ttl_data_rules(33): unsigned_types__unsigned16__modulus may_be_replaced_by 65536.
set_ttl_data_rules(34): unsigned_types__unsigned32__size >= 0 may_be_deduced.
set_ttl_data_rules(35): unsigned_types__unsigned32__first may_be_replaced_by 0.
set_ttl_data_rules(36): unsigned_types__unsigned32__last may_be_replaced_by 4294967295.
set_ttl_data_rules(37): unsigned_types__unsigned32__base__first may_be_replaced_by 0.
set_ttl_data_rules(38): unsigned_types__unsigned32__base__last may_be_replaced_by 4294967295.
set_ttl_data_rules(39): unsigned_types__unsigned32__modulus may_be_replaced_by 4294967296.
set_ttl_data_rules(40): rr_type__classtype__size >= 0 may_be_deduced.
set_ttl_data_rules(41): rr_type__classtype__first may_be_replaced_by rr_type__internet.
set_ttl_data_rules(42): rr_type__classtype__last may_be_replaced_by rr_type__hs.
set_ttl_data_rules(43): rr_type__classtype__base__first may_be_replaced_by rr_type__internet.
set_ttl_data_rules(44): rr_type__classtype__base__last may_be_replaced_by rr_type__hs.
set_ttl_data_rules(45): rr_type__classtype__pos(
     rr_type__classtype__first) may_be_replaced_by 0.
set_ttl_data_rules(46): rr_type__classtype__pos(rr_type__internet) may_be_replaced_by 0.
set_ttl_data_rules(47): rr_type__classtype__val(0) may_be_replaced_by 
     rr_type__internet.
set_ttl_data_rules(48): rr_type__classtype__pos(rr_type__cs) may_be_replaced_by 1.
set_ttl_data_rules(49): rr_type__classtype__val(1) may_be_replaced_by 
     rr_type__cs.
set_ttl_data_rules(50): rr_type__classtype__pos(rr_type__ch) may_be_replaced_by 2.
set_ttl_data_rules(51): rr_type__classtype__val(2) may_be_replaced_by 
     rr_type__ch.
set_ttl_data_rules(52): rr_type__classtype__pos(rr_type__hs) may_be_replaced_by 3.
set_ttl_data_rules(53): rr_type__classtype__val(3) may_be_replaced_by 
     rr_type__hs.
set_ttl_data_rules(54): rr_type__classtype__pos(
     rr_type__classtype__last) may_be_replaced_by 3.
set_ttl_data_rules(55): rr_type__classtype__pos(succ(X)) may_be_replaced_by 
     rr_type__classtype__pos(X) + 1
     if [X <=rr_type__hs, X <> rr_type__hs].
set_ttl_data_rules(56): rr_type__classtype__pos(pred(X)) may_be_replaced_by 
     rr_type__classtype__pos(X) - 1
     if [X >=rr_type__internet, X <> rr_type__internet].
set_ttl_data_rules(57): rr_type__classtype__pos(X) >= 0 may_be_deduced_from
     [rr_type__internet <= X, X <= rr_type__hs].
set_ttl_data_rules(58): rr_type__classtype__pos(X) <= 3 may_be_deduced_from
     [rr_type__internet <= X, X <= rr_type__hs].
set_ttl_data_rules(59): rr_type__classtype__val(X) >= 
     rr_type__internet may_be_deduced_from
     [0 <= X, X <= 3].
set_ttl_data_rules(60): rr_type__classtype__val(X) <= rr_type__hs may_be_deduced_from
     [0 <= X, X <= 3].
set_ttl_data_rules(61): succ(rr_type__classtype__val(X)) may_be_replaced_by 
     rr_type__classtype__val(X+1)
     if [0 <= X, X < 3].
set_ttl_data_rules(62): pred(rr_type__classtype__val(X)) may_be_replaced_by 
     rr_type__classtype__val(X-1)
     if [0 < X, X <= 3].
set_ttl_data_rules(63): rr_type__classtype__pos(
     rr_type__classtype__val(X)) may_be_replaced_by X
     if [0 <= X, X <= 3].
set_ttl_data_rules(64): rr_type__classtype__val(
     rr_type__classtype__pos(X)) may_be_replaced_by X
     if [rr_type__internet <= X, X <= rr_type__hs].
set_ttl_data_rules(65): rr_type__classtype__pos(X) <= 
     rr_type__classtype__pos(Y) & X <= Y are_interchangeable 
     if [rr_type__internet <= X, X <= rr_type__hs, 
     rr_type__internet <= Y, Y <= rr_type__hs].
set_ttl_data_rules(66): rr_type__classtype__val(X) <= 
     rr_type__classtype__val(Y) & X <= Y are_interchangeable 
     if [0 <= X, X <= 3, 0 <= Y, Y <= 3].
set_ttl_data_rules(67): rr_type__wirestringtypeindex__size >= 0 may_be_deduced.
set_ttl_data_rules(68): rr_type__wirestringtypeindex__first may_be_replaced_by 1.
set_ttl_data_rules(69): rr_type__wirestringtypeindex__last may_be_replaced_by 129.
set_ttl_data_rules(70): rr_type__wirestringtypeindex__base__first may_be_replaced_by -2147483648.
set_ttl_data_rules(71): rr_type__wirestringtypeindex__base__last may_be_replaced_by 2147483647.
set_ttl_data_rules(72): rr_type__wirestringtype__size >= 0 may_be_deduced.
set_ttl_data_rules(73): rr_type__resourcerecordtype__size >= 0 may_be_deduced.
set_ttl_data_rules(74): A = B may_be_deduced_from
     [goal(checktype(A,rr_type__resourcerecordtype)),
      goal(checktype(B,rr_type__resourcerecordtype)),
      fld_ttlinseconds(A) = fld_ttlinseconds(B),
      fld_class(A) = fld_class(B)].
set_ttl_data_rules(75): rr_type__soa_record_type__soarecordtype__size >= 0 may_be_deduced.
set_ttl_data_rules(76): A = B may_be_deduced_from
     [goal(checktype(A,rr_type__soa_record_type__soarecordtype)),
      goal(checktype(B,rr_type__soa_record_type__soarecordtype)),
      fld_inherit(A) = fld_inherit(B),
      fld_nameserver(A) = fld_nameserver(B),
      fld_email(A) = fld_email(B),
      fld_serialnumber(A) = fld_serialnumber(B),
      fld_refresh(A) = fld_refresh(B),
      fld_retry(A) = fld_retry(B),
      fld_expiry(A) = fld_expiry(B),
      fld_minimum(A) = fld_minimum(B)].
