p
Size: a a a
p
Т8
AZ
AZ
vectTake : (m: Nat) -> Vect n a -> Vect (minimum m n) a
vectTake Z _ = []
vectTake m [] = rewrite minimumZeroZeroLeft m in []
vectTake (S k) (x :: xs) = x :: vectTake k xs
Ты
ж помнишь)Т8
AZ
G
p
G
AZ
G
G
S n
пишутAZ
VS
VS
Т8
p
VS