wavy channel

hi to all,
my thesis title is “using lattice boltzmann for fluid flow in aavy channel”,
i have serious problems in writting a fortran code for curved boundary condition,
i need a sample code for understanding the way of simulating fluid in curved boundary.
best regard