Ignore:
Timestamp:
02/17/17 19:51:36 (7 years ago)
Author:
oabramkina
Message:

dev: intermediate commit.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • XIOS/dev/dev_olga/src/xios_server.f90

    r983 r1054  
    44  INCLUDE "mpif.h" 
    55  INTEGER :: ierr 
    6   INTEGER            :: server_level = 0   
    7   ! 0 in case of a single server pool  
    8   ! 1 for primary server in case of two server pools 
    9   ! 2 for secondary server in case of two server pools 
    106 
    11   CALL xios_init_server(server_level) 
     7  CALL xios_init_server 
    128 
    139END PROGRAM server_main 
Note: See TracChangeset for help on using the changeset viewer.