C     Definition de la fonction a integrer	
C     Dominique Lefebvre  Janvier 2007

   		REAL FUNCTION fn(x)
		
		REAL x

		fn = x*x
		
        RETURN
		END