Skip to content

Commit

Permalink
Fix VarMix cleanup with openMP
Browse files Browse the repository at this point in the history
  • Loading branch information
adcroft committed Jul 1, 2017
1 parent 3e50273 commit a110df9
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/tracer/MOM_tracer_hor_diff.F90
Original file line number Diff line number Diff line change
Expand Up @@ -189,7 +189,7 @@ subroutine tracer_hordiff(h, dt, MEKE, VarMix, G, GV, CS, Reg, tv, do_online_fla
if (do_online) then
if (use_VarMix) then
!$OMP parallel default(none) shared(is,ie,js,je,CS,VarMix,MEKE,Resoln_scaled, &
!$OMP Kh_u,Kh_v,khdt_x,dt,G,khdt_y) &
!$OMP Kh_u,Kh_v,khdt_x,dt,G,khdt_y,use_Eady) &
!$OMP private(Kh_loc,Rd_dx)
!$OMP do
do j=js,je ; do I=is-1,ie
Expand Down

0 comments on commit a110df9

Please sign in to comment.