Help for this page
A basic technique is to use newtype declarations to declare separate
types for separate intents.
append (AnnotatedString x) (AnnotatedString y)
= AnnotatedString (x ++ y)
If x and y have the same safety level,
then (x ++ y) has again that same safety level.
type family Join a b
type instance Join Safe Safe = Safe
type instance Join Safe Unsafe = Unsafe
type instance Join Unsafe Safe = Unsafe
type instance Join Unsafe Unsafe = Unsafe
:: AnnotatedString a
-> AnnotatedString b
-> AnnotatedString (Join a b)
(x ++ y) is at least as safe as the least safe of x and y.
Throwing nuclear weapons into the sun
Making everybody on Earth disappear
A threat from an alien with a mighty robot
A new technology or communications medium
Providing a magic fish to a Miss Universe
Establishing a Group mind
Results (200 votes). Check out past polls.