blob: 0ecd3ac92df4554d06e1f8b77931c61aad409d4a (
plain)
1
2
3
4
5
6
7
8
9
10
|
val pA = fn size1 => fn size2 => fn size3 => <html><body>
<p><font size={size1}>Hello</font> <font size={size2}>World!</font></p>
<p><font size={size3}>Epilogue</font></p>
</body></html>
val main = fn () => <html><body>
<li> <a link={pA 5 10 1}>Size 5</a></li>
<li> <a link={pA 10 5 10}>Size 10</a></li>
</body></html>
|
