#FIG 3.1
Portrait
Center
Inches
1200 2
2 1 2 1 -1 7 0 0 -1 3.000 0 0 -1 0 0 2
	 2400 4500 2400 600
2 2 0 1 -1 7 0 0 -1 0.000 0 0 -1 0 0 5
	 1200 600 3600 600 3600 4500 1200 4500 1200 600
2 2 0 1 -1 0 0 0 0 0.000 0 0 -1 0 0 5
	 1200 600 3600 600 3600 900 1200 900 1200 600
2 4 0 1 -1 0 0 0 1 0.000 0 0 7 0 0 5
	 3525 1500 1275 1500 1275 1200 3525 1200 3525 1500
2 4 0 1 -1 0 0 0 1 0.000 0 0 7 0 0 5
	 3525 2100 1275 2100 1275 1800 3525 1800 3525 2100
2 4 0 1 -1 0 0 0 1 0.000 0 0 7 0 0 5
	 3525 3000 1275 3000 1275 2700 3525 2700 3525 3000
2 2 0 1 -1 7 0 0 -1 0.000 0 0 -1 0 0 5
	 5400 600 7800 600 7800 4500 5400 4500 5400 600
2 1 2 1 -1 7 0 0 -1 3.000 0 0 -1 0 0 2
	 6600 4500 6600 600
2 4 0 1 -1 0 0 0 1 0.000 0 0 7 0 0 5
	 7725 1500 5475 1500 5475 1200 7725 1200 7725 1500
2 4 0 1 -1 0 0 0 1 0.000 0 0 7 0 0 5
	 7725 2400 5475 2400 5475 2100 7725 2100 7725 2400
2 2 0 1 -1 0 0 0 0 0.000 0 0 -1 0 0 5
	 5400 600 7800 600 7800 900 5400 900 5400 600
2 1 0 1 -1 7 0 0 -1 0.000 0 0 -1 1 1 2
	1 1 1.00 60.00 120.00
	1 1 1.00 60.00 120.00
	 3675 1950 5325 2250
4 0 -1 0 0 0 12 0.0000 4 135 570 2100 825 Module\001
4 0 -1 0 0 0 12 0.0000 4 180 1470 1650 1425 let f1(a: Int):Int = a\001
4 0 -1 0 0 0 12 0.0000 4 180 1740 1650 2025 let f2(a :Int):Int = 2 * a\001
4 0 -1 0 0 0 12 0.0000 4 135 570 6375 825 Module\001
4 0 -1 0 0 0 12 0.0000 4 180 675 6300 1425 import f2\001
4 0 -1 0 0 0 12 0.0000 4 180 390 6450 2325 f2(5)\001
4 0 -1 0 0 0 12 0.0000 4 180 675 2100 2925 export f2\001