1! { dg-do compile }
2! { dg-options "-std=gnu" }
3
4module module_implicit_conversion
5  ! double complex :: s = (1.0D0, 0D0)
6  double complex :: s = (1.0, 0D0)
7end module module_implicit_conversion
8