view Paper/src/MetaCodeSegment.agda @ 7:6a61c1eb0205

これを提出した
author soto <soto@cr.ie.u-ryukyu.ac.jp>
date Thu, 12 May 2022 15:44:39 +0900
parents 14a0e409d574
children
line wrap: on
line source

data CodeSegment {l1 l2 : Level} (A : Set l1) (B : Set l2) : Set (l ⊔ l1 ⊔ l2) where
  cs : {{_ : DataSegment A}} {{_ : DataSegment B}}
        -> (A -> B) -> CodeSegment A B