INTERFACE:
module eqstateDESCRIPTION:
Documentation will follow when the equation of state calculations are updated. The idea is to use the respective routines from GOTM. USES:
use domain, only: imin,imax,jmin,jmax,kmax,az
use parameters, only: g,rho_0
use variables_3d, only: T,S,rho
IMPLICIT NONE
PUBLIC DATA MEMBERS:
public init_eqstate, do_eqstate
!PRIVATE DATA MEMBERS:
integer :: eqstate_method=3
REALTYPE :: T0 = 10., S0 = 33.75, p0 = 0.
REALTYPE :: dtr0 = -0.17, dsr0 = 0.78
REVISION HISTORY:
Original author(s): Karsten Bolding & Hans Burchard