src/HOL/NSA/StarDef.thy
changeset 35043 07dbdf60d5ad
parent 35035 2c159d2cdae7
child 35050 9f841f20dca6
equal deleted inserted replaced
35042:a27b48967b26 35043:07dbdf60d5ad
   910 apply (transfer, erule (1) mult_right_mono)
   910 apply (transfer, erule (1) mult_right_mono)
   911 done
   911 done
   912 
   912 
   913 instance star :: (ordered_cancel_semiring) ordered_cancel_semiring ..
   913 instance star :: (ordered_cancel_semiring) ordered_cancel_semiring ..
   914 
   914 
   915 instance star :: (linlinordered_semiring_strict) linlinordered_semiring_strict
   915 instance star :: (linordered_semiring_strict) linordered_semiring_strict
   916 apply (intro_classes)
   916 apply (intro_classes)
   917 apply (transfer, erule (1) mult_strict_left_mono)
   917 apply (transfer, erule (1) mult_strict_left_mono)
   918 apply (transfer, erule (1) mult_strict_right_mono)
   918 apply (transfer, erule (1) mult_strict_right_mono)
   919 done
   919 done
   920 
   920 
   934 by (intro_classes, transfer, rule abs_if)
   934 by (intro_classes, transfer, rule abs_if)
   935 
   935 
   936 instance star :: (sgn_if) sgn_if
   936 instance star :: (sgn_if) sgn_if
   937 by (intro_classes, transfer, rule sgn_if)
   937 by (intro_classes, transfer, rule sgn_if)
   938 
   938 
   939 instance star :: (linlinordered_ring_strict) linlinordered_ring_strict ..
   939 instance star :: (linordered_ring_strict) linordered_ring_strict ..
   940 instance star :: (ordered_comm_ring) ordered_comm_ring ..
   940 instance star :: (ordered_comm_ring) ordered_comm_ring ..
   941 
   941 
   942 instance star :: (linordered_semidom) linordered_semidom
   942 instance star :: (linordered_semidom) linordered_semidom
   943 by (intro_classes, transfer, rule zero_less_one)
   943 by (intro_classes, transfer, rule zero_less_one)
   944 
   944