! source file: /Users/oschlies/UVIC/master/testcase/updates/convect_brine.F subroutine convect_brine (joff, js, je, is, ie) !----------------------------------------------------------------------- ! solve for brine rejection for each ice category and mix S & T. ! the brine is first rejected to some depth, defined by ! potential density difference from the previous time step ! between the surface and the depth. then convective mixing ! is applied under each category to both T & S. ! input: ! joff = offset relating "j" in the MW to latitude "jrow" ! js = starting row in the MW ! je = ending row in the MW ! is = starting longitude index in the MW ! ie = ending longitude index in the MW !----------------------------------------------------------------------- return end