!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! ! Low level bench tests of Fortran 95 ! ! Authors : Patrick Corde , ! Hervé Delouis , ! Isabelle Dupays ! ! Created : July 1998 ! Last modificat. : 04/11/2002 ! Version : 1.4 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! Object : Bench program to verify functionalities and performances of some new Fortran 95 constructions. Installation: get "benchs_F95.tar" file from our IDRIS Web server at URL : ------------ http://www.idris.fr/data/publications/F95/test_F95_french.html Execute the command: tar -xvf benchs_F95.tar which builds a new directory "benchs_F95" under which you'll find Fortran 95 sources with several modules and the main program "benchs_F95.f90". You'll also find a Makefile and a REAME file. Type: monoprocessor code ---- Portability: these tests only use standard Fortran 95 functions ----------- (90 standard insufficient) and optionally the blas function DGEMM. Compilation/link: make [machine-type] ---------------- The Makefile in this directory can be used to build both in sequence if your system is one of the supported machines and no modifications are necessary to the makefiles. To build executable NEdit from this directory, issue the command: "make "; where is one of suffixes of a Makefile in the "benchs_F95" directory. For example, to build the IBM aix version, type: make sgi If everything works properly, this will produce an executable called benchs_F95. Note : the makefiles consist of two parts, a machine dependent part and a machine independent part. The machine dependent makefiles can be found in the "Makefile.machine-type" files, and contain machine specific information. They invoke a common machine independent part called "makefile.common". To know the list of available "machine-types", use the make command without any argument. For example type: make which returns: Please specify one of these targets: aix cross_nec default nec ... - If your "machine-type" is not part of it, try "default" or add your own file "Makefile.your_type_mach" adapting one of the existing specific files. - "cross-nec" can be used to do a NEC-SX-5 cross-compilation on a SGI front machine. Compilation time: less than one minute on IDRIS present machines ---------------- Execution time: less than one minute on IDRIS present machines -------------- Execution: ./benchs_F95 > benchs_F95.out 2>&1 --------- Note : due to memory interactive limitations, it is sometimes necessary to execute it in batch mode. Adaptation: ---------- (1) to modify the memory size, you can change the default value (1000) of the symbolic constant "ordre" in "mod_matrice.f90" (the program allocates an (ordre x ordre) real bi-dimensionned array). (2) if you do not want to compare the MATMUL intrinsic Fortran subroutine to the blas DGEMM function, set the blas variable to ".false." in "mod_matrice.f90" ------------------------------------------------------------------------