Ignore:
Timestamp:
07/10/09 17:01:28 (15 years ago)
Author:
ymipsl
Message:

Feature : permet d'utiliser XMLIO-SERVER sans MPI, donc en mode édition de lien, sans server.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • XMLIO_SERVER/trunk/src/IOSERVER/mod_mpi_buffer_client.f90

    r36 r37  
    5555  USE mod_ioclient_para 
    5656  USE mpitrace 
     57  USE mpi_mod 
    5758  IMPLICIT NONE 
    58     INCLUDE 'mpif.h' 
    5959    INTEGER :: request_id 
    6060     
    … …  
    7676  USE mpitrace 
    7777  use mod_wait 
     78  USE mpi_mod 
    7879  IMPLICIT NONE 
    79     INCLUDE 'mpif.h' 
    8080    INTEGER :: ierr 
    8181    INTEGER :: message_size 
    … …  
    150150 
    151151  SUBROUTINE Check_request 
     152  USE mpi_mod 
    152153  IMPLICIT NONE 
    153   INCLUDE 'mpif.h' 
    154154  LOGICAL :: ok_out 
    155155  LOGICAL :: OK_complete 
Note: See TracChangeset for help on using the changeset viewer.