LINUX.ORG.RU

История изменений

Исправление AndreyKl, (текущая версия) :

да, там я порядок параметров перепутал, должно быть так

case lenlt x (Cons 1 x) of
  Left prf => Some (after x (Cons 1 x) prf)
  Right prf => None

Исходная версия AndreyKl, :

да, там я похоже порядок параметров перепутал,
по моему должно быть так

case lenlt x (Cons 1 x) of
  Left prf => Some (after x (Cons 1 x) prf)
  Right prf => None