Ignore:
Timestamp:
Sep 20, 2006, 12:12:39 PM (18 years ago)
Author:
Laurent Fairhead
Message:

Nouvelles versions de la dynamique YM
LF

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ4/branches/V3_test/libf/dyn3dpar/bernoui_p.F

    r630 r709  
    3737c
    3838      INTEGER   ij,l,ijb,ije,jjb,jje
    39       EXTERNAL  filtreg_p
    4039c
    4140c-----------------------------------------------------------------------
     
    5049      jje=jj_end+1
    5150      if (pole_sud) jje=jj_end
    52                
     51
     52c$OMP DO SCHEDULE(STATIC,OMP_CHUNK)               
    5353      DO l=1,llm
    5454   
     
    5858       
    5959       ENDDO
     60c$OMP END DO NOWAIT
    6061c
    6162c-----------------------------------------------------------------------
Note: See TracChangeset for help on using the changeset viewer.