Skip to content

Commit

Permalink
Bugfix: Update ML switches to be logicals when calling gw_drag init a…
Browse files Browse the repository at this point in the history
…nd finalize routines.
  • Loading branch information
jatkinson1000 committed Aug 19, 2024
1 parent db3dd29 commit be8bea2
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/physics/cam/gw_drag.F90
Original file line number Diff line number Diff line change
Expand Up @@ -989,7 +989,7 @@ subroutine gw_init()
end if

! Set up neccessary attributes if using ML scheme for convective drag
if ((gw_convect_dp_ml == 'on') .or. (gw_convect_dp_ml == 'bothon')) then
if ((gw_convect_dp_ml) .or. (gw_convect_dp_ml_compare)) then
! Load the convective drag net from TorchScript file
call gw_drag_convect_dp_ml_init(gw_convect_dp_ml_net_path, gw_convect_dp_ml_norms)
endif
Expand Down Expand Up @@ -1258,7 +1258,7 @@ end subroutine handle_pio_error

subroutine gw_final()
! Destroy neccessary attributes if using ML scheme for convective drag
if ((gw_convect_dp_ml == 'on') .or. (gw_convect_dp_ml == 'bothon')) then
if ((gw_convect_dp_ml) .or. (gw_convect_dp_ml_compare)) then
call gw_drag_convect_dp_ml_final()
endif
end subroutine gw_final
Expand Down

0 comments on commit be8bea2

Please sign in to comment.