CALL ADEXCH_3D_RL( adBottomDragFld, 1 , myThid )
& adBottomDragFld, myIter, myThid )
& adBottomDragFld, dumpAdRecMn, myIter, myThid )
CALL COPY_ADVAR_OUTP( dumRS, adBottomDragFld,