<div dir="ltr">Omega_ccm_driver should accept rank 3 or 4 values of U and V (and 2 or 3 of PS). (with or without a time dimension)<div><br></div><div>However, when passing 3D wind (lev,lat,lon) instead of 4D wind into the function, it crashes because it searches for dimu(3) (4th index of u dimensions) which doesn't exist.</div><div><br></div><div>The simple fix is to replace:</div><div><br></div><div><div> ntim = dimu(0)</div><div> klev = dimu(1)</div><div> nlat = dimu(2)</div><div> mlon = dimu(3)</div></div><div><br></div><div>with...</div><div><br></div><div><div> if (ranku.eq.3) then</div><div> klev = dimu(0)</div><div> nlat = dimu(1)</div><div> mlon = dimu(2)</div><div> else</div><div> ntim = dimu(0)</div><div> klev = dimu(1)</div><div> nlat = dimu(2)</div><div> mlon = dimu(3)</div><div> end if</div></div><div><br></div><div>Cheers,</div><div><br></div><div>-Colin</div><div><br>-- <br><div dir="ltr"><div dir="ltr" style="font-family:arial;font-size:small">Colin M. Zarzycki, ASP postdoctoral fellow</div><div dir="ltr" style="font-family:arial;font-size:small">Atmospheric Modeling and Predictability<br>National Center for Atmospheric Research<br><a href="http://www.colinzarzycki.com/" style="color:rgb(17,85,204)" target="_blank">http://www.colinzarzycki.com</a></div></div>
</div></div>