Make 'lattice' public
Signed-off-by: Danila Fedorin <danila.fedorin@gmail.com>
This commit is contained in:
		
							parent
							
								
									b1c6b4c99a
								
							
						
					
					
						commit
						6384f7006e
					
				| @ -20,7 +20,7 @@ IterProd k = iterate k (λ t → A × t) B | ||||
| -- To make iteration more convenient, package the definitions in Lattice | ||||
| -- records, perform the recursion, and unpackage. | ||||
| 
 | ||||
| private module _ where | ||||
| module _ where | ||||
|     lattice : ∀ {k : ℕ} → Lattice (IterProd k) | ||||
|     lattice {0} = record | ||||
|         { _≈_ = _≈₂_ | ||||
|  | ||||
		Loading…
	
		Reference in New Issue
	
	Block a user