Skip to content

Instantly share code, notes, and snippets.

@tetsu-miyagawa

tetsu-miyagawa/CTMCP-Section2.9-8b.oz

Last active November 16, 2015 23:05
Show Gist options
  • Save tetsu-miyagawa/af4641d8a4782f963bfa to your computer and use it in GitHub Desktop.
Save tetsu-miyagawa/af4641d8a4782f963bfa to your computer and use it in GitHub Desktop.
Download ZIP
CTMCP Section 2.9 Exercise 8 (b)
Raw
CTMCP-Section2.9-8b.oz
declare OrElse
fun {OrElse BP1 BP2}
if {BP1} then true
else {BP2}
end
end
{Browse {OrElse fun {$} 1==1 end fun {$} 2==3 end}}
{Browse {OrElse fun {$} 1==2 end fun {$} 2==2 end}}
{Browse {OrElse fun {$} 1==2 end fun {$} 2==3 end}}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment