From ccf8229eed293d6d6a4b17f6a55d1d8085b7cd30 Mon Sep 17 00:00:00 2001 From: fanghr Date: Sat, 7 May 2022 17:00:59 +0800 Subject: [PATCH] small doc fix to `pisJust` --- agora/Agora/Utils.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/agora/Agora/Utils.hs b/agora/Agora/Utils.hs index 558bc13..f37712b 100644 --- a/agora/Agora/Utils.hs +++ b/agora/Agora/Utils.hs @@ -212,7 +212,7 @@ pfromMaybe = phoistAcyclic $ PJust a' -> a' PNothing -> e --- | Yield True if a given PMaybe is of form PJust _. +-- | Yield True if a given PMaybe is of form @'PJust' _@. pisJust :: forall a s. Term s (PMaybe a :--> PBool) pisJust = phoistAcyclic $ plam $ \v' ->