module par_oce integer :: nbcellsx, nbcellsy end module par_oce