XL Fortran Enterprise Edition for AIX : User's Guide - IBM

c. type mytype
integer a
integer b
end type mytype
write(99,id=i) mytype(4,5)
3. For WRITE, when an output item is a temporary variable:
a. write(99,id=i) 99+100
b. write(99,id=i) a+b
c. external ff
real(8) ff
write(99,id=i) ff()
4. For WRITE, when an output item is an expression that is an array constructor:
write(99,id=i) (/1,2,3,4,5/)
5. For WRITE, when an output item is an expression that is a scalarized array:
integer a(5),b(5)
write(99,id=i) a+b
System Setup
Before a Fortran application that is using asynchronous I/O can run on an AIX
system, you must enable AIX asynchronous I/O. If you did not enable AIX
asynchronous I/O, a Fortran program using asynchronous I/O statements cannot
be loaded. This will result in the following messages being displayed:
Could not load program asyncio
Symbol kaio_rdwr in ksh is undefined
Symbol listio in ksh is undefined
Symbol acancel in ksh is undefined
Symbol iosuspend in ksh is undefined
Error was: Exec format error
For information on how to configure your system for asynchronous I/O, see
″Changing Attributes for Asynchronous I/O″ in AIX Version 4 Kernel Extensions and
Device Support Programming Concepts. If a Fortran program is not using Fortran
asynchronous I/O statements, it will run regardless of the availability of AIX
asynchronous I/O.
Linking
If there are no asynchronous I/O statements in an application, there is no change
in the way you build an application. For example, for dynamic linking, you
specify:
xlf95 -o t t.f
For static linking, you specify:
xlf95 -o t t.f -bnso -bnodelcsect -bI:/lib/syscalls.exp
If there are asynchronous I/O statements in an application, you need additional
command-line options for static linking. For example:
xlf95 -o t t.f -lc -bnso -bnodelcsect \
-bI:/lib/syscalls.exp -bI:/lib/aio.exp
Note that the additional options are -lc and -bI:/lib/aio.exp.
The following table summarizes the options that you need to bind applications in
different situations:
Implementation Details of XL Fortran Input/Output 339