1! { dg-options "-O2" } 2real*8 function f(x) 3t1 = g(0) 4if(x .eq. 0) then 5 f = 0 6else if(x .eq. 1) then 7 f = t1 *log( t1 ) 8end if 9end 10