]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - gdb/testsuite/gdb.fortran/complex.f
Update year range in copyright notice of all files owned by the GDB project.
[thirdparty/binutils-gdb.git] / gdb / testsuite / gdb.fortran / complex.f
CommitLineData
32d0add0 1c Copyright 2007-2015 Free Software Foundation, Inc.
be444858
DJ
2
3c This program is free software; you can redistribute it and/or modify
4c it under the terms of the GNU General Public License as published by
e22f8b7c 5c the Free Software Foundation; either version 3 of the License, or
be444858 6c (at your option) any later version.
e22f8b7c 7c
be444858
DJ
8c This program is distributed in the hope that it will be useful,
9c but WITHOUT ANY WARRANTY; without even the implied warranty of
10c MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11c GNU General Public License for more details.
e22f8b7c 12c
be444858 13c You should have received a copy of the GNU General Public License
e22f8b7c 14c along with this program. If not, see <http://www.gnu.org/licenses/>.
be444858
DJ
15
16 real*8 a,b
17 complex*16 c
18
19 a = 1000
20 b = -50
21 c = cmplx(a,b)
22 write(*,*) s
23 stop
24 end