Epetra Package Browser (Single Doxygen Collection) Development
Epetra_Fortran_wrappers.h
Go to the documentation of this file.
00001 /*
00002 //@HEADER
00003 // ************************************************************************
00004 // 
00005 //               Epetra: Linear Algebra Services Package 
00006 //                 Copyright 2001 Sandia Corporation
00007 // 
00008 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
00009 // the U.S. Government retains certain rights in this software.
00010 //
00011 // Redistribution and use in source and binary forms, with or without
00012 // modification, are permitted provided that the following conditions are
00013 // met:
00014 //
00015 // 1. Redistributions of source code must retain the above copyright
00016 // notice, this list of conditions and the following disclaimer.
00017 //
00018 // 2. Redistributions in binary form must reproduce the above copyright
00019 // notice, this list of conditions and the following disclaimer in the
00020 // documentation and/or other materials provided with the distribution.
00021 //
00022 // 3. Neither the name of the Corporation nor the names of the
00023 // contributors may be used to endorse or promote products derived from
00024 // this software without specific prior written permission.
00025 //
00026 // THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
00027 // EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
00028 // IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
00029 // PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
00030 // CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
00031 // EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
00032 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
00033 // PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
00034 // LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
00035 // NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
00036 // SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
00037 //
00038 // Questions? Contact Michael A. Heroux (maherou@sandia.gov) 
00039 // 
00040 // ************************************************************************
00041 //@HEADER
00042 */
00043 
00044 #define EPETRA_FORTRAN
00045 #ifdef EPETRA_ADDRESS64BIT
00046 #define EPETRA_OBJECT_PTR long integer
00047 #else
00048 #define EPETRA_OBJECT_PTR integer
00049 #endif
00050 #define EPETRA_ERROR_FLAG integer
00051 
00052       EPETRA_OBJECT_PTR       epetra_mpicomm_create1
00053       EPETRA_OBJECT_PTR       epetra_mpicomm_create2
00054       EPETRA_OBJECT_PTR       epetra_serialcomm_create
00055 
00056       EPETRA_ERROR_FLAG       epetra_comm_mypid
00057       EPETRA_ERROR_FLAG       epetra_comm_numproc
00058 
00059       EPETRA_OBJECT_PTR       epetra_map_create1
00060       EPETRA_OBJECT_PTR       epetra_map_create2
00061       EPETRA_OBJECT_PTR       epetra_map_create3
00062       EPETRA_ERROR_FLAG       epetra_map_numMyelements
00063       EPETRA_ERROR_FLAG       epetra_map_numGlobalelements
00064 
00065       EPETRA_OBJECT_PTR       epetra_vector_create1
00066       EPETRA_OBJECT_PTR       epetra_vector_create2
00067       EPETRA_ERROR_FLAG       epetra_vector_update
00068       EPETRA_ERROR_FLAG       epetra_vector_norm1
00069       EPETRA_ERROR_FLAG       epetra_vector_norm2
00070       EPETRA_ERROR_FLAG       epetra_vector_random
00071       EPETRA_ERROR_FLAG       epetra_vector_putscalar
00072 
00073 
00074       EPETRA_OBJECT_PTR       epetra_localmap_create
00075       EPETRA_OBJECT_PTR       epetra_blockmap_create1
00076       EPETRA_OBJECT_PTR       epetra_blockmap_create2
00077       EPETRA_OBJECT_PTR       epetra_localblockmap_create1
00078       EPETRA_OBJECT_PTR       epetra_localblockmap_create2
00079 
00080       EPETRA_OBJECT_PTR       epetra_crsmatrix_create
00081       EPETRA_OBJECT_PTR       epetra_vbrmatrix_create
00082 
00083       EPETRA_OBJECT_PTR       epetra_multivector_create
00084 
00085 
00086       EPETRA_ERROR_FLAG  epetra_vbrmatrix_allocate
00087       EPETRA_ERROR_FLAG  epetra_vbrmatrix_putblockrow
00088       EPETRA_ERROR_FLAG  epetra_vbrmatrix_fillcomplete
00089       EPETRA_ERROR_FLAG  epetra_vbrmatrix_matvec
00090 
00091       EPETRA_ERROR_FLAG  epetra_crsmatrix_allocate
00092       EPETRA_ERROR_FLAG  epetra_crsmatrix_putrow
00093       EPETRA_ERROR_FLAG  epetra_crsmatrix_sumintodiagonal
00094       EPETRA_ERROR_FLAG  epetra_crsmatrix_fillcomplete
00095       EPETRA_ERROR_FLAG  epetra_crsmatrix_matvec
00096 
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines