From owner-cvs-all Wed Jan 20 23:51:20 1999 Return-Path: Received: (from majordom@localhost) by hub.freebsd.org (8.8.8/8.8.8) id XAA29498 for cvs-all-outgoing; Wed, 20 Jan 1999 23:51:20 -0800 (PST) (envelope-from owner-cvs-all@FreeBSD.ORG) Received: from sax.sax.de (sax.sax.de [193.175.26.33]) by hub.freebsd.org (8.8.8/8.8.8) with ESMTP id XAA29490 for ; Wed, 20 Jan 1999 23:51:18 -0800 (PST) (envelope-from j@uriah.heep.sax.de) Received: (from uucp@localhost) by sax.sax.de (8.8.8/8.8.8) with UUCP id IAA01623 for committers@freebsd.org; Thu, 21 Jan 1999 08:51:08 +0100 (CET) (envelope-from j@uriah.heep.sax.de) Received: (from j@localhost) by uriah.heep.sax.de (8.9.1/8.9.1) id IAA29636; Thu, 21 Jan 1999 08:23:09 +0100 (MET) (envelope-from j) Message-ID: <19990121082307.33024@uriah.heep.sax.de> Date: Thu, 21 Jan 1999 08:23:07 +0100 From: J Wunsch To: committers@FreeBSD.ORG Subject: Anybody with FORTRAN knowledge? Reply-To: Joerg Wunsch Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Mailer: Mutt 0.88 X-Phone: +49-351-2012 669 X-PGP-Fingerprint: DC 47 E6 E4 FF A6 E9 8F 93 21 E0 7D F9 12 D6 4E Sender: owner-cvs-all@FreeBSD.ORG Precedence: bulk A question for anybody with some FORTRAN knowledge. I've stumpled across a FORTRAN (apparently f-77) program. (For the curious, it's some antenna numerical calculation called NEC, see ftp://ftp.qsl.net/pub/wb6tpu/nec/.) It doesn't compile cleanly on our f77 simulation. For one, there are labels like $DEBUG (conditional compilation?) and some float misalignment in a common block, which are easy to fix. However, when linking the program, it fails to find the FORTRAN functions CDABS, DREAL, CDSQRT, and CDEXP. Upon further investigation, it seems f2c calls those functions ZABS, REAL (which is applicable to both, COMPLEX*8 and COMPLEX*16 there), ZSQRT, and ZEXP. Now, are the `CD' names standard, and/or would it be appropriate to add the above (and similar) names as aliases in the f2c code? Doing so should be easy (it's all in intr.c). -- cheers, J"org joerg_wunsch@uriah.heep.sax.de -- http://www.sax.de/~joerg/ -- NIC: JW11-RIPE Never trust an operating system you don't have sources for. ;-) To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe cvs-all" in the body of the message