Date: Thu, 11 Jul 2013 00:15:28 +0100 (BST) From: Anton Shterenlikht <mexas@bris.ac.uk> To: fortran@freebsd.org Subject: gfortran46: Error: Type of argument 'z' in call to 'dimag' at (1) should be COMPLEX(16), not COMPLEX(8) Message-ID: <201307102315.r6ANFSwG014115@mech-cluster241.men.bris.ac.uk>
next in thread | raw e-mail | index | archive | help
These errors are from french/aster on amd64. I think I need to rebuld lang/gcc after the recent updates to binutils, but anyway, which command line options to gfortran46 would lead to this error? These routines are GNU extensions specifically for complex(8), e.g.: http://gcc.gnu.org/onlinedocs/gcc-4.6.4/gfortran/AIMAG.html#AIMAG Messages de compilation ======================= /usr/ports/french/aster/work/aster-full-src-10.8.0/instdir/STA10.8/bibfor/algeline/dcargu.f:34.18: IF (DIMAG(C).GT.0.D0) THEN 1 Error: Type of argument 'z' in call to 'dimag' at (1) should be COMPLEX(16), not COMPLEX(8) /usr/ports/french/aster/work/aster-full-src-10.8.0/instdir/STA10.8/bibfor/algeline/dcargu.f:36.23: ELSE IF (DIMAG(C).LT.0.D0) THEN 1 Error: Type of argument 'z' in call to 'dimag' at (1) should be COMPLEX(16), not COMPLEX(8) /usr/ports/french/aster/work/aster-full-src-10.8.0/instdir/STA10.8/bibfor/algeline/dcargu.f:42.34: DCARGU = DBLE(ATAN2(DIMAG(C),DBLE(C))) 1 Error: Type of argument 'z' in call to 'dimag' at (1) should be COMPLEX(16), not COMPLEX(8) /usr/ports/french/aster/work/aster-full-src-10.8.0/instdir/STA10.8/bibfor/algeline/dcargu.f:44.34: DCARGU = DBLE(ATAN2(DIMAG(C),DBLE(C))) + PI 1 Error: Type of argument 'z' in call to 'dimag' at (1) should be COMPLEX(16), not COMPLEX(8) /usr/ports/french/aster/work/aster-full-src-10.8.0/instdir/STA10.8/bibfor/algeline/diaghr.f:89.45: IF (DBLE(SCALE).NE.0.0D0 .OR. DIMAG(SCALE).NE.0.0D0) 1 Error: Type of argument 'z' in call to 'dimag' at (1) should be COMPLEX(16), not COMPLEX(8) /usr/ports/french/aster/work/aster-full-src-10.8.0/instdir/STA10.8/bibfor/algeline/diares.f:46.35: CALL ZMULT (NEVEC, DCONJG(TAU(J)), EVEC(J,1), LDEVEC) 1 Error: Type of argument 'z' in call to 'dconjg' at (1) should be COMPLEX(16), not COMPLEX(8) /usr/ports/french/aster/work/aster-full-src-10.8.0/instdir/STA10.8/bibfor/algeline/diares.f:51.23: DELTA = DIMAG(A(NR,NR))*ABS(A(NR,NR-1)) 1 Error: Type of argument 'z' in call to 'dimag' at (1) should be COMPLEX(16), not COMPLEX(8)
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201307102315.r6ANFSwG014115>