Ignore:
Timestamp:
Apr 7, 2009, 5:53:39 PM (16 years ago)
Author:
yann meurdesoif
Message:

Portage vers Vargas

Y.M + E.M

Location:
LMDZ4/branches/LMDZ4-dev/libf/dyn3dpar
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/LMDZ4-dev/libf/dyn3dpar/calfis_p.F

    r1114 r1142  
    369369      CALL gr_dyn_fi_p(llm,iip1,jjp1,klon,pphi,zphi)
    370370
    371 c$OMP MASTER
    372371      CALL gr_dyn_fi_p(1,iip1,jjp1,klon,pphis,zphis)
    373 c$OMP END MASTER
     372
    374373c$OMP BARRIER
    375374
    … …  
    895894c  tendance sur la pression :
    896895c  -----------------------------------
    897 c$OMP MASTER
    898896      CALL gr_fi_dyn_p(1,klon,iip1,jjp1,zdpsrf,pdpsfi)
    899 c$OMP END MASTER
    900897c
    901898c   62. enthalpie potentielle

  • LMDZ4/branches/LMDZ4-dev/libf/dyn3dpar/times.F90

    r1000 r1142  
    207207      endif
    208208     
    209     ENDIF  ! using_mpî
     209    ENDIF  ! using_mp�
    210210  end subroutine allgather_timer_average
    211211 
    … …  
    222222  end subroutine InitTime
    223223 
    224   function DiffTime
     224  function DiffTime()
    225225  implicit none
    226226    double precision :: DiffTime
    … …  
    236236  end function DiffTime
    237237 
    238   function DiffCpuTime
     238  function DiffCpuTime()
    239239  implicit none
    240240    real :: DiffCpuTime
Note: See TracChangeset for help on using the changeset viewer.