In addition, NAG recommends that before calling any Library routine you should read the following reference material (see Section 5):
(a) Essential Introduction
(b) Chapter Introduction
(c) Routine Document
The libraries supplied with this implementation have been compiled in a manner that facilitates the use of multiple threads.
http://www.nag.com/doc/inun/fl22/w32dcl/postrelease.html
for details of any new information related to the applicability or usage of this implementation.
This implementation of the NAG Library is appropriate for use with the compilers described in Section 2.1 of the Installer's Note. Although it contains DLL versions of the NAG Library these are not intended for use from other packages and environments such as Visual Basic or Excel; see the post release information page on our website (described in Section 2 above) for further details.
In this section we assume that the Library has been installed in the default folder:
c:\Program Files\NAG\FL22\flw3222dclIf this folder does not exist, please consult the system manager (or the person who did the installation). In some of the following subsections, this folder is referred to as install dir.
We also assume that the default shortcut for the Library command prompt is placed in the Start Menu under:
Start|All Programs|NAG|FL22|
If this shortcut does not exist, please consult the system manager (or the person who did the installation).
If you are using one of the DLL forms of the Library (see Section 3.1.1), you need to ensure that the NAG DLL (FLW3222DC_mkl.dll or FLW3222DC_nag.dll) is accessible at run time; therefore the install dir\bin folder must be on the path. If an MKL-based version of the Library is to be used, the install dir\MKL_ia32_10.1\bin folder must also be on the path, but should appear later in the path than the install dir\bin folder, since the NAG versions of a few BLAS/LAPACK routines are included in the NAG Libraries to avoid problems with the vendor versions. (See Section 4 for details.) Note that the Intel Fortran run-time libraries libifcoremd.dll and libmmd.dll are expected to be accessible via the path too. If they are not, you may run the batch file ifort_rtls.bat in the install dir\bin folder to make the Intel Fortran 10.1 version of these files available from that folder.
To check the accessibility of the NAG DLLs, run the program NAG_Fortran_DLL_info.exe which is available from the Start Menu shortcut
Start|All Programs|NAG|FL22|NAG Fortran Library - Intel Fortran (FLW3222DCL). Check AccessibilitySee Section 4.2.3 of the Installer's Note for details of this utility.
The shortcut:
Start|All Programs|NAG|FL22|NAG Fortran Library - Intel Fortran (FLW3222DCL). Command Prompt
may be used to start a command prompt window with the correct settings for the INCLUDE, LIB and PATH environment variables for the Library and the supplied MKL.
If the shortcut is not used, you can set the environment variables by running the batch file envvars.bat for this implementation. The default location of this file is:
c:\Program Files\NAG\FL22\flw3222dcl\batch\envvars.batIf the file is not in the default location, you can locate it by searching for the file envvars.bat containing flw3222dcl.
You may then compile and link to the NAG Fortran Library on the command line using one of the following commands:
ifort /MT driver.f nag_mkl_MT.lib user32.lib libguide.lib mkl_intel_c.lib mkl_intel_thread.lib mkl_core.lib ifort /MT driver.f nag_nag_MT.lib user32.lib ifort /MD driver.f nag_mkl_MD.lib user32.lib libguide40.lib mkl_intel_c_dll.lib mkl_intel_thread_dll.lib mkl_core_dll.lib ifort /MD driver.f nag_nag_MD.lib user32.lib ifort /MD driver.f FLW3222DC_mkl.lib libguide40.lib mkl_intel_c_dll.lib mkl_intel_thread_dll.lib mkl_core_dll.lib ifort /MD driver.f FLW3222DC_nag.libwhere driver.f is your application program. Note that each command should be issued on a single line; some of the commands are shown split over two lines here to avoid truncation if this note is printed. The order of the libraries is important because certain parts of the MKL should not be used (see Section 4).
The first two commands use libraries compiled with the /MT option. The first command will use the static library without the NAG version of the BLAS/LAPACK procedures (nag_mkl_MT.lib) and the MKL static libraries. The second command will use the library with the NAG version of the BLAS/LAPACK procedures (nag_nag_MT.lib). The option /MT must be used to ensure linking with the correct run-time libraries (multithreaded static run-time libraries in this case).
The third and fourth commands use static libraries compiled with the /MD option. The third command will use the static library without the NAG version of the BLAS/LAPACK procedures (nag_mkl_MD.lib) and the MKL DLLs. The fourth command will use the library with the NAG version of the BLAS/LAPACK procedures (nag_nag_MD.lib). The option /MD must be used to ensure linking with the correct run-time libraries (multithreaded dynamic link run-time libraries in this case).
The last two commands use DLL import libraries compiled with the /MD option. The fifth command will use the DLL without the NAG version of the BLAS/LAPACK procedures (FLW3222DC_mkl.lib) and the MKL DLLs. The last command will use the DLL with the NAG version of the BLAS/LAPACK procedures (FLW3222DC_nag.lib). The option /MD must be used to ensure linking with the correct run-time libraries.
Note that /MT is equivalent to specifying
If your program uses multiple threads, you should also compile with the /automatic option, e.g.:
ifort /MT /automatic driver.f nag_mkl_MT.lib user32.lib libguide.lib mkl_intel_c.lib mkl_intel_thread.lib mkl_core.lib
Please note that the Intel Visual Fortran compiler environment variables must be set in the command window. For more details refer to the User's Guide for the compiler.
The interface block is simply accessed by inserting a USE statement as described in greater detail in Section 3.2.
Whilst the above changes will apply to every Intel Fortran project, the following tasks need to be performed for each individual Intel Fortran project.
The library is intended to be run in fully optimised mode, so to avoid any warning messages, you might decide to set the active configuration to Release. You can do this from the Toolbar or alternatively via the Build|Configuration Manager menus. Note that if you work in Debug mode, you may receive a warning message about conflicting C run-time libraries.
There are a number of ways to add the NAG Library to the project. We describe just two; choose the one that most suits you.
If the Solution Explorer window is open then make sure that group project (the first line) is NOT selected. From the Project menu, choose the project Properties item. (Alternatively right-click on a specific single project in the Solution Explorer and choose Properties.)
From the form, click Linker in the leftmost panel and then choose Input. The right hand panel will now have an Additional Dependencies entry, and you need to type nag_mkl_MT.lib user32.lib libguide.lib mkl_intel_c.lib mkl_intel_thread.lib mkl_core.lib in this location to use the nag_mkl_MT.lib library and MKL. Please note that the six libraries are separated by a space only and that nag_mkl_MT.lib must be the first one. Press the OK button. If you wish to use the self-contained NAG Library nag_nag_MT.lib then you need to add nag_nag_MT.lib user32.lib instead of the six libraries above. Similary, to use one of the other NAG Libraries, insert the appropriate library or libraries (as detailed in Section 3.1.1) in the Additional Dependencies field.
The Properties information may also be accessed via the Toolbar. With the project selected in Solution Explorer, choose the Properties Window button on the Toolbar. In the ensuing window choose then the rightmost Property Pages icon. As in the paragraph above, from the form click Linker in the leftmost panel and then choose Input. The right hand panel will now have an Additional Dependencies entry, and you need to type the names of the relevant libraries in this location.
Before you can compile the project you need to specify the correct run-time library needed. From the Properties Window, click Fortran in the leftmost panel and then choose Libraries. The right hand panel will now have a Runtime Library entry, and you need to select Multithreaded if your project uses one of the two libraries nag_nag_MT.lib or nag_mkl_MT.lib. If your projects uses any of the other NAG libraries you need to select Multithreaded DLL. After you select the correct run-time library press the OK button.
For a multithreaded application, as well as selecting a multithreaded run-time library, you should set the /automatic (or /Qauto) compiler flag, to ensure that all local variables are allocated on the stack. To set this option, from the Properties form click Fortran and then choose Data. Click on the Local Variable Storage entry in the right hand panel and select Local Variables AUTOMATIC from the drop-down list. Press the OK button to accept the changes and close the form.
In summary the setting of the project Additional Dependencies, the project Runtime Library and the PATH environment variable must be consistent as follows:
The project should now compile and link using the appropriate choice from the Build menu.
To run a program that does not require input or output redirected from standard input or standard output, from within the Microsoft Development Environment, the program may be executed via the Debug menu (by selecting Start Without Debugging, for example).
If a data file needs to be attached to the standard input or the output of a program needs to be redirected to the standard output, we recommend that you run the executable from a command prompt window to avoid the limitations of Visual Studio .NET.
Start|All Programs|NAG|FL22|NAG Fortran Library - Intel Fortran (FLW3222DCL). Check AccessibilitySee Section 4.2.3 of the Installer's Note for details of this utility.
Note that this program should be closed after use (by pressing a key to dismiss the window), otherwise performance may be impared.
(a) subroutines are called as such;
(b) functions are declared with the right type;
(c) the correct number of arguments are passed; and
(d) all arguments match in type and structure.
These interface blocks have been generated automatically by analysing the source code for the NAG Fortran Library. As a consequence, and because these files have been thoroughly tested, their use is recommended in preference to writing your own declarations.
The NAG Fortran Library interface block files are organised by Library chapter. The module names are:
nag_f77_a_chapter nag_f77_c_chapter nag_f77_d_chapter nag_f77_e_chapter nag_f77_f_chapter nag_f77_g_chapter nag_f77_h_chapter nag_f77_m_chapter nag_f77_p_chapter nag_f77_s_chapter nag_f77_x_chapterThese are supplied in pre-compiled form (.mod files).
If you use the Library command prompt shortcut or set the environment variables by running the batch file envvars.bat for this implementation (see Section 3.1.1), you can use any of the commands described in Section 3.1.1 to access these modules since the environment variable INCLUDE will be set.
In order to make use of these modules from existing Fortran 77 code, the following changes need to be made:
The above steps need to be done for each unit (main program, function or subroutine) in your code.
These changes are illustrated by showing the conversion of the Fortran 77 version of the example program for NAG Fortran Library routine D01DAF. Please note that this is not exactly the same as the example program that is distributed with this implementation. Each change is surrounded by comments boxed with asterisks.
* D01DAF Example Program Text * Mark 14 Revised. NAG Copyright 1989. ***************************************************** * Add USE statements for relevant chapters * USE NAG_F77_D_CHAPTER, ONLY: D01DAF * * ***************************************************** * .. Parameters .. INTEGER NOUT PARAMETER (NOUT=6) * .. Local Scalars .. DOUBLE PRECISION ABSACC, ANS, YA, YB INTEGER IFAIL, NPTS * .. External Functions .. DOUBLE PRECISION FA, FB, PHI1, PHI2A, PHI2B EXTERNAL FA, FB, PHI1, PHI2A, PHI2B * .. External Subroutines .. ****************************************************** * EXTERNAL declarations need to be removed. * * EXTERNAL D01DAF * * ****************************************************** * .. Executable Statements .. WRITE (NOUT,*) 'D01DAF Example Program Results' YA = 0.0D0 YB = 1.0D0 ABSACC = 1.0D-6 WRITE (NOUT,*) IFAIL = 1 * CALL D01DAF(YA,YB,PHI1,PHI2A,FA,ABSACC,ANS,NPTS,IFAIL) * IF (IFAIL.LT.0) THEN WRITE (NOUT,99998) ' ** D01DAF returned with IFAIL = ', IFAIL ELSE * WRITE (NOUT,*) 'First formulation' WRITE (NOUT,99999) 'Integral =', ANS WRITE (NOUT,99998) 'Number of function evaluations =', NPTS IF (IFAIL.GT.0) WRITE (NOUT,99998) 'IFAIL = ', IFAIL WRITE (NOUT,*) WRITE (NOUT,*) 'Second formulation' IFAIL = 1 * CALL D01DAF(YA,YB,PHI1,PHI2B,FB,ABSACC,ANS,NPTS,IFAIL) * WRITE (NOUT,99999) 'Integral =', ANS WRITE (NOUT,99998) 'Number of function evaluations =', NPTS IF (IFAIL.GT.0) WRITE (NOUT,99998) 'IFAIL = ', IFAIL END IF * 99999 FORMAT (1X,A,F9.4) 99998 FORMAT (1X,A,I5) END * DOUBLE PRECISION FUNCTION PHI1(Y) * .. Scalar Arguments .. DOUBLE PRECISION Y * .. Executable Statements .. PHI1 = 0.0D0 RETURN END * DOUBLE PRECISION FUNCTION PHI2A(Y) * .. Scalar Arguments .. DOUBLE PRECISION Y * .. Intrinsic Functions .. INTRINSIC SQRT * .. Executable Statements .. PHI2A = SQRT(1.0D0-Y*Y) RETURN END * DOUBLE PRECISION FUNCTION FA(X,Y) * .. Scalar Arguments .. DOUBLE PRECISION X, Y * .. Executable Statements .. FA = X + Y RETURN END * DOUBLE PRECISION FUNCTION PHI2B(Y) ***************************************************** * Add USE statements for relevant chapters * USE NAG_F77_X_CHAPTER, ONLY: X01AAF * * ***************************************************** * .. Scalar Arguments .. DOUBLE PRECISION Y * .. External Functions .. ****************************************************** * Function Type declarations need to be removed. * * DOUBLE PRECISION X01AAF * * ****************************************************** ****************************************************** * EXTERNAL declarations need to be removed. * * EXTERNAL X01AAF * * ****************************************************** * .. Executable Statements .. PHI2B = 0.5D0*X01AAF(0.0D0) RETURN END * DOUBLE PRECISION FUNCTION FB(X,Y) * .. Scalar Arguments .. DOUBLE PRECISION X, Y * .. Intrinsic Functions .. INTRINSIC COS, SIN * .. Executable Statements .. FB = Y*Y*(COS(X)+SIN(X)) RETURN END
Modified versions of all the example program source files, which use the
modules, are available in the zip file
Note that the example material has been adapted, if necessary, from that published in the Library Manual, so that programs are suitable for execution with this implementation with no further changes. The distributed example programs should be used in preference to the versions in the Library Manual wherever possible.
The example programs are most easily accessed by one of the following batch files:
nag_mkl_MT.lib and nag_nag_MT.lib use the static multithreaded run-time library, whilst nag_mkl_MD.lib, nag_nag_MD.lib, FLW3222DC_mkl.lib and FLW3222DC_nag.lib use the multithreaded DLL run-time library.
The batch files need the environment variable NAG_FLW3222DCL.
As mentioned in Section 3.1.1, the installation procedure provides a shortcut which starts a Command Prompt with local environment variables. The environment variables include NAG_FLW3222DCL. This shortcut is, by default, placed in the Start Menu under
Start|All Programs|NAG|FL22|NAG Fortran Library - Intel Fortran (FLW3222DCL). Command PromptIf the shortcut is not used, you need to set this environment variable. It can be set by running the batch file envvars.bat for this implementation. The default location of this file is:
c:\Program Files\NAG\FL22\flw3222dcl\batch\envvars.batIf the file is not in the default location, you can locate it by searching for the file envvars.bat containing flw3222dcl.
Each of the nag_example* batch files mentioned above will provide you with a copy of an example program (and its data, if any), compile the program and link it with the appropriate libraries (showing you the compile command so that you can recompile your own version of the program). Finally, the executable program will be run, writing its output to a file.
The example program concerned is specified by the argument to the command, e.g.
nag_example_mkl_MT e04ucfwill copy the example program and its data into the files e04ucfe.f and e04ucfe.d in the current folder and process them to produce the example program results in the file e04ucfe.r.
The distributed example results are those obtained with the static library nag_mkl_MD.lib, (using the MKL BLAS and LAPACK routines). Running the examples with the self-contained library (using the NAG BLAS and LAPACK routines) may give slightly different results.
In order to support all implementations of the Library, the Manual has adopted a convention of using bold italics to distinguish terms which have different interpretations in different implementations.
For this double precision implementation, the bold italicised terms used in the Library Manual should be interpreted as follows:
real means REAL double precision means DOUBLE PRECISION complex means COMPLEX complex*16 means COMPLEX*16 (or equivalent) basic precision means DOUBLE PRECISION additional precision means quadruple precision reduced precision means REAL
Another important bold italicised term is machine
precision, which denotes the relative precision to which
double precision floating-point numbers are stored in
the computer, e.g. in an implementation with approximately 16 decimal
digits of precision, machine precision has a value of
approximately
The precise value of machine precision is given by the routine X02AJF. Other routines in Chapter X02 return the values of other implementation-dependent constants, such as the overflow threshold, or the largest representable integer. Refer to the X02 Chapter Introduction for more details.
The bold italicised term block size is used only in Chapters F07 and F08. It denotes the block size used by block algorithms in these chapters. You only need to be aware of its value when it affects the amount of workspace to be supplied – see the parameters WORK and LWORK of the relevant routine documents and the Chapter Introduction.
ifort /MT driver.f nag_nag_MT.lib user32.lib /link /stack:128000000which will pass the specified stack size to the linker.
Many LAPACK routines have a "workspace query" mechanism which allows a caller to interrogate the routine to determine how much workspace to supply. Note that LAPACK routines from the MKL may require a different amount of workspace from the equivalent NAG versions of these routines. Care should be taken when using the workspace query mechanism.
In this implementation calls to the NAG version of the following Basic Linear Algebra Subprograms (BLAS) and linear algebra routines (LAPACK) are included in the libraries nag_mkl_MT.lib, nag_mkl_MD.lib and FLW3222DC_mkl.dll to avoid problems with the vendor version:
DGGGLM DGGLSE ZGELS ZGGGLM ZGGLSE
S07AAF F_1 = 1.0E+13 F_2 = 1.0E-14 S10AAF E_1 = 1.8715E+1 S10ABF E_1 = 7.080E+2 S10ACF E_1 = 7.080E+2 S13AAF X_hi = 7.083E+2 S13ACF X_hi = 1.0E+16 S13ADF X_hi = 1.0E+17 S14AAF IFAIL = 1 if X > 1.70E+2 IFAIL = 2 if X < -1.70E+2 IFAIL = 3 if abs(X) < 2.23E-308 S14ABF IFAIL = 2 if X > X_big = 2.55E+305 S15ADF X_hi = 2.65E+1 S15AEF X_hi = 2.65E+1 S15AFF underflow trap was necessary S15AGF IFAIL = 1 if X >= 2.53E+307 IFAIL = 2 if 4.74E+7 <= X < 2.53E+307 IFAIL = 3 if X < -2.66E+1 S17ACF IFAIL = 1 if X > 1.0E+16 S17ADF IFAIL = 1 if X > 1.0E+16 IFAIL = 3 if 0.0E0 < X <= 2.23E-308 S17AEF IFAIL = 1 if abs(X) > 1.0E+16 S17AFF IFAIL = 1 if abs(X) > 1.0E+16 S17AGF IFAIL = 1 if X > 1.038E+2 IFAIL = 2 if X < -5.7E+10 S17AHF IFAIL = 1 if X > 1.041E+2 IFAIL = 2 if X < -5.7E+10 S17AJF IFAIL = 1 if X > 1.041E+2 IFAIL = 2 if X < -1.9E+9 S17AKF IFAIL = 1 if X > 1.041E+2 IFAIL = 2 if X < -1.9E+9 S17DCF IFAIL = 2 if abs(Z) < 3.92223E-305 IFAIL = 4 if abs(Z) or FNU+N-1 > 3.27679E+4 IFAIL = 5 if abs(Z) or FNU+N-1 > 1.07374E+9 S17DEF IFAIL = 2 if imag(Z) > 7.00921E+2 IFAIL = 3 if abs(Z) or FNU+N-1 > 3.27679E+4 IFAIL = 4 if abs(Z) or FNU+N-1 > 1.07374E+9 S17DGF IFAIL = 3 if abs(Z) > 1.02399E+3 IFAIL = 4 if abs(Z) > 1.04857E+6 S17DHF IFAIL = 3 if abs(Z) > 1.02399E+3 IFAIL = 4 if abs(Z) > 1.04857E+6 S17DLF IFAIL = 2 if abs(Z) < 3.92223E-305 IFAIL = 4 if abs(Z) or FNU+N-1 > 3.27679E+4 IFAIL = 5 if abs(Z) or FNU+N-1 > 1.07374E+9 S18ADF IFAIL = 2 if 0.0E0 < X <= 2.23E-308 S18AEF IFAIL = 1 if abs(X) > 7.116E+2 S18AFF IFAIL = 1 if abs(X) > 7.116E+2 S18DCF IFAIL = 2 if abs(Z) < 3.92223E-305 IFAIL = 4 if abs(Z) or FNU+N-1 > 3.27679E+4 IFAIL = 5 if abs(Z) or FNU+N-1 > 1.07374E+9 S18DEF IFAIL = 2 if real(Z) > 7.00921E+2 IFAIL = 3 if abs(Z) or FNU+N-1 > 3.27679E+4 IFAIL = 4 if abs(Z) or FNU+N-1 > 1.07374E+9 S19AAF IFAIL = 1 if abs(X) >= 5.04818E+1 S19ABF IFAIL = 1 if abs(X) >= 5.04818E+1 S19ACF IFAIL = 1 if X > 9.9726E+2 S19ADF IFAIL = 1 if X > 9.9726E+2 S21BCF IFAIL = 3 if an argument < 1.583E-205 IFAIL = 4 if an argument >= 3.765E+202 S21BDF IFAIL = 3 if an argument < 2.813E-103 IFAIL = 4 if an argument >= 1.407E+102
X01AAF (pi) = 3.1415926535897932 X01ABF (gamma) = 0.5772156649015328
The basic parameters of the model
X02BHF = 2 X02BJF = 53 X02BKF = -1021 X02BLF = 1024 X02DJF = .TRUE.Derived parameters of the floating-point arithmetic
X02AJF = 1.11022302462516E-16 X02AKF = 2.22507385850721E-308 X02ALF = 1.79769313486231E+308 X02AMF = 2.22507385850721E-308 X02ANF = 2.22507385850721E-308Parameters of other aspects of the computing environment
X02AHF = 1.42724769270596E+45 X02BBF = 2147483647 X02BEF = 15 X02DAF = .TRUE.
The Library Manual is available as a separate installation, via download from the NAG website, or from the distribution CD if you have one. It is also available directly on the CD. The most up-to-date version of the documentation is accessible via the NAG website at https://www.nag.com/numeric/FL/FLdocumentation.asp.
The Library Manual is supplied in the following formats:
The following main index files have been provided for these formats:
nagdoc_fl22\xhtml\FRONTMATTER\manconts.xml nagdoc_fl22\pdf\FRONTMATTER\manconts.pdf nagdoc_fl22\html\FRONTMATTER\manconts.htmlIf the Library Manual has been installed locally, these index files are available from the Start Menu under
Start|All Programs|NAG|FL22|NAG Fortran Library Manual (XHTML + MathML) Start|All Programs|NAG|FL22|NAG Fortran Library Manual (PDF) Start|All Programs|NAG|FL22|NAG Fortran Library Manual (PDF + HTML Index)respectively, by default. Use your web browser to navigate from here.
Advice on viewing and navigating the formats available can be found in the Online Documentation document.
Note that if you are using Internet Explorer, all links within the XHTML/MathML version to example source, data and results files and PDF files will be diverted from the local file system to the NAG website to avoid security restrictions which prevent the display of these pages. If you are using any other browser then local links to examples and PDF files are retained.
In addition the following are provided:
Start|All Programs|NAG|FL22|NAG Fortran Library - Intel Fortran (FLW3222DCL). Users' Noteby default.
The NAG Response Centres are available for general enquiries from all users and also for technical queries from sites with an annually licensed product or support service.
The Response Centres are open during office hours, but contact is possible by fax, email and phone (answering machine) at all times.
When contacting a Response Centre, it helps us deal with your enquiry quickly if you can quote your NAG site reference and NAG product code (in this case FLW3222DCL).
The NAG websites provide information about implementation availability, descriptions of products, downloadable software, product documentation and technical reports. The NAG websites can be accessed at the following URLs:
http://www.nag.com/, or http://www.nag-j.co.jp/
NAG Ltd Wilkinson House Jordan Hill Road OXFORD OX2 8DR NAG Ltd Response Centre United Kingdom email: support@nag.co.uk Tel: +44 (0)1865 511245 Tel: +44 (0)1865 311744 Fax: +44 (0)1865 310139 Fax: +44 (0)1865 310139 NAG Inc 801 Warrenville Road Suite 185 Lisle, IL 60532-4332 NAG Inc Response Center USA email: support@nag.com Tel: +1 630 971 2337 Tel: +1 630 971 2337 Fax: +1 630 971 2706 Fax: +1 630 971 2706 Nihon NAG KK Hatchobori Frontier Building 2F 4-9-9 Hatchobori Chuo-ku Tokyo 104-0032 Japan email: help@nag-j.co.jp Tel: +81 (0)3 5542 6311 Fax: +81 (0)3 5542 6312