Absoft Fortran Compilers

The principals of Absoft, Peter Jacobson and Wood Lotz, met at the University of Michigan. Together they started an audio store, Absolute Sound, in 1975. In 1979, they noted the emergence of 16-bit microcomputers and saw a market for high quality Fortran compilers and built a compiler for the Western Digital WD16 microprocessor, which they released commercially in 1980. The name Absolute Software was used at first, but the shortened name Absoft was adopted as a more practical trademark.

Absoft's first major sales success was a $500K contract with Alpha Microsystems for worldwide redistribution rights of a Fortran 77 compiler compatible with their AMOS operating system using a Motorola 68000 series processor. At this point Absoft still consisted of only the two founders, so this success allowed the company to remain independent, add staff, and move to a larger office facility. Additional OEM contracts for Fortran compilers for various Unix variants followed. The founders hired a manager for Absolute Sound which continued its success and expanded to three stores; the chain was sold to a larger Hi-Fi chain in 1988.

MIL-STD-1753 was released by the DoD in 1978 to standardize some features of Industrial Real-Time Fortran as extensions of Fortran 77.[4][5] This extension added IMPLICIT NONE, DO WHILE, END DO to replace CONTINUE as the statement to end DO loops, and intrinsic functions for testing and setting bits. MIL-STD-1753 was absorbed into the ISO/IEC 1539:1991 standard and later ISO/IEC standards are MIL-STD-1753 compliant, and MIL-STD-1753 was dropped as superfluous in 1995.[6]

When Alpha Micro released their MC68000 based microcomputer, Absoft expanded their offerings to Motorola and the Macintosh. The availability of MD68000-based machines made 32-bit Unix viable on small machines, and Absoft offered Fortran compilers for Unix machines by Data General, HP, Sun Microsystems, Tektronix, and others.

In 1985 Microsoft licensed MacFortran, which consisted of a native ANSI FORTRAN 77 compiler and graphical debugger. Shortly thereafter, Microsoft contracted with Absoft to develop Microsoft Fortran for Macintosh, and a Microsoft BASIC compiler that was 100% syntax compatible with the existing Microsoft BASIC interpreter on the Macintosh. Apple was one of the first Mac Fortran customers, with a large order for Drexel University. Variations of the Fortran and BASIC compilers for Macintosh were marketed under the name A/C Fortran and A/C Basic for Amiga. Fortran compilers for Linux/Unix and Microsoft Windows followed.

The Mac and Amiga Fortran compilers included an Integrated development environment (IDE) and profiler. The IDE was added to the Windows compilers and is included in all succeeding Absoft Fortran compilers.

During the 1990s the broadened product lines and internet enabled Absoft to build a base of resellers worldwide. For a period of time in the mid-1990s Absoft had a full-time representative in California but expanded internet usage eliminated that position and allowed everything to be run out of a single location.

Screen shot from Absoft IDE, showing the optimization and parallel optimizations available by checking the appropriate box

Absoft Pro Fortan parallelization and optimization options are illustrated by the screen shot of the relevant options page to the right. Absoft Pro Fortran provides five levels of classical optimization and Speed Math options 0 through 9.

Parallelization options include auto parallelization as a check box with graphical indications of degrees of success on the source code in the editor pane as highlighting colors. OpenMP 3.0 is also available as a check box. Speed OpenMP is available as none or levels 0 through 5.

Absoft offers support for MPI (MPICH2 and Open MPI). ScaLAPACK and BLACS[15] is shipped with all platforms. IMSL 7.0, integrated but available as a separate license since the v. 7.0 release in 2011, supplies MPICH2.

Executing programs that use parallelization on machines that do not have Absoft Fortran installed requires inclusion of pthreadVC2.dll for 32-bit executables or, for 64-bit executables, pthreadVC2_64.dll. This library is distributed under the LGPL 2.1.

Some Fortran 2003 and Fortran 2008[16] extensions have been implemented as of April 2014 with version 14.0.3.[17]

Some Fortran 2003 extensions are available in current versions of Absoft Pro Fortran. Among these are:

• ISO_C_BINDING and ISO_FORTRAN_ENV
• ACOS, ASIN, and ATAN generics accept complex arguments
• COSH, SINH, and TANH generics accept complex arguments
• MOVE_ALLOC statement
• GET_COMMAND, GET_COMMAND_ARGUMENT and COMMAND_ARGUMENT_COUNT
• GET_ENVIRONMENT_VARIABLE
• FLUSH statement
• IS_IOSTAT_END and IS_IOSTAT_EOR
• ENUMERATOR and ENUM
• NEW_LINE
• ABSTRACT INTERFACE
• PROCEDURE pointers
• enhanced TYPE initialization
• POINTER bounds remapping
• recognizes ASYNCHRONOUS I/O specifiers
• IOMSG=string_variable_for_error_text_string I/O statement specifier
• IEEE exceptions
• VALUE statement and declaration attribute

Several Fortran 2008 extensions are available as of April 2014. More will be available with updates and new releases. Those available now include, but are not limited to:

• ACOSH, ASINH, ATANH intrinsics
• HYPOT intrinsic
• LEADZ and TRAILZ intrinsics
• POPCNT and POPPAR intrinsics
• empty CONTAINS section
• BESSEL_J0, BESSEL_J1, and BESSEL_JN intrinsic functions
• BESSEL_Y0, BESSEL_Y1, and BESSEL_YN intrinsics
• BGE, BGT, BLE, and BLT intrinsics
• DSHIFTL and DSHIFTR intrinsics
• SHIFTA, SHIFTL and SHIFTR intrinsics
• MASKL, MASKR and MERGE_BITS intrinsics
• EFC_SCALED, GAMMA and LOG_GAMMA intrinsics
• EXECUTE_COMMAND_LINE intrinsic
• IS_IOSTAT_END and IS_IOSTAT_EOF intrinsics
• SELECTED_CHAR_KIND intrinsic
• Allocatable components of derived types (data structures) (partial implementation)
• Pointer INTENT attribute

Screen shot from Absoft IDE, showing the libraries that are available for integration into the compiler by checking the appropriate box

All of these packages are included in the IDE and fully integrated into the compiler. Cost is included in purchase price except IMSL and GINO or Winteracter, which are sold separately. Installed packages can be selected for inclusion in a build by checkboxes on a tab on the Project Options menu as illustrated in the screen shot to the right. Some of these are detailed below.

The FX3 graphical debugger is bundled with all Absoft Pro Fortran releases. The FX3 graphical debugger is compatible with the GNU Compiler Collection (gcc) (on Macintosh and Linux), Apple C, Microsoft Visual Studio C/C++ (Windows only), and assembly language on all three platforms.

GINO[18] and Winteracter[19][20] are optional third-party APIs for creating complex 2D and 3D graphics and GUI applications using Fortran programs. GINO Lite (32-bit only, some restrictions) is bundled with Absoft Pro Fortran for Windows at no additional charge and is well suited for most users. Absoft offers licenses on all platforms for full versions of GINO or Winteracter that includes 64-bit support, has no limitations, and is integrated with the Absoft Pro Fortran suite.

Absoft is the only commercial Fortran vendor to offer IMSL Numerical Libraries bundles with Fortran compilers for Windows, Mac and Linux. Absoft is the only IMSL provider for MacOS. Absoft sells licenses for IMSL and documentation as unlocking codes that allow release of IMSL libraries and documentation from the Absoft installation software. Current releases ship with IMSL 7, the latest release.

For use in porting code written on UNIX or VAX systems, libraries of UNIX-specific and VAX-specific Fortran intrinsics are available by checking a box in the Project Options, Libraries/Tools window. Other extensions important for porting from other platforms, such as Cray pointers, are included in Absoft Pro Fortran as part of the compiler.

Linear Algebra Package (LAPACK) with Basic Linear Algebra Subprograms (BLAS), or BLAS alone, are offered as linkable libraries.

Hierarchical Data Format libraries HDF4 release 4.2.8 and HDF5 release 1.8.9 can be included by checking a box in the Project Options, Libraries/Tools window.

Network Common Data Form (NetCDF) version 4.3 is available by checking a box.

NVIDIA manufactures graphics cards that use arrays of Complete Unified Device Architecture (CUDA) graphics processing units. A special version of BLAS can be included in linking libraries by checking a box in the Project Options, Libraries/Tools window.

CAPS is a many-core compiler for using arrays of CUDA cores in a GPU for computation.

PLplot 5.9 is available by checking a box on the Project Options Libraries/Tools window. Bindings are available for both single and double precision, from FORTRAN 77 or Fortran 95 or for calling from Microsoft WIN32.

For all platforms, Absoft Pro Fortran links from user static or dynamic libraries provided by the system, other compilers, or the user. Absoft Pro Fortran has the capability to generate both static and dynamic libraries.

All Absoft compilers can be invoked and fully controlled form the command line. Since Absoft has used the system linker format for all platforms since version 10.0 in 2005, C/C++ object files can be linked with Absoft compiler object files, and integration with the most common C/C++ compilers is done by settings in the Absoft IDE.

The Absoft IDE is hard-wired to use the Absoft Fortran compilers, and is customizable to use a C/C++ compiler that produces object files compatible with the system linker.

The Microsoft/Macintosh Runtime Window Environment (MRWE)[21] option uses a Fortran 77 overarching main program that calls system GUI libraries to produce a windowed application. The MRWE environment is selected as an executable type in the IDE options for building an application. The default MRWE program maps input and output to a scrolling window similar to a command prompt, but the user retains all the output and can save it as a text file after the program exits. Hooks are provided in the MRWE GUI program to add Windows system calls to enhance the user interface, providing the potential for a full-featured Windows program written entirely in Fortran. MRWE source code is available as a starting point for an all-Fortran Win32 GUI application. MRWE was replaced by AWE in 2012 but is still available as a target environment for legacy programs.

The Absoft Window Environment (AWE[22]) is provided by selecting the application type in the GUI. When this is done, a file AWE_Preferences.f95 is added to your project. This Fortran file includes small procedures called during initialization that configure AWE by defining stack size for the interactive window, window size and behavior, and the font.

An AWE application can enhance the interactive console window menu items that can be used to execute program units and exit, providing a GUI for an interactive application. The program units can operate using pop-ups, menus, and display windows, so that the traditional console I/O is not used at all, and thus providing an all-Fortran GUI driven application on all three supported platforms.

AWE applications distributed for use without the Absoft compiler need to have libgomp.dll included with 32-bit executable files or libgompx64.dll for 64-bit executable files. These DLLs are released under the Free Software Foundation GNU General Public License (version 3 with GCC Library Exception).[23] The interactive pop-ups, graphics, and spreadsheets are accessed bu a use AWE_Interfaces statement. Distribution of executables with these features requires inclusion of QtCore4.dll and QtGui4.dll. Qt[24][25] is licensed under the LGPL v. 2.1.

Compiling as an AWE application maps standard input and output to a scrolling window similar to a command prompt, but the user retains all the output and has the option of saving it as a text file after the program exits. The other features, detailed below, are enabled by the use of an AWE application. An interactive AWE application can be written that does not use the interactive console at all, leaving this window available for use as a run log.

These functions are implemented through calls to procedures in the AWE_Interfaces module. Coding is about the same as would be needed for an interactive command-line window interface.[26]

Bar charts, pie charts and X-Y charts are supported through calls to procedures in the AWE_Interfaces module. Defaults provide simplified usage but a great deal of flexibility in output colors, line colors and widths, background, etc. are available if desired.[27]

Three-d plots including perspective x-y-z plots and contour plots also are supported through calls to procedures in the AWE_Interfaces module for the 2015 release and later.

You can create spread sheet windows in AWE to display rank 2 arrays. Subroutines are provided to open, close, read, write, and label spread sheets. Menu commands, described above, can be added to an AWE program to manipulate the data in the spread sheet.[28]