Skip to content

Commit

Permalink
Fix a typo in an OpenMP directive
Browse files Browse the repository at this point in the history
  • Loading branch information
skosukhin committed Sep 29, 2023
1 parent a1b6781 commit b211639
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion rrtmgp-frontend/mo_aerosol_optics_rrtmgp_merra.F90
Original file line number Diff line number Diff line change
Expand Up @@ -204,7 +204,7 @@ subroutine finalize(this)
if(allocated(this%merra_aero_bin_lims)) then
deallocate(this%merra_aero_bin_lims, this%aero_rh)
!$acc exit data delete( this%merra_aero_bin_lims, this%aero_rh)
!$omp target exit data map(release:this%merra_aero_bin_lims, this%aero_rh) &
!$omp target exit data map(release:this%merra_aero_bin_lims, this%aero_rh)
end if

! Lookup table aerosol optics coefficients
Expand Down

0 comments on commit b211639

Please sign in to comment.