13 lines
203 B
C
13 lines
203 B
C
|
/* { dg-do compile } */
|
||
|
/* { dg-options "-O2" } */
|
||
|
|
||
|
double transport_sumexp(int numexp)
|
||
|
{
|
||
|
int k,j;
|
||
|
double xk1 = 1.0;
|
||
|
for(k=1; k<=numexp;k++)
|
||
|
for(j=1;j<=3;j++)
|
||
|
xk1 += 1.0;
|
||
|
return xk1;
|
||
|
}
|