Changes between Version 156 and Version 157 of IPSLCM4_v2_PAR


Ignore:
Timestamp:
04/04/08 14:37:23 (15 years ago)
Author:
mafoipsl
Comment:

--

Legend:

Unmodified
Added
Removed
Modified
  • IPSLCM4_v2_PAR

    v156 v157  
    8686   * création du fichier dynzon dans la version parallèle de LMDZ 
    8787   * "débranchement" de dyn_hist, dyn_histv, dyn_hist_ave 
    88  * dynzon désactivé par défaut. Coût CPU ~7% en plus. Pour l'activer utilisez (depuis le 26 Mars 2008) le parametre ok_dynzon. Auparavant : ayez ces lignes dans dyn3dpar/leapfrog_p.F : 
    89 {{{ 
    90  1278 #ifdef CPP_IOIPSL 
    91  1279              call Register_Hallo(vcov,ip1jm,llm,1,0,0,1,TestRequest) 
    92  1280              call SendRequest(TestRequest) 
    93  1281 c$OMP BARRIER 
    94  1282               call WaitRequest(TestRequest) 
    95  1283 c$OMP MASTER 
    96  1284 c              CALL writedynav_p(histaveid, nqmx, itau,vcov , 
    97  1285 c     ,                          ucov,teta,pk,phi,q,masse,ps,phis) 
    98  1286 c$OMP END MASTER 
    99  1287                call bilan_dyn_p(2,dtvr*iperiod,dtvr*day_step*periodav, 
    100  1288      ,           ps,masse,pk,pbaru,pbarv,teta,phi,ucov,vcov,q) 
    101  1289 #endif 
    102 }}} 
    103 {{{ 
    104  1431 #ifdef CPP_IOIPSL 
    105  1432 c$OMP BARRIER 
    106  1433  
    107  1434               call Register_Hallo(vcov,ip1jm,llm,1,0,0,1,TestRequest) 
    108  1435               call SendRequest(TestRequest) 
    109  1436 c$OMP BARRIER 
    110  1437               call WaitRequest(TestRequest) 
    111  1438  
    112  1439 c$OMP MASTER 
    113  1440 c              CALL writedynav_p(histaveid, nqmx, itau,vcov , 
    114  1441 c     ,                          ucov,teta,pk,phi,q,masse,ps,phis) 
    115  1442                call bilan_dyn_p (2,dtvr*iperiod,dtvr*day_step*periodav, 
    116  1443      ,           ps,masse,pk,pbaru,pbarv,teta,phi,ucov,vcov,q) 
    117  1444 c$OMP END MASTER 
    118  1445 #endif 
    119  1446             ENDIF 
    120 }}} 
     88 * dynzon désactivé par défaut. Coût CPU ~7% en plus. Pour l'activer utilisez (depuis le 26 Mars 2008) le parametre ok_dynzon.  
    12189 * rugoro : 
    12290   * le rugoro est forcé à zéro dans physiq.F. Voir différences [http://web.lmd.jussieu.fr/cgi-bin/viewvc.cgi/LMDZ4/libf/phylmd/physiq.F?r1=1.31.2.3&r2=1.31.2.4&pathrev=LMDZ4_V3_patches&sortby=date  physiq.F]