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/dteta1_p.F

    r630 r709  
    3030      REAL hbyv( ip1jm,llm ), hbxu( ip1jmp1,llm )
    3131
    32       EXTERNAL     convflu_p
    33       EXTERNAL     filtreg_p
    3432c
    35 
    3633      INTEGER ijb,ije,jjb,jje
    3734
    … …  
    3936      jjb=jj_begin
    4037      jje=jj_end
    41      
     38
     39c$OMP DO SCHEDULE(STATIC,OMP_CHUNK)   
    4240      DO 5 l = 1,llm
    4341     
    … …  
    7371       
    7472   5  CONTINUE
    75 
     73c$OMP END DO NOWAIT
    7674       
    7775       
Note: See TracChangeset for help on using the changeset viewer.