Bunches of fixes for the f90 bindings
- fix the --with-f90-max-array-dim configure switch - fix configure test to find the supported f90 linker switch to find fortran modules - Unbelievably, some versions of sh (cough cough Solaris 9 cough cough) actually seem to internally perform a "cd" into a subdirectory when you run "./foo/bar", such that if you try to source a script in the top-level directory in the bar script (i.e., ". some_script" in the bar script), it will try to run it in the "foo" subdirectory, rather than the top-level directory! #$@#$%#$% So we have to pass in the pwd to the scripts so that they know where some_script is. - Reworked much of ompi/mpi/f90/Makefile.am for lots of reasons. See the internal comments (mostly having to do with dependency stuff -- Libtool does not apparently support F90, so we can only build the F90 library statically. This commit was SVN r6993.
Этот коммит содержится в:
родитель
adf92d6237
Коммит
4eba48b430
@ -59,7 +59,7 @@ EOF
|
|||||||
OMPI_FC_MODULE_FLAG=
|
OMPI_FC_MODULE_FLAG=
|
||||||
for flag in $possible_flags; do
|
for flag in $possible_flags; do
|
||||||
if test "$OMPI_FC_MODULE_FLAG" = ""; then
|
if test "$OMPI_FC_MODULE_FLAG" = ""; then
|
||||||
OMPI_LOG_COMMAND([$FC $FCFLAGS $FCFLAGS_f90 conftest.f90 $flag subdir],
|
OMPI_LOG_COMMAND([$FC $FCFLAGS $FCFLAGS_f90 conftest.f90 ${flag}subdir],
|
||||||
[OMPI_FC_MODULE_FLAG="$flag"])
|
[OMPI_FC_MODULE_FLAG="$flag"])
|
||||||
fi
|
fi
|
||||||
done
|
done
|
||||||
|
@ -373,11 +373,11 @@ AC_MSG_CHECKING([max supported array dimension in F90 MPI bindings])
|
|||||||
AC_ARG_WITH(f90-max-array-dim,
|
AC_ARG_WITH(f90-max-array-dim,
|
||||||
AC_HELP_STRING([--with-f90-max-array-dim=<DIM>],
|
AC_HELP_STRING([--with-f90-max-array-dim=<DIM>],
|
||||||
[The maximum array dimension supported in the F90 MPI bindings (default: $OMPI_FORTRAN_MAX_ARRAY_RANK).]))
|
[The maximum array dimension supported in the F90 MPI bindings (default: $OMPI_FORTRAN_MAX_ARRAY_RANK).]))
|
||||||
if test ! -z "$with_max_f90_array_dim" -a "$with_max_f90_array_dim" != "no"; then
|
if test ! -z "$with_f90_max_array_dim" -a "$with_f90_max_array_dim" != "no"; then
|
||||||
# Ensure it's a number; hopefully a integer...
|
# Ensure it's a number; hopefully a integer...
|
||||||
expr $with_max_array_dim + 1 > /dev/null 2> /dev/null
|
expr $with_f90_max_array_dim + 1 > /dev/null 2> /dev/null
|
||||||
if test "$?" = "0"; then
|
if test "$?" = "0"; then
|
||||||
OMPI_FORTRAN_MAX_ARRAY_RANK="$with_max_f90_array_dim"
|
OMPI_FORTRAN_MAX_ARRAY_RANK="$with_f90_max_array_dim"
|
||||||
fi
|
fi
|
||||||
fi
|
fi
|
||||||
AC_MSG_RESULT([$OMPI_FORTRAN_MAX_ARRAY_RANK])
|
AC_MSG_RESULT([$OMPI_FORTRAN_MAX_ARRAY_RANK])
|
||||||
|
@ -19,7 +19,7 @@ include $(top_srcdir)/config/Makefile.options
|
|||||||
|
|
||||||
SUBDIRS = scripts
|
SUBDIRS = scripts
|
||||||
|
|
||||||
AM_FCFLAGS = -I$(top_srcdir)/include $(OMPI_FC_MODULE_FLAG) .
|
AM_FCFLAGS = -I$(top_srcdir)/include $(OMPI_FC_MODULE_FLAG).
|
||||||
|
|
||||||
# We have to EXTRA_DIST mpi_kinds.f90 because there is no explicit
|
# We have to EXTRA_DIST mpi_kinds.f90 because there is no explicit
|
||||||
# Automake rule to compile this file.
|
# Automake rule to compile this file.
|
||||||
@ -38,56 +38,103 @@ EXTRA_DIST = mpi_kinds.f90
|
|||||||
.f90.obj:
|
.f90.obj:
|
||||||
$(FCCOMPILE) -c -o $@ `$(CYGPATH_W) $(FCFLAGS_f90) '$<'`
|
$(FCCOMPILE) -c -o $@ `$(CYGPATH_W) $(FCFLAGS_f90) '$<'`
|
||||||
|
|
||||||
.f90.lo:
|
|
||||||
$(LTFCCOMPILE) -c -o $@ $(FCFLAGS_f90) $<
|
|
||||||
|
|
||||||
# Do different things if the top-level configure decided that we're
|
# Do different things if the top-level configure decided that we're
|
||||||
# going to build F90 bindings or not.
|
# going to build F90 bindings or not.
|
||||||
|
|
||||||
lib_LTLIBRARIES =
|
lib_LIBRARIES =
|
||||||
if OMPI_WANT_F90_BINDINGS
|
if OMPI_WANT_F90_BINDINGS
|
||||||
|
|
||||||
# Add the f90 library to the list of libraries to build
|
# Add the f90 library to the list of libraries to build
|
||||||
|
|
||||||
lib_LTLIBRARIES += libmpi_f90.la
|
lib_LIBRARIES += libmpi_f90.a
|
||||||
|
|
||||||
# Ensure that the F90 interfaces are re-generated based on the values
|
# Ensure that the F90 interfaces are re-generated based on the values
|
||||||
# that come in from configure
|
# that come in from configure
|
||||||
|
|
||||||
mpi-f90-interfaces.h: fortran_kinds.sh
|
mpi-f90-interfaces.h: fortran_kinds.sh
|
||||||
|
|
||||||
# Ensure that the mpi_kinds F90 module is generated before compiling
|
|
||||||
# any of the sources. The *.lo file is a side-effect of generating
|
|
||||||
# the F90 module file -- we can't know ahead of time the exact
|
|
||||||
# filename of the generated F90 module file :-(, so we can only depend
|
|
||||||
# on the libtool .lo file.
|
|
||||||
|
|
||||||
$(libmpi_f90_la_SOURCES) $(nodist_libmpi_f90_la_SOURCES): mpi_kinds.lo
|
|
||||||
|
|
||||||
# Run scripts to generate the f90 source files. We only need to
|
# Run scripts to generate the f90 source files. We only need to
|
||||||
# generate the .f90 files once, so the "test" checks to see if the
|
# generate the .f90 files once, so the "test" checks to see if the
|
||||||
# file exists before running the script. However, the
|
# file exists before running the script. However, the
|
||||||
# mpi-f90-interfaces.h file may need to be generated multiple times
|
# mpi-f90-interfaces.h file may need to be generated multiple times
|
||||||
# (even if it already exists), such as if someone re-runs configure
|
# (even if it already exists), such as if someone re-runs configure
|
||||||
# and changes the value fortran_kinds.sh.
|
# and changes the value fortran_kinds.sh (which is taken care of by
|
||||||
|
# the mpi-f90-interfaces.h dependency on fortran_kinds.sh, above).
|
||||||
|
|
||||||
$(nodist_libmpi_f90_la_SOURCES):
|
mpi-f90-interfaces.h:
|
||||||
|
@ p="`pwd`"; \
|
||||||
|
echo $(srcdir)/scripts/mpi-f90-interfaces.h.sh $$p \> $@; \
|
||||||
|
$(srcdir)/scripts/mpi-f90-interfaces.h.sh $$p > $@
|
||||||
|
|
||||||
|
# Ensure that the mpi_kinds F90 module is generated before compiling
|
||||||
|
# any of the sources (because many/all of these sources "use
|
||||||
|
# mpi_kinds"). We unfortunately can't know ahead of time the exact
|
||||||
|
# filename of the generated F90 module file (because F90 compilers
|
||||||
|
# have not standardized on the output filename format), so we have to
|
||||||
|
# add our own explicit dependency to compile the module. :-(
|
||||||
|
|
||||||
|
$(libmpi_f90_a_SOURCES) $(nodist_libmpi_f90_a_SOURCES): mpi_kinds.ompi_module
|
||||||
|
|
||||||
|
mpi_kinds.ompi_module: mpi_kinds.f90
|
||||||
|
$(FCCOMPILE) -c -o $@ $(FCFLAGS_f90) $<
|
||||||
|
@ touch mpi_kinds.ompi_module
|
||||||
|
|
||||||
|
# Unbelievably, some versions of sh (cough cough Solaris 9 cough
|
||||||
|
# cough) actually seem to internally perform a "cd" into a
|
||||||
|
# subdirectory when you run "./foo/bar", such that if you try to
|
||||||
|
# source a script in the top-level directory in the bar script (e.g.,
|
||||||
|
# ". some_script" in the bar script), it will try to run it in the
|
||||||
|
# "foo" subdirectory, rather than the top-level directory! #$@#$%#$%
|
||||||
|
# So we have to pass in the pwd to the scripts so that they know where
|
||||||
|
# some_script is.
|
||||||
|
|
||||||
|
$(nodist_libmpi_f90_a_SOURCES):
|
||||||
@ if test ! -r $@ -o "$@" = "mpi-f90-interfaces.h"; then \
|
@ if test ! -r $@ -o "$@" = "mpi-f90-interfaces.h"; then \
|
||||||
echo $(srcdir)/scripts/$@.sh > $@ ; \
|
p="`pwd`"; \
|
||||||
$(srcdir)/scripts/$@.sh > $@ ; \
|
echo $(srcdir)/scripts/$@.sh $$p \> $@; \
|
||||||
|
$(srcdir)/scripts/$@.sh $$p > $@ ; \
|
||||||
fi
|
fi
|
||||||
|
|
||||||
|
# Automake doesn't know how to do F90 dependency analysis, so manually
|
||||||
|
# list this here (i.e., "mpi-f90-interfaces.h" is included in
|
||||||
|
# mpi.f90).
|
||||||
|
|
||||||
|
# Print a warning indicating that compiling mpi.f90 can take a while.
|
||||||
|
# The only way to do this portably is to have our own rules for mpi.o
|
||||||
|
# and mpi.obj (having a "fake" target that just has echo statement in
|
||||||
|
# it may trigger mpi.o|obj to be rebuilt because the fake name doesn't
|
||||||
|
# exist; there aren't good portable ways to indicate that the target
|
||||||
|
# name is fake and should never exist).
|
||||||
|
|
||||||
|
mpi.o: mpi.f90 mpi-f90-interfaces.h
|
||||||
|
@echo "***************************************************************"
|
||||||
|
@echo "* Compiling the mpi.f90 file may take a few minutes."
|
||||||
|
@echo "* This is quite normal -- do not be alarmed if the compile"
|
||||||
|
@echo "* process seems to 'hang' at this point for several minutes."
|
||||||
|
@echo "***************************************************************"
|
||||||
|
$(FCCOMPILE) -c -o $@ $(FCFLAGS_f90) $<
|
||||||
|
|
||||||
|
mpi.obj: mpi.f90 mpi-f90-interfaces.h
|
||||||
|
@echo "***************************************************************"
|
||||||
|
@echo "* Compiling the mpi.f90 file may take a few minutes."
|
||||||
|
@echo "* This is quite normal -- do not be alarmed if the compile"
|
||||||
|
@echo "* process seems to 'hang' at this point for several minutes."
|
||||||
|
@echo "***************************************************************"
|
||||||
|
$(FCCOMPILE) -c -o $@ `$(CYGPATH_W) $(FCFLAGS_f90) '$<'`
|
||||||
|
|
||||||
else
|
else
|
||||||
lib_LTLIBRARIES +=
|
lib_LIBRARIES +=
|
||||||
endif
|
endif
|
||||||
|
|
||||||
#
|
# mpi.f90 is the only f90 source file directly in libmpif90 that gets
|
||||||
# Source for the f90 library
|
# distributed (mpi_kinds.f90 is also distributed, but it's only
|
||||||
#
|
# indirectly included in libmpif90 -- via "use mpi_kinds").
|
||||||
|
|
||||||
libmpi_f90_la_SOURCES = mpi.f90
|
libmpi_f90_a_SOURCES = mpi.f90
|
||||||
|
|
||||||
nodist_libmpi_f90_la_SOURCES = \
|
# These files are all generated by scripts in the scripts/ directory.
|
||||||
mpi-f90-interfaces.h \
|
|
||||||
|
nodist_libmpi_f90_a_SOURCES = \
|
||||||
mpi_address_f90.f90 \
|
mpi_address_f90.f90 \
|
||||||
mpi_bcast_f90.f90 \
|
mpi_bcast_f90.f90 \
|
||||||
mpi_bsend_f90.f90 \
|
mpi_bsend_f90.f90 \
|
||||||
@ -140,7 +187,7 @@ nodist_libmpi_f90_la_SOURCES = \
|
|||||||
mpi_ssend_init_f90.f90
|
mpi_ssend_init_f90.f90
|
||||||
|
|
||||||
if WANT_MPI2_ONE_SIDED
|
if WANT_MPI2_ONE_SIDED
|
||||||
nodist_libmpi_f90_la_SOURCES += \
|
nodist_libmpi_f90_a_SOURCES += \
|
||||||
mpi_accumulate_f90.f90 \
|
mpi_accumulate_f90.f90 \
|
||||||
mpi_get_f90.f90 \
|
mpi_get_f90.f90 \
|
||||||
mpi_put_f90.f90 \
|
mpi_put_f90.f90 \
|
||||||
@ -151,20 +198,8 @@ endif
|
|||||||
# Clean up all F90 module files and all generated files
|
# Clean up all F90 module files and all generated files
|
||||||
#
|
#
|
||||||
|
|
||||||
MOSTLYCLEANFILES = *.mod
|
MOSTLYCLEANFILES = *.mod *.ompi_module
|
||||||
DISTCLEANFILES = $(nodist_libmpi_f90_la_SOURCES)
|
DISTCLEANFILES = $(nodist_libmpi_f90_a_SOURCES)
|
||||||
|
|
||||||
#
|
|
||||||
# Print a warning indicating that compiling mpi.f90 can take a while
|
|
||||||
#
|
|
||||||
|
|
||||||
mpi.lo: long-warning
|
|
||||||
long-warning:
|
|
||||||
@echo "***************************************************************"
|
|
||||||
@echo "* Compiling the mpi.f90 file may take a few minutes."
|
|
||||||
@echo "* This is quite normal -- do not be alarmed if the compile"
|
|
||||||
@echo "* process seems to 'hang' at this point for several minutes."
|
|
||||||
@echo "***************************************************************"
|
|
||||||
|
|
||||||
#
|
#
|
||||||
# Install the generated .mod files. Unfortunately, each F90 compiler
|
# Install the generated .mod files. Unfortunately, each F90 compiler
|
||||||
|
@ -18,18 +18,18 @@
|
|||||||
|
|
||||||
# Do a little error checking
|
# Do a little error checking
|
||||||
|
|
||||||
if test ! -f fortran_kinds.sh; then
|
if test ! -r "$1/fortran_kinds.sh"; then
|
||||||
echo "ERROR: Cannot find fortran_kinds.sh"
|
echo "ERROR: Cannot find $1/fortran_kinds.sh"
|
||||||
exit 1
|
exit 1
|
||||||
elif test -z fortran_kinds.sh; then
|
elif test ! -s "$1/fortran_kinds.sh"; then
|
||||||
echo "ERROR: fortran_kinds.sh appears to be empty!"
|
echo "ERROR: $1/fortran_kinds.sh appears to be empty!"
|
||||||
exit 1
|
exit 1
|
||||||
fi
|
fi
|
||||||
|
|
||||||
# Read the setup information
|
# Read the setup information
|
||||||
|
|
||||||
echo "Reading Fortran KIND information..." >&2
|
echo "Reading Fortran KIND information..." >&2
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
# Do the work
|
# Do the work
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
|
|
||||||
procedure='MPI_Accumulate'
|
procedure='MPI_Accumulate'
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Accumulate'
|
procedure='MPI_Accumulate'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Address'
|
procedure='MPI_Address'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Accumulate'
|
procedure='MPI_Accumulate'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Allreduce'
|
procedure='MPI_Allreduce'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Bcast'
|
procedure='MPI_Bcast'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Bsend'
|
procedure='MPI_Bsend'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Bsend_init'
|
procedure='MPI_Bsend_init'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Buffer_attach'
|
procedure='MPI_Buffer_attach'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Buffer_detach'
|
procedure='MPI_Buffer_detach'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_iread_at'
|
procedure='MPI_File_iread_at'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_iread'
|
procedure='MPI_File_iread'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_iread_shared'
|
procedure='MPI_File_iread_shared'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_iwrite_at'
|
procedure='MPI_File_iwrite_at'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_iwrite'
|
procedure='MPI_File_iwrite'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_iwrite_shared'
|
procedure='MPI_File_iwrite_shared'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_all_begin'
|
procedure='MPI_File_read_all_begin'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_all_end'
|
procedure='MPI_File_read_all_end'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_all'
|
procedure='MPI_File_read_all'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_at_all_begin'
|
procedure='MPI_File_read_at_all_begin'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_at_all_end'
|
procedure='MPI_File_read_at_all_end'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_at_all'
|
procedure='MPI_File_read_at_all'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_at'
|
procedure='MPI_File_read_at'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read'
|
procedure='MPI_File_read'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_ordered_begin'
|
procedure='MPI_File_read_ordered_begin'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_ordered_end'
|
procedure='MPI_File_read_ordered_end'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_ordered'
|
procedure='MPI_File_read_ordered'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_read_shared'
|
procedure='MPI_File_read_shared'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_all_begin'
|
procedure='MPI_File_write_all_begin'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_all_end'
|
procedure='MPI_File_write_all_end'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_all'
|
procedure='MPI_File_write_all'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_at_all_begin'
|
procedure='MPI_File_write_at_all_begin'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_at_all_end'
|
procedure='MPI_File_write_at_all_end'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_at_all'
|
procedure='MPI_File_write_at_all'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_at'
|
procedure='MPI_File_write_at'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write'
|
procedure='MPI_File_write'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_ordered_begin'
|
procedure='MPI_File_write_ordered_begin'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_ordered_end'
|
procedure='MPI_File_write_ordered_end'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_ordered'
|
procedure='MPI_File_write_ordered'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_File_write_shared'
|
procedure='MPI_File_write_shared'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Get'
|
procedure='MPI_Get'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Ibsend'
|
procedure='MPI_Ibsend'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Irecv'
|
procedure='MPI_Irecv'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Irsend'
|
procedure='MPI_Irsend'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Isend'
|
procedure='MPI_Isend'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Issend'
|
procedure='MPI_Issend'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Put'
|
procedure='MPI_Put'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Recv'
|
procedure='MPI_Recv'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Recv_init'
|
procedure='MPI_Recv_init'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Rsend'
|
procedure='MPI_Rsend'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Rsend_init'
|
procedure='MPI_Rsend_init'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Send'
|
procedure='MPI_Send'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Send_init'
|
procedure='MPI_Send_init'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Sendrecv_replace'
|
procedure='MPI_Sendrecv_replace'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Sizeof'
|
procedure='MPI_Sizeof'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Ssend'
|
procedure='MPI_Ssend'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Ssend_init'
|
procedure='MPI_Ssend_init'
|
||||||
|
|
||||||
|
@ -1,6 +1,6 @@
|
|||||||
#! /bin/sh
|
#! /bin/sh
|
||||||
|
|
||||||
. fortran_kinds.sh
|
. "$1/fortran_kinds.sh"
|
||||||
|
|
||||||
procedure='MPI_Win_create'
|
procedure='MPI_Win_create'
|
||||||
|
|
||||||
|
Загрузка…
Ссылка в новой задаче
Block a user