Ignore:
Timestamp:
05/30/21 23:30:01 (3 years ago)
Author:
yushan
Message:

temporal commit for merging graph into XIOS_coupling

File:
1 edited

Legend:

Unmodified
Added
Removed

  • XIOS/dev/dev_trunk_graph/src/test/generic_testcase.f90

    r2027 r2137  
    113113  CALL MPI_FINALIZE(ierr) 
    114114   
    115   if(i_am_server) then 
    116     print*, "server ",rank, " finished" 
    117   else 
    118     print*, "client ",rank, " finished" 
    119   endif 
    120  
    121115CONTAINS 
    122116 
    … …  
    368362    pressure=1e20 
    369363    DO j=0,z-1 
    370       pressure(:,j)=axis_value(j)*100000 ; ! Pa  
     364      pressure(:,j)=axis_value(j)*100000 ; ! Pa 
    371365      DO i=0,xy-1 
    372366        IF (domain_index(i)/=-1) THEN 
Note: See TracChangeset for help on using the changeset viewer.