MOM6
Data Types | Functions/Subroutines | Variables
mom_eos_nemo Module Reference

Data Types

interface  calculate_density_nemo
 

Functions/Subroutines

subroutine, public calculate_density_scalar_nemo (T, S, pressure, rho)
 
subroutine, public calculate_density_array_nemo (T, S, pressure, rho, start, npts)
 This subroutine computes the in situ density of sea water (rho in units of kg/m^3) from absolute salinity (S in g/Kg), conservative temperature (T in deg C), and pressure in Pa. More...
 
subroutine, public calculate_density_derivs_nemo (T, S, pressure, drho_dT, drho_dS, start, npts)
 
subroutine, public calculate_compress_nemo (T, S, pressure, rho, drho_dp, start, npts)
 

Variables

real, parameter pa2db = 1.e-4
 
real, parameter rdeltas = 32.
 
real, parameter r1_s0 = 0.875/35.16504
 
real, parameter r1_t0 = 1./40.
 
real, parameter r1_p0 = 1.e-4
 
real, parameter r00 = 4.6494977072e+01
 
real, parameter r01 = -5.2099962525
 
real, parameter r02 = 2.2601900708e-01
 
real, parameter r03 = 6.4326772569e-02
 
real, parameter r04 = 1.5616995503e-02
 
real, parameter r05 = -1.7243708991e-03
 
real, parameter eos000 = 8.0189615746e+02
 
real, parameter eos100 = 8.6672408165e+02
 
real, parameter eos200 = -1.7864682637e+03
 
real, parameter eos300 = 2.0375295546e+03
 
real, parameter eos400 = -1.2849161071e+03
 
real, parameter eos500 = 4.3227585684e+02
 
real, parameter eos600 = -6.0579916612e+01
 
real, parameter eos010 = 2.6010145068e+01
 
real, parameter eos110 = -6.5281885265e+01
 
real, parameter eos210 = 8.1770425108e+01
 
real, parameter eos310 = -5.6888046321e+01
 
real, parameter eos410 = 1.7681814114e+01
 
real, parameter eos510 = -1.9193502195
 
real, parameter eos020 = -3.7074170417e+01
 
real, parameter eos120 = 6.1548258127e+01
 
real, parameter eos220 = -6.0362551501e+01
 
real, parameter eos320 = 2.9130021253e+01
 
real, parameter eos420 = -5.4723692739
 
real, parameter eos030 = 2.1661789529e+01
 
real, parameter eos130 = -3.3449108469e+01
 
real, parameter eos230 = 1.9717078466e+01
 
real, parameter eos330 = -3.1742946532
 
real, parameter eos040 = -8.3627885467
 
real, parameter eos140 = 1.1311538584e+01
 
real, parameter eos240 = -5.3563304045
 
real, parameter eos050 = 5.4048723791e-01
 
real, parameter eos150 = 4.8169980163e-01
 
real, parameter eos060 = -1.9083568888e-01
 
real, parameter eos001 = 1.9681925209e+01
 
real, parameter eos101 = -4.2549998214e+01
 
real, parameter eos201 = 5.0774768218e+01
 
real, parameter eos301 = -3.0938076334e+01
 
real, parameter eos401 = 6.6051753097
 
real, parameter eos011 = -1.3336301113e+01
 
real, parameter eos111 = -4.4870114575
 
real, parameter eos211 = 5.0042598061
 
real, parameter eos311 = -6.5399043664e-01
 
real, parameter eos021 = 6.7080479603
 
real, parameter eos121 = 3.5063081279
 
real, parameter eos221 = -1.8795372996
 
real, parameter eos031 = -2.4649669534
 
real, parameter eos131 = -5.5077101279e-01
 
real, parameter eos041 = 5.5927935970e-01
 
real, parameter eos002 = 2.0660924175
 
real, parameter eos102 = -4.9527603989
 
real, parameter eos202 = 2.5019633244
 
real, parameter eos012 = 2.0564311499
 
real, parameter eos112 = -2.1311365518e-01
 
real, parameter eos022 = -1.2419983026
 
real, parameter eos003 = -2.3342758797e-02
 
real, parameter eos103 = -1.8507636718e-02
 
real, parameter eos013 = 3.7969820455e-01
 
real, parameter alp000 = -6.5025362670e-01
 
real, parameter alp100 = 1.6320471316
 
real, parameter alp200 = -2.0442606277
 
real, parameter alp300 = 1.4222011580
 
real, parameter alp400 = -4.4204535284e-01
 
real, parameter alp500 = 4.7983755487e-02
 
real, parameter alp010 = 1.8537085209
 
real, parameter alp110 = -3.0774129064
 
real, parameter alp210 = 3.0181275751
 
real, parameter alp310 = -1.4565010626
 
real, parameter alp410 = 2.7361846370e-01
 
real, parameter alp020 = -1.6246342147
 
real, parameter alp120 = 2.5086831352
 
real, parameter alp220 = -1.4787808849
 
real, parameter alp320 = 2.3807209899e-01
 
real, parameter alp030 = 8.3627885467e-01
 
real, parameter alp130 = -1.1311538584
 
real, parameter alp230 = 5.3563304045e-01
 
real, parameter alp040 = -6.7560904739e-02
 
real, parameter alp140 = -6.0212475204e-02
 
real, parameter alp050 = 2.8625353333e-02
 
real, parameter alp001 = 3.3340752782e-01
 
real, parameter alp101 = 1.1217528644e-01
 
real, parameter alp201 = -1.2510649515e-01
 
real, parameter alp301 = 1.6349760916e-02
 
real, parameter alp011 = -3.3540239802e-01
 
real, parameter alp111 = -1.7531540640e-01
 
real, parameter alp211 = 9.3976864981e-02
 
real, parameter alp021 = 1.8487252150e-01
 
real, parameter alp121 = 4.1307825959e-02
 
real, parameter alp031 = -5.5927935970e-02
 
real, parameter alp002 = -5.1410778748e-02
 
real, parameter alp102 = 5.3278413794e-03
 
real, parameter alp012 = 6.2099915132e-02
 
real, parameter alp003 = -9.4924551138e-03
 
real, parameter bet000 = 1.0783203594e+01
 
real, parameter bet100 = -4.4452095908e+01
 
real, parameter bet200 = 7.6048755820e+01
 
real, parameter bet300 = -6.3944280668e+01
 
real, parameter bet400 = 2.6890441098e+01
 
real, parameter bet500 = -4.5221697773
 
real, parameter bet010 = -8.1219372432e-01
 
real, parameter bet110 = 2.0346663041
 
real, parameter bet210 = -2.1232895170
 
real, parameter bet310 = 8.7994140485e-01
 
real, parameter bet410 = -1.1939638360e-01
 
real, parameter bet020 = 7.6574242289e-01
 
real, parameter bet120 = -1.5019813020
 
real, parameter bet220 = 1.0872489522
 
real, parameter bet320 = -2.7233429080e-01
 
real, parameter bet030 = -4.1615152308e-01
 
real, parameter bet130 = 4.9061350869e-01
 
real, parameter bet230 = -1.1847737788e-01
 
real, parameter bet040 = 1.4073062708e-01
 
real, parameter bet140 = -1.3327978879e-01
 
real, parameter bet050 = 5.9929880134e-03
 
real, parameter bet001 = -5.2937873009e-01
 
real, parameter bet101 = 1.2634116779
 
real, parameter bet201 = -1.1547328025
 
real, parameter bet301 = 3.2870876279e-01
 
real, parameter bet011 = -5.5824407214e-02
 
real, parameter bet111 = 1.2451933313e-01
 
real, parameter bet211 = -2.4409539932e-02
 
real, parameter bet021 = 4.3623149752e-02
 
real, parameter bet121 = -4.6767901790e-02
 
real, parameter bet031 = -6.8523260060e-03
 
real, parameter bet002 = -6.1618945251e-02
 
real, parameter bet102 = 6.2255521644e-02
 
real, parameter bet012 = -2.6514181169e-03
 
real, parameter bet003 = -2.3025968587e-04
 

Function/Subroutine Documentation

◆ calculate_compress_nemo()

subroutine, public mom_eos_nemo::calculate_compress_nemo ( real, dimension(:), intent(in)  T,
real, dimension(:), intent(in)  S,
real, dimension(:), intent(in)  pressure,
real, dimension(:), intent(out)  rho,
real, dimension(:), intent(out)  drho_dp,
integer, intent(in)  start,
integer, intent(in)  npts 
)
Parameters
[in]tConservative temperature in C.
[in]sAbsolute salinity in g/kg.
[in]pressurePressure in Pa.
[out]rhoIn situ density in kg m-3.
[out]drho_dpThe partial derivative of density with pressure (also the inverse of the square of sound speed) in s2 m-2.
[in]startThe starting point in the arrays.
[in]nptsThe number of values to calculate.

Definition at line 358 of file MOM_EOS_NEMO.F90.

References calculate_density_array_nemo(), and pa2db.

Referenced by mom_eos::calculate_compress().

358  real, intent(in), dimension(:) :: t !< Conservative temperature in C.
359  real, intent(in), dimension(:) :: s !< Absolute salinity in g/kg.
360  real, intent(in), dimension(:) :: pressure !< Pressure in Pa.
361  real, intent(out), dimension(:) :: rho !< In situ density in kg m-3.
362  real, intent(out), dimension(:) :: drho_dp !< The partial derivative of density with pressure
363  !! (also the inverse of the square of sound speed)
364  !! in s2 m-2.
365  integer, intent(in) :: start !< The starting point in the arrays.
366  integer, intent(in) :: npts !< The number of values to calculate.
367 ! * Arguments: T - conservative temperature in C. *
368 ! * (in) S - absolute salinity in g/kg. *
369 ! * (in) pressure - pressure in Pa. *
370 ! * (out) rho - in situ density in kg m-3. *
371 ! * (out) drho_dp - the partial derivative of density with *
372 ! * pressure (also the inverse of the square of *
373 ! * sound speed) in s2 m-2. *
374 ! * (in) start - the starting point in the arrays. *
375 ! * (in) npts - the number of values to calculate. *
376 ! *====================================================================*
377  real :: zs,zt,zp
378  integer :: j
379 
380  call calculate_density_array_nemo(t, s, pressure, rho, start, npts)
381  !
382  !NOTE: The following calculates the TEOS10 approximation to compressibility
383  ! since the corresponding NEMO approximation is not available yet.
384  !
385  do j=start,start+npts-1
386  !Conversions
387  zs = s(j) !gsw_sr_from_sp(S(j)) !Convert practical salinity to absolute salinity
388  zt = t(j) !gsw_ct_from_pt(S(j),T(j)) !Convert potantial temp to conservative temp
389  zp = pressure(j)* pa2db !Convert pressure from Pascal to decibar
390  call gsw_rho_first_derivatives(zs,zt,zp, drho_dp=drho_dp(j))
391  enddo
Here is the call graph for this function:
Here is the caller graph for this function:

◆ calculate_density_array_nemo()

subroutine, public mom_eos_nemo::calculate_density_array_nemo ( real, dimension(:), intent(in)  T,
real, dimension(:), intent(in)  S,
real, dimension(:), intent(in)  pressure,
real, dimension(:), intent(out)  rho,
integer, intent(in)  start,
integer, intent(in)  npts 
)

This subroutine computes the in situ density of sea water (rho in units of kg/m^3) from absolute salinity (S in g/Kg), conservative temperature (T in deg C), and pressure in Pa.

Parameters
[in]tConservative temperature in C.
[in]sAbsoulte salinity in g/Kg.
[in]pressurePressure in Pa.
[out]rhoIn situ density in kg m-3.
[in]startThe starting point in the arrays.
[in]nptsThe number of values to calculate.

Definition at line 213 of file MOM_EOS_NEMO.F90.

References eos000, eos001, eos002, eos003, eos010, eos011, eos012, eos013, eos020, eos021, eos022, eos030, eos031, eos040, eos041, eos050, eos060, eos100, eos101, eos102, eos103, eos110, eos111, eos112, eos120, eos121, eos130, eos131, eos140, eos150, eos200, eos201, eos202, eos210, eos211, eos220, eos221, eos230, eos240, eos300, eos301, eos310, eos311, eos320, eos330, eos400, eos401, eos410, eos420, eos500, eos510, eos600, pa2db, r00, r01, r02, r03, r04, r05, r1_p0, r1_s0, r1_t0, and rdeltas.

Referenced by calculate_compress_nemo(), and calculate_density_scalar_nemo().

213  real, intent(in), dimension(:) :: t !< Conservative temperature in C.
214  real, intent(in), dimension(:) :: s !< Absoulte salinity in g/Kg.
215  real, intent(in), dimension(:) :: pressure !< Pressure in Pa.
216  real, intent(out), dimension(:) :: rho !< In situ density in kg m-3.
217  integer, intent(in) :: start !< The starting point in the arrays.
218  integer, intent(in) :: npts !< The number of values to calculate.
219 
220 ! * Arguments: T - conservative temperature in C. *
221 ! * (in) S - absoulte salinity in g/Kg. *
222 ! * (in) pressure - pressure in Pa. *
223 ! * (out) rho - in situ density in kg m-3. *
224 ! * (in) start - the starting point in the arrays. *
225 ! * (in) npts - the number of values to calculate. *
226 
227 ! *====================================================================*
228 ! * This subroutine computes the in situ density of sea water (rho in *
229 ! * units of kg/m^3) from absolute salinity (S in g/Kg), *
230 ! * conservative temperature (T in deg C), and pressure in Pa. *
231 ! *====================================================================*
232  real :: zp,zt , zh , zs , zr0, zn , zn0, zn1, zn2, zn3
233  integer :: j
234 
235  do j=start,start+npts-1
236  !Conversions
237  zs = s(j) !gsw_sr_from_sp(S(j)) !Convert practical salinity to absolute salinity
238  zt = t(j) !gsw_ct_from_pt(S(j),T(j)) !Convert potantial temp to conservative temp
239  zp = pressure(j)* pa2db !Convert pressure from Pascal to decibar
240 
241  !The following algorithm was provided by Roquet in a private communication.
242  !It is not necessarily the algorithm used in NEMO ocean!
243  zp = zp * r1_p0 !pressure
244  zt = zt * r1_t0 !temperature
245  zs = sqrt( abs( zs + rdeltas ) * r1_s0 ) ! square root salinity
246  !
247  zn3 = eos013*zt &
248  & + eos103*zs+eos003
249  !
250  zn2 = (eos022*zt &
251  & + eos112*zs+eos012)*zt &
252  & + (eos202*zs+eos102)*zs+eos002
253  !
254  zn1 = (((eos041*zt &
255  & + eos131*zs+eos031)*zt &
256  & + (eos221*zs+eos121)*zs+eos021)*zt &
257  & + ((eos311*zs+eos211)*zs+eos111)*zs+eos011)*zt &
258  & + (((eos401*zs+eos301)*zs+eos201)*zs+eos101)*zs+eos001
259  !
260  zn0 = (((((eos060*zt &
261  & + eos150*zs+eos050)*zt &
262  & + (eos240*zs+eos140)*zs+eos040)*zt &
263  & + ((eos330*zs+eos230)*zs+eos130)*zs+eos030)*zt &
264  & + (((eos420*zs+eos320)*zs+eos220)*zs+eos120)*zs+eos020)*zt &
265  & + ((((eos510*zs+eos410)*zs+eos310)*zs+eos210)*zs+eos110)*zs+eos010)*zt &
266  & + (((((eos600*zs+eos500)*zs+eos400)*zs+eos300)*zs+eos200)*zs+eos100)*zs+eos000
267  !
268  zn = ( ( zn3 * zp + zn2 ) * zp + zn1 ) * zp + zn0
269  !
270  zr0 = (((((r05 * zp+r04) * zp+r03 ) * zp+r02 ) * zp+r01) * zp+r00) * zp
271  !
272  rho(j) = ( zn + zr0 ) ! density
273 
274  enddo
Here is the caller graph for this function:

◆ calculate_density_derivs_nemo()

subroutine, public mom_eos_nemo::calculate_density_derivs_nemo ( real, dimension(:), intent(in)  T,
real, dimension(:), intent(in)  S,
real, dimension(:), intent(in)  pressure,
real, dimension(:), intent(out)  drho_dT,
real, dimension(:), intent(out)  drho_dS,
integer, intent(in)  start,
integer, intent(in)  npts 
)
Parameters
[in]tConservative temperature in C.
[in]sAbsolute salinity in g/kg.
[in]pressurePressure in Pa.
[out]drho_dtThe partial derivative of density with potential temperature, in kg m-3 K-1.
[out]drho_dsThe partial derivative of density with salinity, in kg m-3 psu-1.
[in]startThe starting point in the arrays.
[in]nptsThe number of values to calculate.

Definition at line 278 of file MOM_EOS_NEMO.F90.

References alp000, alp001, alp002, alp003, alp010, alp011, alp012, alp020, alp021, alp030, alp031, alp040, alp050, alp100, alp101, alp102, alp110, alp111, alp120, alp121, alp130, alp140, alp200, alp201, alp210, alp211, alp220, alp230, alp300, alp301, alp310, alp320, alp400, alp410, alp500, bet000, bet001, bet002, bet003, bet010, bet011, bet012, bet020, bet021, bet030, bet031, bet040, bet050, bet100, bet101, bet102, bet110, bet111, bet120, bet121, bet130, bet140, bet200, bet201, bet210, bet211, bet220, bet230, bet300, bet301, bet310, bet320, bet400, bet410, bet500, pa2db, r1_p0, r1_s0, r1_t0, and rdeltas.

278  real, intent(in), dimension(:) :: t !< Conservative temperature in C.
279  real, intent(in), dimension(:) :: s !< Absolute salinity in g/kg.
280  real, intent(in), dimension(:) :: pressure !< Pressure in Pa.
281  real, intent(out), dimension(:) :: drho_dt !< The partial derivative of density with potential
282  !! temperature, in kg m-3 K-1.
283  real, intent(out), dimension(:) :: drho_ds !< The partial derivative of density with salinity,
284  !! in kg m-3 psu-1.
285  integer, intent(in) :: start !< The starting point in the arrays.
286  integer, intent(in) :: npts !< The number of values to calculate.
287 ! * Arguments: T - conservative temperature in C. *
288 ! * (in) S - absolute salinity in g/kg. *
289 ! * (in) pressure - pressure in Pa. *
290 ! * (out) drho_dT - the partial derivative of density with *
291 ! * potential temperature, in kg m-3 K-1. *
292 ! * (out) drho_dS - the partial derivative of density with *
293 ! * salinity, in kg m-3 psu-1. *
294 ! * (in) start - the starting point in the arrays. *
295 ! * (in) npts - the number of values to calculate. *
296  real :: zp,zt , zh , zs , zr0, zn , zn0, zn1, zn2, zn3
297  integer :: j
298 
299  do j=start,start+npts-1
300  !Conversions
301  zs = s(j) !gsw_sr_from_sp(S(j)) !Convert practical salinity to absolute salinity
302  zt = t(j) !gsw_ct_from_pt(S(j),T(j)) !Convert potantial temp to conservative temp
303  zp = pressure(j)* pa2db !Convert pressure from Pascal to decibar
304 
305  !The following algorithm was provided by Roquet in a private communication.
306  !It is not necessarily the algorithm used in NEMO ocean!
307  zp = zp * r1_p0 ! pressure (first converted to decibar)
308  zt = zt * r1_t0 ! temperature
309  zs = sqrt( abs( zs + rdeltas ) * r1_s0 ) ! square root salinity
310  !
311  ! alpha
312  zn3 = alp003
313  !
314  zn2 = alp012*zt + alp102*zs+alp002
315  !
316  zn1 = ((alp031*zt &
317  & + alp121*zs+alp021)*zt &
318  & + (alp211*zs+alp111)*zs+alp011)*zt &
319  & + ((alp301*zs+alp201)*zs+alp101)*zs+alp001
320  !
321  zn0 = ((((alp050*zt &
322  & + alp140*zs+alp040)*zt &
323  & + (alp230*zs+alp130)*zs+alp030)*zt &
324  & + ((alp320*zs+alp220)*zs+alp120)*zs+alp020)*zt &
325  & + (((alp410*zs+alp310)*zs+alp210)*zs+alp110)*zs+alp010)*zt &
326  & + ((((alp500*zs+alp400)*zs+alp300)*zs+alp200)*zs+alp100)*zs+alp000
327  !
328  zn = ( ( zn3 * zp + zn2 ) * zp + zn1 ) * zp + zn0
329  !
330  drho_dt(j) = -zn
331  !
332  ! beta
333  !
334  zn3 = bet003
335  !
336  zn2 = bet012*zt + bet102*zs+bet002
337  !
338  zn1 = ((bet031*zt &
339  & + bet121*zs+bet021)*zt &
340  & + (bet211*zs+bet111)*zs+bet011)*zt &
341  & + ((bet301*zs+bet201)*zs+bet101)*zs+bet001
342  !
343  zn0 = ((((bet050*zt &
344  & + bet140*zs+bet040)*zt &
345  & + (bet230*zs+bet130)*zs+bet030)*zt &
346  & + ((bet320*zs+bet220)*zs+bet120)*zs+bet020)*zt &
347  & + (((bet410*zs+bet310)*zs+bet210)*zs+bet110)*zs+bet010)*zt &
348  & + ((((bet500*zs+bet400)*zs+bet300)*zs+bet200)*zs+bet100)*zs+bet000
349  !
350  zn = ( ( zn3 * zp + zn2 ) * zp + zn1 ) * zp + zn0
351  !
352  drho_ds(j) = zn / zs
353  enddo
354 

◆ calculate_density_scalar_nemo()

subroutine, public mom_eos_nemo::calculate_density_scalar_nemo ( real, intent(in)  T,
real, intent(in)  S,
real, intent(in)  pressure,
real, intent(out)  rho 
)

Definition at line 184 of file MOM_EOS_NEMO.F90.

References calculate_density_array_nemo().

184 real, intent(in) :: t, s, pressure
185 real, intent(out) :: rho
186 ! * Arguments: T - conservative temperature in C. *
187 ! * (in) S - absoulte salinity in g/Kg. *
188 ! * (in) pressure - pressure in Pa. *
189 ! * (out) rho - in situ density in kg m-3. *
190 
191 ! *====================================================================*
192 ! * This subroutine computes the in situ density of sea water (rho in *
193 ! * units of kg/m^3) from absolute salinity (S in g/Kg), conservative *
194 ! * temperature (T in deg C), and pressure in Pa. *
195 ! *====================================================================*
196 
197  real :: al0, p0, lambda
198  integer :: j
199  real, dimension(1) :: t0, s0, pressure0
200  real, dimension(1) :: rho0
201 
202  t0(1) = t
203  s0(1) = s
204  pressure0(1) = pressure
205 
206  call calculate_density_array_nemo(t0, s0, pressure0, rho0, 1, 1)
207  rho = rho0(1)
Here is the call graph for this function:

Variable Documentation

◆ alp000

real, parameter mom_eos_nemo::alp000 = -6.5025362670e-01
private

Definition at line 108 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

108  real, parameter :: alp000 = -6.5025362670e-01

◆ alp001

real, parameter mom_eos_nemo::alp001 = 3.3340752782e-01
private

Definition at line 129 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

129  real, parameter :: alp001 = 3.3340752782e-01

◆ alp002

real, parameter mom_eos_nemo::alp002 = -5.1410778748e-02
private

Definition at line 139 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

139  real, parameter :: alp002 = -5.1410778748e-02

◆ alp003

real, parameter mom_eos_nemo::alp003 = -9.4924551138e-03
private

Definition at line 142 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

142  real, parameter :: alp003 = -9.4924551138e-03

◆ alp010

real, parameter mom_eos_nemo::alp010 = 1.8537085209
private

Definition at line 114 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

114  real, parameter :: alp010 = 1.8537085209

◆ alp011

real, parameter mom_eos_nemo::alp011 = -3.3540239802e-01
private

Definition at line 133 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

133  real, parameter :: alp011 = -3.3540239802e-01

◆ alp012

real, parameter mom_eos_nemo::alp012 = 6.2099915132e-02
private

Definition at line 141 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

141  real, parameter :: alp012 = 6.2099915132e-02

◆ alp020

real, parameter mom_eos_nemo::alp020 = -1.6246342147
private

Definition at line 119 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

119  real, parameter :: alp020 = -1.6246342147

◆ alp021

real, parameter mom_eos_nemo::alp021 = 1.8487252150e-01
private

Definition at line 136 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

136  real, parameter :: alp021 = 1.8487252150e-01

◆ alp030

real, parameter mom_eos_nemo::alp030 = 8.3627885467e-01
private

Definition at line 123 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

123  real, parameter :: alp030 = 8.3627885467e-01

◆ alp031

real, parameter mom_eos_nemo::alp031 = -5.5927935970e-02
private

Definition at line 138 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

138  real, parameter :: alp031 = -5.5927935970e-02

◆ alp040

real, parameter mom_eos_nemo::alp040 = -6.7560904739e-02
private

Definition at line 126 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

126  real, parameter :: alp040 = -6.7560904739e-02

◆ alp050

real, parameter mom_eos_nemo::alp050 = 2.8625353333e-02
private

Definition at line 128 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

128  real, parameter :: alp050 = 2.8625353333e-02

◆ alp100

real, parameter mom_eos_nemo::alp100 = 1.6320471316
private

Definition at line 109 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

109  real, parameter :: alp100 = 1.6320471316

◆ alp101

real, parameter mom_eos_nemo::alp101 = 1.1217528644e-01
private

Definition at line 130 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

130  real, parameter :: alp101 = 1.1217528644e-01

◆ alp102

real, parameter mom_eos_nemo::alp102 = 5.3278413794e-03
private

Definition at line 140 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

140  real, parameter :: alp102 = 5.3278413794e-03

◆ alp110

real, parameter mom_eos_nemo::alp110 = -3.0774129064
private

Definition at line 115 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

115  real, parameter :: alp110 = -3.0774129064

◆ alp111

real, parameter mom_eos_nemo::alp111 = -1.7531540640e-01
private

Definition at line 134 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

134  real, parameter :: alp111 = -1.7531540640e-01

◆ alp120

real, parameter mom_eos_nemo::alp120 = 2.5086831352
private

Definition at line 120 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

120  real, parameter :: alp120 = 2.5086831352

◆ alp121

real, parameter mom_eos_nemo::alp121 = 4.1307825959e-02
private

Definition at line 137 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

137  real, parameter :: alp121 = 4.1307825959e-02

◆ alp130

real, parameter mom_eos_nemo::alp130 = -1.1311538584
private

Definition at line 124 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

124  real, parameter :: alp130 = -1.1311538584

◆ alp140

real, parameter mom_eos_nemo::alp140 = -6.0212475204e-02
private

Definition at line 127 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

127  real, parameter :: alp140 = -6.0212475204e-02

◆ alp200

real, parameter mom_eos_nemo::alp200 = -2.0442606277
private

Definition at line 110 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

110  real, parameter :: alp200 = -2.0442606277

◆ alp201

real, parameter mom_eos_nemo::alp201 = -1.2510649515e-01
private

Definition at line 131 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

131  real, parameter :: alp201 = -1.2510649515e-01

◆ alp210

real, parameter mom_eos_nemo::alp210 = 3.0181275751
private

Definition at line 116 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

116  real, parameter :: alp210 = 3.0181275751

◆ alp211

real, parameter mom_eos_nemo::alp211 = 9.3976864981e-02
private

Definition at line 135 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

135  real, parameter :: alp211 = 9.3976864981e-02

◆ alp220

real, parameter mom_eos_nemo::alp220 = -1.4787808849
private

Definition at line 121 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

121  real, parameter :: alp220 = -1.4787808849

◆ alp230

real, parameter mom_eos_nemo::alp230 = 5.3563304045e-01
private

Definition at line 125 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

125  real, parameter :: alp230 = 5.3563304045e-01

◆ alp300

real, parameter mom_eos_nemo::alp300 = 1.4222011580
private

Definition at line 111 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

111  real, parameter :: alp300 = 1.4222011580

◆ alp301

real, parameter mom_eos_nemo::alp301 = 1.6349760916e-02
private

Definition at line 132 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

132  real, parameter :: alp301 = 1.6349760916e-02

◆ alp310

real, parameter mom_eos_nemo::alp310 = -1.4565010626
private

Definition at line 117 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

117  real, parameter :: alp310 = -1.4565010626

◆ alp320

real, parameter mom_eos_nemo::alp320 = 2.3807209899e-01
private

Definition at line 122 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

122  real, parameter :: alp320 = 2.3807209899e-01

◆ alp400

real, parameter mom_eos_nemo::alp400 = -4.4204535284e-01
private

Definition at line 112 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

112  real, parameter :: alp400 = -4.4204535284e-01

◆ alp410

real, parameter mom_eos_nemo::alp410 = 2.7361846370e-01
private

Definition at line 118 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

118  real, parameter :: alp410 = 2.7361846370e-01

◆ alp500

real, parameter mom_eos_nemo::alp500 = 4.7983755487e-02
private

Definition at line 113 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

113  real, parameter :: alp500 = 4.7983755487e-02

◆ bet000

real, parameter mom_eos_nemo::bet000 = 1.0783203594e+01
private

Definition at line 143 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

143  real, parameter :: bet000 = 1.0783203594e+01

◆ bet001

real, parameter mom_eos_nemo::bet001 = -5.2937873009e-01
private

Definition at line 164 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

164  real, parameter :: bet001 = -5.2937873009e-01

◆ bet002

real, parameter mom_eos_nemo::bet002 = -6.1618945251e-02
private

Definition at line 174 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

174  real, parameter :: bet002 = -6.1618945251e-02

◆ bet003

real, parameter mom_eos_nemo::bet003 = -2.3025968587e-04
private

Definition at line 177 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

177  real, parameter :: bet003 = -2.3025968587e-04

◆ bet010

real, parameter mom_eos_nemo::bet010 = -8.1219372432e-01
private

Definition at line 149 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

149  real, parameter :: bet010 = -8.1219372432e-01

◆ bet011

real, parameter mom_eos_nemo::bet011 = -5.5824407214e-02
private

Definition at line 168 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

168  real, parameter :: bet011 = -5.5824407214e-02

◆ bet012

real, parameter mom_eos_nemo::bet012 = -2.6514181169e-03
private

Definition at line 176 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

176  real, parameter :: bet012 = -2.6514181169e-03

◆ bet020

real, parameter mom_eos_nemo::bet020 = 7.6574242289e-01
private

Definition at line 154 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

154  real, parameter :: bet020 = 7.6574242289e-01

◆ bet021

real, parameter mom_eos_nemo::bet021 = 4.3623149752e-02
private

Definition at line 171 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

171  real, parameter :: bet021 = 4.3623149752e-02

◆ bet030

real, parameter mom_eos_nemo::bet030 = -4.1615152308e-01
private

Definition at line 158 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

158  real, parameter :: bet030 = -4.1615152308e-01

◆ bet031

real, parameter mom_eos_nemo::bet031 = -6.8523260060e-03
private

Definition at line 173 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

173  real, parameter :: bet031 = -6.8523260060e-03

◆ bet040

real, parameter mom_eos_nemo::bet040 = 1.4073062708e-01
private

Definition at line 161 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

161  real, parameter :: bet040 = 1.4073062708e-01

◆ bet050

real, parameter mom_eos_nemo::bet050 = 5.9929880134e-03
private

Definition at line 163 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

163  real, parameter :: bet050 = 5.9929880134e-03

◆ bet100

real, parameter mom_eos_nemo::bet100 = -4.4452095908e+01
private

Definition at line 144 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

144  real, parameter :: bet100 = -4.4452095908e+01

◆ bet101

real, parameter mom_eos_nemo::bet101 = 1.2634116779
private

Definition at line 165 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

165  real, parameter :: bet101 = 1.2634116779

◆ bet102

real, parameter mom_eos_nemo::bet102 = 6.2255521644e-02
private

Definition at line 175 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

175  real, parameter :: bet102 = 6.2255521644e-02

◆ bet110

real, parameter mom_eos_nemo::bet110 = 2.0346663041
private

Definition at line 150 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

150  real, parameter :: bet110 = 2.0346663041

◆ bet111

real, parameter mom_eos_nemo::bet111 = 1.2451933313e-01
private

Definition at line 169 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

169  real, parameter :: bet111 = 1.2451933313e-01

◆ bet120

real, parameter mom_eos_nemo::bet120 = -1.5019813020
private

Definition at line 155 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

155  real, parameter :: bet120 = -1.5019813020

◆ bet121

real, parameter mom_eos_nemo::bet121 = -4.6767901790e-02
private

Definition at line 172 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

172  real, parameter :: bet121 = -4.6767901790e-02

◆ bet130

real, parameter mom_eos_nemo::bet130 = 4.9061350869e-01
private

Definition at line 159 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

159  real, parameter :: bet130 = 4.9061350869e-01

◆ bet140

real, parameter mom_eos_nemo::bet140 = -1.3327978879e-01
private

Definition at line 162 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

162  real, parameter :: bet140 = -1.3327978879e-01

◆ bet200

real, parameter mom_eos_nemo::bet200 = 7.6048755820e+01
private

Definition at line 145 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

145  real, parameter :: bet200 = 7.6048755820e+01

◆ bet201

real, parameter mom_eos_nemo::bet201 = -1.1547328025
private

Definition at line 166 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

166  real, parameter :: bet201 = -1.1547328025

◆ bet210

real, parameter mom_eos_nemo::bet210 = -2.1232895170
private

Definition at line 151 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

151  real, parameter :: bet210 = -2.1232895170

◆ bet211

real, parameter mom_eos_nemo::bet211 = -2.4409539932e-02
private

Definition at line 170 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

170  real, parameter :: bet211 = -2.4409539932e-02

◆ bet220

real, parameter mom_eos_nemo::bet220 = 1.0872489522
private

Definition at line 156 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

156  real, parameter :: bet220 = 1.0872489522

◆ bet230

real, parameter mom_eos_nemo::bet230 = -1.1847737788e-01
private

Definition at line 160 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

160  real, parameter :: bet230 = -1.1847737788e-01

◆ bet300

real, parameter mom_eos_nemo::bet300 = -6.3944280668e+01
private

Definition at line 146 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

146  real, parameter :: bet300 = -6.3944280668e+01

◆ bet301

real, parameter mom_eos_nemo::bet301 = 3.2870876279e-01
private

Definition at line 167 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

167  real, parameter :: bet301 = 3.2870876279e-01

◆ bet310

real, parameter mom_eos_nemo::bet310 = 8.7994140485e-01
private

Definition at line 152 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

152  real, parameter :: bet310 = 8.7994140485e-01

◆ bet320

real, parameter mom_eos_nemo::bet320 = -2.7233429080e-01
private

Definition at line 157 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

157  real, parameter :: bet320 = -2.7233429080e-01

◆ bet400

real, parameter mom_eos_nemo::bet400 = 2.6890441098e+01
private

Definition at line 147 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

147  real, parameter :: bet400 = 2.6890441098e+01

◆ bet410

real, parameter mom_eos_nemo::bet410 = -1.1939638360e-01
private

Definition at line 153 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

153  real, parameter :: bet410 = -1.1939638360e-01

◆ bet500

real, parameter mom_eos_nemo::bet500 = -4.5221697773
private

Definition at line 148 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_derivs_nemo().

148  real, parameter :: bet500 = -4.5221697773

◆ eos000

real, parameter mom_eos_nemo::eos000 = 8.0189615746e+02
private

Definition at line 56 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

56  real, parameter :: eos000 = 8.0189615746e+02

◆ eos001

real, parameter mom_eos_nemo::eos001 = 1.9681925209e+01
private

Definition at line 84 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

84  real, parameter :: eos001 = 1.9681925209e+01

◆ eos002

real, parameter mom_eos_nemo::eos002 = 2.0660924175
private

Definition at line 99 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

99  real, parameter :: eos002 = 2.0660924175

◆ eos003

real, parameter mom_eos_nemo::eos003 = -2.3342758797e-02
private

Definition at line 105 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

105  real, parameter :: eos003 = -2.3342758797e-02

◆ eos010

real, parameter mom_eos_nemo::eos010 = 2.6010145068e+01
private

Definition at line 63 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

63  real, parameter :: eos010 = 2.6010145068e+01

◆ eos011

real, parameter mom_eos_nemo::eos011 = -1.3336301113e+01
private

Definition at line 89 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

89  real, parameter :: eos011 = -1.3336301113e+01

◆ eos012

real, parameter mom_eos_nemo::eos012 = 2.0564311499
private

Definition at line 102 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

102  real, parameter :: eos012 = 2.0564311499

◆ eos013

real, parameter mom_eos_nemo::eos013 = 3.7969820455e-01
private

Definition at line 107 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

107  real, parameter :: eos013 = 3.7969820455e-01

◆ eos020

real, parameter mom_eos_nemo::eos020 = -3.7074170417e+01
private

Definition at line 69 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

69  real, parameter :: eos020 = -3.7074170417e+01

◆ eos021

real, parameter mom_eos_nemo::eos021 = 6.7080479603
private

Definition at line 93 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

93  real, parameter :: eos021 = 6.7080479603

◆ eos022

real, parameter mom_eos_nemo::eos022 = -1.2419983026
private

Definition at line 104 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

104  real, parameter :: eos022 = -1.2419983026

◆ eos030

real, parameter mom_eos_nemo::eos030 = 2.1661789529e+01
private

Definition at line 74 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

74  real, parameter :: eos030 = 2.1661789529e+01

◆ eos031

real, parameter mom_eos_nemo::eos031 = -2.4649669534
private

Definition at line 96 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

96  real, parameter :: eos031 = -2.4649669534

◆ eos040

real, parameter mom_eos_nemo::eos040 = -8.3627885467
private

Definition at line 78 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

78  real, parameter :: eos040 = -8.3627885467

◆ eos041

real, parameter mom_eos_nemo::eos041 = 5.5927935970e-01
private

Definition at line 98 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

98  real, parameter :: eos041 = 5.5927935970e-01

◆ eos050

real, parameter mom_eos_nemo::eos050 = 5.4048723791e-01
private

Definition at line 81 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

81  real, parameter :: eos050 = 5.4048723791e-01

◆ eos060

real, parameter mom_eos_nemo::eos060 = -1.9083568888e-01
private

Definition at line 83 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

83  real, parameter :: eos060 = -1.9083568888e-01

◆ eos100

real, parameter mom_eos_nemo::eos100 = 8.6672408165e+02
private

Definition at line 57 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

57  real, parameter :: eos100 = 8.6672408165e+02

◆ eos101

real, parameter mom_eos_nemo::eos101 = -4.2549998214e+01
private

Definition at line 85 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

85  real, parameter :: eos101 = -4.2549998214e+01

◆ eos102

real, parameter mom_eos_nemo::eos102 = -4.9527603989
private

Definition at line 100 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

100  real, parameter :: eos102 = -4.9527603989

◆ eos103

real, parameter mom_eos_nemo::eos103 = -1.8507636718e-02
private

Definition at line 106 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

106  real, parameter :: eos103 = -1.8507636718e-02

◆ eos110

real, parameter mom_eos_nemo::eos110 = -6.5281885265e+01
private

Definition at line 64 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

64  real, parameter :: eos110 = -6.5281885265e+01

◆ eos111

real, parameter mom_eos_nemo::eos111 = -4.4870114575
private

Definition at line 90 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

90  real, parameter :: eos111 = -4.4870114575

◆ eos112

real, parameter mom_eos_nemo::eos112 = -2.1311365518e-01
private

Definition at line 103 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

103  real, parameter :: eos112 = -2.1311365518e-01

◆ eos120

real, parameter mom_eos_nemo::eos120 = 6.1548258127e+01
private

Definition at line 70 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

70  real, parameter :: eos120 = 6.1548258127e+01

◆ eos121

real, parameter mom_eos_nemo::eos121 = 3.5063081279
private

Definition at line 94 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

94  real, parameter :: eos121 = 3.5063081279

◆ eos130

real, parameter mom_eos_nemo::eos130 = -3.3449108469e+01
private

Definition at line 75 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

75  real, parameter :: eos130 = -3.3449108469e+01

◆ eos131

real, parameter mom_eos_nemo::eos131 = -5.5077101279e-01
private

Definition at line 97 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

97  real, parameter :: eos131 = -5.5077101279e-01

◆ eos140

real, parameter mom_eos_nemo::eos140 = 1.1311538584e+01
private

Definition at line 79 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

79  real, parameter :: eos140 = 1.1311538584e+01

◆ eos150

real, parameter mom_eos_nemo::eos150 = 4.8169980163e-01
private

Definition at line 82 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

82  real, parameter :: eos150 = 4.8169980163e-01

◆ eos200

real, parameter mom_eos_nemo::eos200 = -1.7864682637e+03
private

Definition at line 58 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

58  real, parameter :: eos200 = -1.7864682637e+03

◆ eos201

real, parameter mom_eos_nemo::eos201 = 5.0774768218e+01
private

Definition at line 86 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

86  real, parameter :: eos201 = 5.0774768218e+01

◆ eos202

real, parameter mom_eos_nemo::eos202 = 2.5019633244
private

Definition at line 101 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

101  real, parameter :: eos202 = 2.5019633244

◆ eos210

real, parameter mom_eos_nemo::eos210 = 8.1770425108e+01
private

Definition at line 65 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

65  real, parameter :: eos210 = 8.1770425108e+01

◆ eos211

real, parameter mom_eos_nemo::eos211 = 5.0042598061
private

Definition at line 91 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

91  real, parameter :: eos211 = 5.0042598061

◆ eos220

real, parameter mom_eos_nemo::eos220 = -6.0362551501e+01
private

Definition at line 71 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

71  real, parameter :: eos220 = -6.0362551501e+01

◆ eos221

real, parameter mom_eos_nemo::eos221 = -1.8795372996
private

Definition at line 95 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

95  real, parameter :: eos221 = -1.8795372996

◆ eos230

real, parameter mom_eos_nemo::eos230 = 1.9717078466e+01
private

Definition at line 76 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

76  real, parameter :: eos230 = 1.9717078466e+01

◆ eos240

real, parameter mom_eos_nemo::eos240 = -5.3563304045
private

Definition at line 80 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

80  real, parameter :: eos240 = -5.3563304045

◆ eos300

real, parameter mom_eos_nemo::eos300 = 2.0375295546e+03
private

Definition at line 59 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

59  real, parameter :: eos300 = 2.0375295546e+03

◆ eos301

real, parameter mom_eos_nemo::eos301 = -3.0938076334e+01
private

Definition at line 87 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

87  real, parameter :: eos301 = -3.0938076334e+01

◆ eos310

real, parameter mom_eos_nemo::eos310 = -5.6888046321e+01
private

Definition at line 66 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

66  real, parameter :: eos310 = -5.6888046321e+01

◆ eos311

real, parameter mom_eos_nemo::eos311 = -6.5399043664e-01
private

Definition at line 92 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

92  real, parameter :: eos311 = -6.5399043664e-01

◆ eos320

real, parameter mom_eos_nemo::eos320 = 2.9130021253e+01
private

Definition at line 72 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

72  real, parameter :: eos320 = 2.9130021253e+01

◆ eos330

real, parameter mom_eos_nemo::eos330 = -3.1742946532
private

Definition at line 77 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

77  real, parameter :: eos330 = -3.1742946532

◆ eos400

real, parameter mom_eos_nemo::eos400 = -1.2849161071e+03
private

Definition at line 60 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

60  real, parameter :: eos400 = -1.2849161071e+03

◆ eos401

real, parameter mom_eos_nemo::eos401 = 6.6051753097
private

Definition at line 88 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

88  real, parameter :: eos401 = 6.6051753097

◆ eos410

real, parameter mom_eos_nemo::eos410 = 1.7681814114e+01
private

Definition at line 67 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

67  real, parameter :: eos410 = 1.7681814114e+01

◆ eos420

real, parameter mom_eos_nemo::eos420 = -5.4723692739
private

Definition at line 73 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

73  real, parameter :: eos420 = -5.4723692739

◆ eos500

real, parameter mom_eos_nemo::eos500 = 4.3227585684e+02
private

Definition at line 61 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

61  real, parameter :: eos500 = 4.3227585684e+02

◆ eos510

real, parameter mom_eos_nemo::eos510 = -1.9193502195
private

Definition at line 68 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

68  real, parameter :: eos510 = -1.9193502195

◆ eos600

real, parameter mom_eos_nemo::eos600 = -6.0579916612e+01
private

Definition at line 62 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

62  real, parameter :: eos600 = -6.0579916612e+01

◆ pa2db

real, parameter mom_eos_nemo::pa2db = 1.e-4
private

Definition at line 45 of file MOM_EOS_NEMO.F90.

Referenced by calculate_compress_nemo(), calculate_density_array_nemo(), and calculate_density_derivs_nemo().

45  real, parameter :: pa2db = 1.e-4

◆ r00

real, parameter mom_eos_nemo::r00 = 4.6494977072e+01
private

Definition at line 50 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

50  real, parameter :: r00 = 4.6494977072e+01

◆ r01

real, parameter mom_eos_nemo::r01 = -5.2099962525
private

Definition at line 51 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

51  real, parameter :: r01 = -5.2099962525

◆ r02

real, parameter mom_eos_nemo::r02 = 2.2601900708e-01
private

Definition at line 52 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

52  real, parameter :: r02 = 2.2601900708e-01

◆ r03

real, parameter mom_eos_nemo::r03 = 6.4326772569e-02
private

Definition at line 53 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

53  real, parameter :: r03 = 6.4326772569e-02

◆ r04

real, parameter mom_eos_nemo::r04 = 1.5616995503e-02
private

Definition at line 54 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

54  real, parameter :: r04 = 1.5616995503e-02

◆ r05

real, parameter mom_eos_nemo::r05 = -1.7243708991e-03
private

Definition at line 55 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo().

55  real, parameter :: r05 = -1.7243708991e-03

◆ r1_p0

real, parameter mom_eos_nemo::r1_p0 = 1.e-4
private

Definition at line 49 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo(), and calculate_density_derivs_nemo().

49  real, parameter :: r1_p0 = 1.e-4

◆ r1_s0

real, parameter mom_eos_nemo::r1_s0 = 0.875/35.16504
private

Definition at line 47 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo(), and calculate_density_derivs_nemo().

47  real, parameter :: r1_s0 = 0.875/35.16504

◆ r1_t0

real, parameter mom_eos_nemo::r1_t0 = 1./40.
private

Definition at line 48 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo(), and calculate_density_derivs_nemo().

48  real, parameter :: r1_t0 = 1./40.

◆ rdeltas

real, parameter mom_eos_nemo::rdeltas = 32.
private

Definition at line 46 of file MOM_EOS_NEMO.F90.

Referenced by calculate_density_array_nemo(), and calculate_density_derivs_nemo().

46  real, parameter :: rdeltas = 32.