Mesh adaptation
 

Hello, I work on a code of solution of equation of Navier-stooks, I need to have an adaptation of grid, could you help me to have a subroutine which makes this spot. thank you