fixed a bug in creating u and v components

[dwongepa]

On branch update_54

Contact:
David Wong US EPA

Type of code change:
bug fix

Description of changes:

Fixed a bug in creating u and v components by removing the following two lines

metcro3d_data_wrf (:,:,1:nlays,15) = zf (:,:,1:nlays)
metcro3d_data_wrf (:,:,1:nlays,16) = zf (:,:,1:nlays)

which overwrote the proper calculations:

metcro3d_data_wrf (c,r,kk,15) = grid%u_phy(ii,kk,jj) ! store u wind component on mass point
metcro3d_data_wrf (c,r,kk,16) = grid%v_phy(ii,kk,jj) ! store v wind component on mass point

Issue:
N/A

Summary of Impact:
Wind u and v components were incorrectly represented by level high. In turns it impacted the wind speed calculation as well as the plume rise calculation.

Tests conducted:
A one day test was conducted based on the NE 2018 Benchmark dataset. Here are some snapshot of the difference (new - old) with respect to four variables: O3, ASO4J, SWDOWN, and T2.

[kmfoley]

Closing this PR as this bugfix should be targeted for the 5.4+ branch rather than the main branch.