1*11be35a1SLionel Sambuc double cabs(double _Complex); 2*11be35a1SLionel Sambuc cabs(double _Complex foo)3*11be35a1SLionel Sambucdouble cabs(double _Complex foo) 4*11be35a1SLionel Sambuc { 5*11be35a1SLionel Sambuc double d = __real__ foo; 6*11be35a1SLionel Sambuc return d + 0.1fi; 7*11be35a1SLionel Sambuc } 8