Ignore:
Timestamp:
2018-06-20T15:41:08+02:00 (3 years ago)
Author:
smasson
Message:

dev_r9759_HPC09_ESIWACE: get more informations

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2018/dev_r9759_HPC09_ESIWACE/src/OCE/LBC/lib_mpp.F90

    r9772 r9814  
    16251625    ELSE 
    16261626       IF ( ncom_stp > nit000 ) tac_wt = tac_wt + MPI_Wtime() - tic_wt 
    1627        IF ( ( ncom_stp == ( nitend - 1 ) ) .AND. l_write_wt ) then 
     1627       IF ( ( ncom_stp == ( nitend - nn_comm_mod ) ) .AND. l_write_wt ) then 
    16281628          WRITE(6,'(A20,F11.6,A15,I8)') 'Computing time : ',tac_ct,' on MPI rank : ', narea 
    16291629          WRITE(6,'(A20,F11.6,A15,I8)') 'Waiting time : ',tac_wt,' on MPI rank : ', narea 
     
    18381838   END SUBROUTINE mppmax_real_multiple 
    18391839 
     1840   SUBROUTINE simulated_lbc_lnk () 
     1841      WRITE(*,*) 'simulated_lbc_lnk: You should not have seen this print! error?' 
     1842   END SUBROUTINE simulated_lbc_lnk () 
    18401843#endif 
    18411844 
Note: See TracChangeset for help on using the changeset viewer.