Ignore:
Timestamp:
Dec 11, 2006, 4:55:31 PM (18 years ago)
Author:
Laurent Fairhead
Message:

Nettoyage sur la version YM
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/V3_test/libf/dyn3dpar/times.F90

    r709 r743  
    126126        V2=timer_table_sqr(jj_nb,no_timer,mpi_rank)
    127127        V=timer_table(jj_nb,no_timer,mpi_rank)
    128         timer_delta(jj_nb,no_timer,mpi_rank)=sqrt((V2-V*V/N)/(N-1))
     128        timer_delta(jj_nb,no_timer,mpi_rank)=sqrt(abs(V2-V*V/N)/(N-1))
    129129      else
    130130        timer_delta(jj_nb,no_timer,mpi_rank)=0
Note: See TracChangeset for help on using the changeset viewer.