view paper/src/PushPopType.agda.replaced @ 5:196ba119ca89

fix, and add mindmap->pdf
author ryokka
date Mon, 03 Feb 2020 21:47:43 +0900
parents c7acb9211784
children
line wrap: on
line source

pushOnce : Meta @$\rightarrow$@ Meta
pushOnce m = M.exec pushSingleLinkedStackCS m

popOnce : Meta @$\rightarrow$@ Meta
popOnce m = M.exec popSingleLinkedStackCS m

push-pop-type : Meta @$\rightarrow$@ Set@$\_{1}$@
push-pop-type meta =
    M.exec (M.csComp  (M.cs popOnce) (M.cs pushOnce)) meta @$\equiv$@ meta