C eradius is radius of earth
C omegaM2 is M2 frequency (2pi/12.42h in rad/s)
C omegaMoon is angular frequency of westward motion of moon w.r.t.
C a reference meridian: (2pi/1 day - 2pi/(sidereal month = 27.32 days))
C hbar is height of equilibrium tide

      REAL*8 eradius,omegaM2,omegaMoon
      parameter (eradius=6371.e3,omegaM2=1.4053e-4,omegaMoon=7.006e-5)
      common/forcing/ktide,ftide,hbar,lat0
      REAL*8 ktide,ftide,hbar,lat0