Sign in
gnu
/
gcc
/
cd2fd5facb5e1882d3f338ed456ae9536f7c0593
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
g77
/
20010426-1.f
blob: ce8cc4d10b3e1358fc366fbb7a4b4aded0bfd508 [
file
] [
log
] [
blame
]
c
{
dg
-
do
run
}
print
*,
cos
(
1.0
)
end