mirror of
				https://github.com/nmvdw/HITs-Examples
				synced 2025-11-03 23:23:51 +01:00 
			
		
		
		
	union idem used for comprehension
This commit is contained in:
		@@ -54,9 +54,7 @@ Section operations.
 | 
				
			|||||||
    - apply nl.
 | 
					    - apply nl.
 | 
				
			||||||
    - apply nr.
 | 
					    - apply nr.
 | 
				
			||||||
    - intros; simpl.
 | 
					    - intros; simpl.
 | 
				
			||||||
      destruct (P x).
 | 
					      apply union_idem.
 | 
				
			||||||
      + apply idem.
 | 
					 | 
				
			||||||
      + apply nl.
 | 
					 | 
				
			||||||
  Defined.
 | 
					  Defined.
 | 
				
			||||||
        
 | 
					        
 | 
				
			||||||
  Definition single_product {A B : Type} (a : A) : FSet B -> FSet (A * B).
 | 
					  Definition single_product {A B : Type} (a : A) : FSet B -> FSet (A * B).
 | 
				
			||||||
 
 | 
				
			|||||||
		Reference in New Issue
	
	Block a user