312BEGIN 313 src[cnt] -= 1. / hz * ( 314 - P(i , j , k-1) 315 + P(i , j , k ) 316 ); 317END
Massively-parallelized NS solver for planar and curved channel flows