Bad start on complex tests - comp.lang.fortran

Message from discussion Bad start on complex tests

James Van Buskirk

View profile

More options May 16, 5:24 am

Newsgroups: comp.lang.fortran

From: "James Van Buskirk" <not_va...@comcast.net>

Date: Fri, 16 May 2008 03:24:17 -0600

Local: Fri, May 16 2008 5:24 am

Subject: Bad start on complex tests

  Reply to author
  |
  Forward
  | Print
  | View thread
  | Show original
  | Report this message
  | Find messages by this author
  

C:\gfortran\james\intrinsics\func1>type abs.f90
program abstest
complex(10) c10

c10 = ( 1.7951958020513104220_10, 2.6457513110645905904_10 )
write(*,*) 'Alive to here'
write(*,*) abs(c10)
write(*,*) 'Survived the ordeal'
end program abstest

C:\gfortran\james\intrinsics\func1>gfortran abs.f90 -oabs

C:\gfortran\james\intrinsics\func1>abs
Alive to here

C:\gfortran\james\intrinsics\func1>

--
write(*,*) transfer((/17.392111325966148d0,6.5794487871554595D-85, &
6.0134700243160014d-154/),(/'x'/)); end

Reply to author Forward