mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-17 19:32:08 +00:00
Fix typo
This commit is contained in:
@@ -160,7 +160,7 @@ contains
|
||||
use mpi
|
||||
#endif
|
||||
implicit none
|
||||
#ifdef MP.I_H
|
||||
#ifdef MPI_H
|
||||
include 'mpif.h'
|
||||
#endif
|
||||
type(psb_ctxt_type), intent(in) :: ctxt
|
||||
|
||||
@@ -800,7 +800,7 @@ contains
|
||||
use mpi
|
||||
#endif
|
||||
implicit none
|
||||
#ifdef MP.I_H
|
||||
#ifdef MPI_H
|
||||
include 'mpif.h'
|
||||
#endif
|
||||
type(psb_ctxt_type), intent(in) :: ctxt
|
||||
|
||||
@@ -638,7 +638,7 @@ contains
|
||||
use mpi
|
||||
#endif
|
||||
implicit none
|
||||
#ifdef MP.I_H
|
||||
#ifdef MPI_H
|
||||
include 'mpif.h'
|
||||
#endif
|
||||
type(psb_ctxt_type), intent(in) :: ctxt
|
||||
|
||||
@@ -638,7 +638,7 @@ contains
|
||||
use mpi
|
||||
#endif
|
||||
implicit none
|
||||
#ifdef MP.I_H
|
||||
#ifdef MPI_H
|
||||
include 'mpif.h'
|
||||
#endif
|
||||
type(psb_ctxt_type), intent(in) :: ctxt
|
||||
|
||||
@@ -638,7 +638,7 @@ contains
|
||||
use mpi
|
||||
#endif
|
||||
implicit none
|
||||
#ifdef MP.I_H
|
||||
#ifdef MPI_H
|
||||
include 'mpif.h'
|
||||
#endif
|
||||
type(psb_ctxt_type), intent(in) :: ctxt
|
||||
|
||||
@@ -800,7 +800,7 @@ contains
|
||||
use mpi
|
||||
#endif
|
||||
implicit none
|
||||
#ifdef MP.I_H
|
||||
#ifdef MPI_H
|
||||
include 'mpif.h'
|
||||
#endif
|
||||
type(psb_ctxt_type), intent(in) :: ctxt
|
||||
|
||||
@@ -160,7 +160,7 @@ contains
|
||||
use mpi
|
||||
#endif
|
||||
implicit none
|
||||
#ifdef MP.I_H
|
||||
#ifdef MPI_H
|
||||
include 'mpif.h'
|
||||
#endif
|
||||
type(psb_ctxt_type), intent(in) :: ctxt
|
||||
|
||||
Reference in New Issue
Block a user