Sign in
gnu
/
gcc
/
cd2fd5facb5e1882d3f338ed456ae9536f7c0593
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
dec_math_4.f90
blob: f83210a473222c1033a00227a186b671e960e874 [
file
] [
log
] [
blame
]
!
{
dg
-
options
"-std=gnu"
}
!
{
dg
-
do
compile
}
!
Former
ICE
when
simplifying complex cotan
complex
,
parameter
::
z
=
cotan
((
1.
,
1.
))
print
*,
z
end