Fix nlev assignment for W variable in ic_baroclinic.F90

Author: jtruesdal

src/dynamics/tests/initial_conditions/ic_baroclinic.F90

@@ -223,7 +223,7 @@ subroutine bc_wav_set_ic(vcoord,latvals, lonvals, zint, U, V, W, T, PS, PHIS, &
     if (l3d_vars) then
       if (lu) nlev = size(U, 2)
       if (lv) nlev = size(V, 2)
-      if (lv) nlev = size(W, 2)
+      if (lw) nlev = size(W, 2)
       if (lt) nlev = size(T, 2)
 
       if (lq) then