Skip to content

Commit

Permalink
Removed allocated(CS%sqg_struct) from the if statement in front of re…
Browse files Browse the repository at this point in the history
…gister N2_u and N2_v
  • Loading branch information
Wendazhang33 committed Oct 7, 2024
1 parent 2441dbd commit c3a3d64
Showing 1 changed file with 1 addition and 1 deletion.
Original file line number Diff line number Diff line change
Expand Up @@ -1629,7 +1629,7 @@ subroutine VarMix_init(Time, G, GV, US, param_file, diag, CS)
'Vertical structure of GL90 diffusivity', 'nondim')
endif

if ((CS%calculate_Eady_growth_rate .and. CS%use_stored_slopes) .or. allocated(CS%sqg_struct)) then
if ((CS%calculate_Eady_growth_rate .and. CS%use_stored_slopes) ) then
CS%id_N2_u = register_diag_field('ocean_model', 'N2_u', diag%axesCui, Time, &
'Square of Brunt-Vaisala frequency, N^2, at u-points, as used in Visbeck et al.', &
's-2', conversion=(US%L_to_Z*US%s_to_T)**2)
Expand Down

0 comments on commit c3a3d64

Please sign in to comment.