Ignore:
Timestamp:
Dec 19, 2013, 11:31:02 AM (10 years ago)
Author:
idelkadi
Message:

Correction de bug sur les sorties NMC en cas de simulaion en mode parallel

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/physiq.F90

    r1917 r1920  
    12571257     !$OMP BARRIER
    12581258
     1259    freq_outNMC(1) = ecrit_files(7)
     1260    freq_outNMC(2) = ecrit_files(8)
     1261    freq_outNMC(3) = ecrit_files(9)
     1262    WRITE(lunout,*)'OK freq_outNMC(1)=',freq_outNMC(1)
     1263    WRITE(lunout,*)'OK freq_outNMC(2)=',freq_outNMC(2)
     1264    WRITE(lunout,*)'OK freq_outNMC(3)=',freq_outNMC(3)
    12591265
    12601266     include "ini_histday_seri.h"
Note: See TracChangeset for help on using the changeset viewer.