_RL exf_outscal_tidePot
& exf_outscal_tidePot,
phiTide2d(i,j,bi,bj)=exf_outscal_tidePot*tidePot(i,j,bi,bj)
& exf_inscal_tidePot, exf_outscal_tidePot,
exf_outscal_tidePot = 1. _d 0