fun main () = s <- source (Some "B"); r <- source None; let val onc = v <- get s; alert ("Now it's " ^ show v) val onc_r = v <- get r; alert ("Changed to " ^ show v) in return

First group

Wilbur Walbur

Hello, I'm {[s]}}/>. I'll be your waiter for this evening.

Second group

X Y Z

Value: {[r]}}/>

end