Line 318-319
DO j=JstrP,JendT
DO i=IstrP,IendT
visc2_p(i,j)=cff*(grdscl(i-1,j-1)+grdscl(i,j-1))+ &
& grdscl(i-1,j )+grdscl(i,j )+ &
END DO
END DO
ini_hmixcoef.F
- arango
- Site Admin
- Posts: 1367
- Joined: Wed Feb 26, 2003 4:41 pm
- Location: DMCS, Rutgers University
- Contact:
Re: ini_hmixcoef.F
Yes, indeed. Thank you for reporting this problem. Please check the following trac ticket and update.