[Agda] Panic: CanSplit

Andreas Abel andreas.abel at ifi.lmu.de
Sun Jul 19 01:07:59 CEST 2009


Sorry, the definition of <= was messed up in my last message, the  
correct definition of heterogeneous inequality is of course:

data _<=_ : {n m : Nat} -> Fin n -> Fin m -> Set where
  Base : {n : Nat}{i : Fin n} -> i <= i
  Step : {n m : Nat}{i : Fin n}{j : Fin m} -> i <= j -> i <= fs j

fsLt : forall {n m : Nat} (i : Fin n)(j : Fin m) -> fs i <= fs j -> i  
<= j
fsLt i .i Base = Base
fsLt fz fz (Step ())
fsLt (fs i) fz (Step ())
fsLt i (fs j) (Step d) = Step (fsLt i j d)

On Jul 17, 2009, at 4:05 PM, Nils Anders Danielsson wrote:

> On 2009-07-17 14:31, Andreas Abel wrote:
>> maybe that is not what you want, but you can try heterogeneous  
>> inequality.
>> data _<=_ : {n m : Nat} -> Fin n -> Fin m -> Set where
>> Base : {n : Nat}{i : Fin n} -> i <= i
>> Step : {n m : Nat}{i : Fin n}{j : Fin m} -> i <= j -> fs i <= fs j
>
> This is equality, right?

-------------- next part --------------
A non-text attachment was scrubbed...
Name: LeqFin.agda
Type: application/octet-stream
Size: 627 bytes
Desc: not available
Url : https://lists.chalmers.se/mailman/private/agda/attachments/20090719/e1a1c3dc/LeqFin.obj
-------------- next part --------------



More information about the Agda mailing list