PROGRAM SIMPLE
	REAL angle, foo
C
	angle = 3.14285714/4
	foo = sin(angle)
	WRITE (6,20) foo
	foo = sqrt(4.0)
	WRITE (6,20) foo
20 	FORMAT('VALUE OF foo = ',F12.6)
	END