Skip to content

Commit

Permalink
More abstract composition
Browse files Browse the repository at this point in the history
  • Loading branch information
jtristan committed May 20, 2024
1 parent 979d243 commit 83ddf1e
Showing 1 changed file with 1 addition and 1 deletion.
Original file line number Diff line number Diff line change
Expand Up @@ -10,7 +10,7 @@ noncomputable section

namespace SLang

def Compose (nq1 nq2 : List T → SLang ) (l : List T) : SLang ( × ) := do
def Compose (nq1 nq2 : List T → SLang U) (l : List T) : SLang (U × U) := do
let A ← nq1 l
let B ← nq2 l
return (A,B)
Expand Down

0 comments on commit 83ddf1e

Please sign in to comment.