Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.
Announcements
FPGA community forums and blogs on community.intel.com are migrating to the new Altera Community and are read-only. For urgent support needs during this transition, please visit the FPGA Design Resources page or contact an Altera Authorized Distributor.
29280 Discussions

Re: crazy fortran

Steven_L_Intel1
Employee
‎07-19-2002 12:28 PM
646 Views
The 3Q1 isn't obsolete, just not supported in CVF. That's a REAL*16 constant.

The problem you're having with the FORMAT is that VAX FORTRAN was much more forgiving about leaving out commas than are the current Compaq F90 compilers. This works:

100	FORMAT(I7.4,Z8.2,G5.2e4,2p/TL7,Q,:$!L1,B12.9,J6
     X		SP,SS,BZ,Q,X'garbage')


Steve
0 Kudos

Link Copied

1 Reply
Steven_L_Intel1
Employee
‎07-20-2002 01:17 PM
646 Views
This program indeed contains multiple main programs and other issues that current Compaq compilers will complain about, but which VAX Fortran didn't at the time (though today's VAX Fortran will complain about some of the things in this code.)

This program is in no way supposed to be standard-conforming. It is a heavy user of extensions and usages that are disallowed in a complete program but passed the compilation phase (you could never have linked this code even when it was written.)

It's there for "entertainment purposes only".

Steve
0 Kudos
Copy link
Reply

Community support is provided Monday to Friday. Other contact methods are available here.

Intel does not verify all solutions, including but not limited to any file transfers that may appear in this community. Accordingly, Intel disclaims all express and implied warranties, including without limitation, the implied warranties of merchantability, fitness for a particular purpose, and non-infringement, as well as any warranty arising from course of performance, course of dealing, or usage in trade.

For more complete information about compiler optimizations, see our Optimization Notice.