/*****************************************************************/
#if defined(SDENS12)
#if defined(DOUBLE_PRES)
      implicit double precision (a-c)
c Error norm0(max) =   7.4428    
c Error norm2(rms) =   1.1234    
#if defined(SIGMA)
c in situ SIGMA (rho-1000 kg/m^3) density as a function of
c in situ temperature, salinity & pressure.
      data a0  / -1.5843939931764703E-01 /
      data a1  /  4.7270144711352193E-02 /
      data a2  / -2.9397698827436812E-03 /
      data a3  / -7.4739134414726020E-03 /
      data a4  /  3.3785607358454141E-05 /
      data a5  /  4.2345159659840616E-07 /
      data a6  /  3.5492171626440836E-05 /
      data a7  /  8.0760604501362962E-01 /
      data a8  / -7.5343589902807757E-06 /
      data a9  /  5.0204028880325237E-03 /
      data a10 / -2.8190006182690186E-05 /
      data a11 / -4.8593042192581616E-08 /
      data a12 /  4.9424959288401026E-10 /
#else
c in situ density (kg/m^3) as a function of
c in situ temperature, salinity & pressure.
      data a0  /  9.9984156060068153E+02 /
      data a1  /  4.7270144711414658E-02 /
      data a2  / -2.9397698827454119E-03 /
      data a3  / -7.4739134414735257E-03 /
      data a4  /  3.3785607358473184E-05 /
      data a5  /  4.2345159659804902E-07 /
      data a6  /  3.5492171626444934E-05 /
      data a7  /  8.0760604501365325E-01 /
      data a8  / -7.5343589902855958E-06 /
      data a9  /  5.0204028880326863E-03 /
      data a10 / -2.8190006182677018E-05 /
      data a11 / -4.8593042192585249E-08 /
      data a12 /  4.9424959288174381E-10 /
#endif
#else
#if defined(SIGMA)
      data a0  / -1.584394E-01 /
      data a1  /  4.727015E-02 /
      data a2  / -2.939770E-03 /
      data a3  / -7.473913E-03 /
      data a4  /  3.378561E-05 /
      data a5  /  4.234516E-07 /
      data a6  /  3.549217E-05 /
      data a7  /  8.076060E-01 /
      data a8  / -7.534359E-06 /
      data a9  /  5.020403E-03 /
      data a10 / -2.819001E-05 /
      data a11 / -4.859304E-08 /
      data a12 /  4.942496E-10 /
#else
      data a0  /  9.998416E+02 /
      data a1  /  4.727015E-02 /
      data a2  / -2.939770E-03 /
      data a3  / -7.473913E-03 /
      data a4  /  3.378561E-05 /
      data a5  /  4.234516E-07 /
      data a6  /  3.549217E-05 /
      data a7  /  8.076060E-01 /
      data a8  / -7.534359E-06 /
      data a9  /  5.020403E-03 /
      data a10 / -2.819001E-05 /
      data a11 / -4.859304E-08 /
      data a12 /  4.942496E-10 /
#endif
#endif
/*****************************************************************/
#elif defined(PDENS12)
#if defined(DOUBLE_PRES)
      implicit double precision (a-c)
c Error norm0(max) =   7.7819    
c Error norm2(rms) =  0.97816    
#if defined(SIGMA)
c in situ SIGMA (rho-1000 kg/m^3) density as a function of
c potential temperature, salinity & pressure.
      data a0  / -1.5504924602274576E-01 /
      data a1  /  4.7242360502523430E-02 /
      data a2  / -2.9355135788240534E-03 /
      data a3  / -7.4801638387312063E-03 /
      data a4  /  3.3806262972047482E-05 /
      data a5  /  3.6995743312311981E-07 /
      data a6  /  3.5589087697667882E-05 /
      data a7  /  8.0747615263133187E-01 /
      data a8  / -8.0022984647741619E-06 /
      data a9  /  5.0377429128316340E-03 /
      data a10 / -2.9566247219663237E-05 /
      data a11 / -5.1678728359398036E-08 /
      data a12 /  3.7388128423166246E-10 /
#else
c in situ density (kg/m^3) as a function of
c potential temperature, salinity & pressure.
      data a0  /  9.9984495075397717E+02 /
      data a1  /  4.7242360502556559E-02 /
      data a2  / -2.9355135788249624E-03 /
      data a3  / -7.4801638387318654E-03 /
      data a4  /  3.3806262972062488E-05 /
      data a5  /  3.6995743312330793E-07 /
      data a6  /  3.5589087697669534E-05 /
      data a7  /  8.0747615263133631E-01 /
      data a8  / -8.0022984647632515E-06 /
      data a9  /  5.0377429128311419E-03 /
      data a10 / -2.9566247219662127E-05 /
      data a11 / -5.1678728359375112E-08 /
      data a12 /  3.7388128423099962E-10 /
#endif
#else
#if defined(SIGMA)
      data a0  / -1.550492E-01 /
      data a1  /  4.724236E-02 /
      data a2  / -2.935514E-03 /
      data a3  / -7.480164E-03 /
      data a4  /  3.380626E-05 /
      data a5  /  3.699574E-07 /
      data a6  /  3.558909E-05 /
      data a7  /  8.074762E-01 /
      data a8  / -8.002298E-06 /
      data a9  /  5.037743E-03 /
      data a10 / -2.956625E-05 /
      data a11 / -5.167873E-08 /
      data a12 /  3.738813E-10 /
#else
      data a0  /  9.998450E+02 /
      data a1  /  4.724236E-02 /
      data a2  / -2.935514E-03 /
      data a3  / -7.480164E-03 /
      data a4  /  3.380626E-05 /
      data a5  /  3.699574E-07 /
      data a6  /  3.558909E-05 /
      data a7  /  8.074762E-01 /
      data a8  / -8.002298E-06 /
      data a9  /  5.037743E-03 /
      data a10 / -2.956625E-05 /
      data a11 / -5.167873E-08 /
      data a12 /  3.738813E-10 /
#endif
#endif
/*****************************************************************/
#elif defined(SDENS14)
#if defined(DOUBLE_PRES)
      implicit double precision (a-c)
c Error norm0(max) =   5.1297    
c Error norm2(rms) =  0.88617    
#if defined(SIGMA)
c in situ SIGMA (rho-1000 kg/m^3) density as a function of
c in situ temperature, salinity & pressure.
      data b0  / -1.5457113356963887E-01 /
      data b1  /  4.8274161492139198E-02 /
      data b2  / -2.9293422042122445E-03 /
      data b3  / -7.8297202416628062E-03 /
      data b4  /  3.3396251597915589E-05 /
      data b5  /  5.0305514971841871E-07 /
      data b6  /  5.9242306039765049E-05 /
      data b7  / -1.8761935916554911E-09 /
      data b8  / -4.4004698349207185E-07 /
      data b9  /  8.0754330842184014E-01 /
      data b10 / -7.5199970104093241E-06 /
      data b11 /  5.0192251646580583E-03 /
      data b12 / -2.8691551307377988E-05 /
      data b13 / -4.8525837979105048E-08 /
      data b14 /  5.2821790042401373E-10 /
#else
c in situ density (kg/m^3) as a function of
c in situ temperature, salinity & pressure.
      data b0  /  9.9984542886643077E+02 /
      data b1  /  4.8274161492148248E-02 /
      data b2  / -2.9293422042124026E-03 /
      data b3  / -7.8297202416636828E-03 /
      data b4  /  3.3396251597949877E-05 /
      data b5  /  5.0305514971833975E-07 /
      data b6  /  5.9242306039746903E-05 /
      data b7  / -1.8761935917385809E-09 /
      data b8  / -4.4004698349169419E-07 /
      data b9  /  8.0754330842182504E-01 /
      data b10 / -7.5199970104007531E-06 /
      data b11 /  5.0192251646578691E-03 /
      data b12 / -2.8691551307371017E-05 /
      data b13 / -4.8525837979127866E-08 /
      data b14 /  5.2821790042306595E-10 /
#endif
#else
#if defined(SIGMA)
      data b0  / -1.545711E-01 /
      data b1  /  4.827416E-02 /
      data b2  / -2.929342E-03 /
      data b3  / -7.829720E-03 /
      data b4  /  3.339625E-05 /
      data b5  /  5.030552E-07 /
      data b6  /  5.924231E-05 /
      data b7  / -1.876194E-09 /
      data b8  / -4.400470E-07 /
      data b9  /  8.075433E-01 /
      data b10 / -7.519997E-06 /
      data b11 /  5.019225E-03 /
      data b12 / -2.869155E-05 /
      data b13 / -4.852584E-08 /
      data b14 /  5.282179E-10 /
#else
      data b0  /  9.998455E+02 /
      data b1  /  4.827416E-02 /
      data b2  / -2.929342E-03 /
      data b3  / -7.829720E-03 /
      data b4  /  3.339625E-05 /
      data b5  /  5.030552E-07 /
      data b6  /  5.924231E-05 /
      data b7  / -1.876194E-09 /
      data b8  / -4.400470E-07 /
      data b9  /  8.075433E-01 /
      data b10 / -7.519997E-06 /
      data b11 /  5.019225E-03 /
      data b12 / -2.869155E-05 /
      data b13 / -4.852584E-08 /
      data b14 /  5.282179E-10 /
#endif
#endif
/*****************************************************************/
#elif defined(PDENS14)
#if defined(DOUBLE_PRES)
      implicit double precision (a-c)
c Error norm0(max) =   4.7042    
c Error norm2(rms) =  0.65810    
#if defined(SIGMA)
c in situ SIGMA (rho-1000 kg/m^3) density as a function of
c potential temperature, salinity & pressure.
      data b0  / -1.5099543208979131E-01 /
      data b1  /  4.8293064514940597E-02 /
      data b2  / -2.9238713403522172E-03 /
      data b3  / -7.8571184248837324E-03 /
      data b4  /  3.3385891265010374E-05 /
      data b5  /  4.6172868001366538E-07 /
      data b6  /  6.0751904648027190E-05 /
      data b7  / -2.2842291682861128E-09 /
      data b8  / -4.6613942915278920E-07 /
      data b9  /  8.0741085100371474E-01 /
      data b10 / -7.9879608235234487E-06 /
      data b11 /  5.0365498988416534E-03 /
      data b12 / -3.0158261301038717E-05 /
      data b13 / -5.1618517301301070E-08 /
      data b14 /  4.2164188192037137E-10 /
#else
c in situ density (kg/m^3) as a function of
c potential temperature, salinity & pressure.
      data b0  /  9.9984900456791012E+02 /
      data b1  /  4.8293064514949266E-02 /
      data b2  / -2.9238713403523647E-03 /
      data b3  / -7.8571184248856917E-03 /
      data b4  /  3.3385891265004397E-05 /
      data b5  /  4.6172868001376228E-07 /
      data b6  /  6.0751904648172017E-05 /
      data b7  / -2.2842291682672226E-09 /
      data b8  / -4.6613942915550268E-07 /
      data b9  /  8.0741085100371918E-01 /
      data b10 / -7.9879608235240731E-06 /
      data b11 /  5.0365498988416810E-03 /
      data b12 / -3.0158261301038322E-05 /
      data b13 / -5.1618517301306345E-08 /
      data b14 /  4.2164188191996903E-10 /
#endif
#else
#if defined(SIGMA)
      data b0  / -1.509954E-01 /
      data b1  /  4.829307E-02 /
      data b2  / -2.923871E-03 /
      data b3  / -7.857119E-03 /
      data b4  /  3.338589E-05 /
      data b5  /  4.617287E-07 /
      data b6  /  6.075190E-05 /
      data b7  / -2.284229E-09 /
      data b8  / -4.661394E-07 /
      data b9  /  8.074108E-01 /
      data b10 / -7.987961E-06 /
      data b11 /  5.036550E-03 /
      data b12 / -3.015826E-05 /
      data b13 / -5.161852E-08 /
      data b14 /  4.216419E-10 /
#else
      data b0  /  9.998490E+02 /
      data b1  /  4.829307E-02 /
      data b2  / -2.923871E-03 /
      data b3  / -7.857119E-03 /
      data b4  /  3.338589E-05 /
      data b5  /  4.617287E-07 /
      data b6  /  6.075190E-05 /
      data b7  / -2.284229E-09 /
      data b8  / -4.661394E-07 /
      data b9  /  8.074108E-01 /
      data b10 / -7.987961E-06 /
      data b11 /  5.036550E-03 /
      data b12 / -3.015826E-05 /
      data b13 / -5.161852E-08 /
      data b14 /  4.216419E-10 /
#endif
#endif
/*****************************************************************/
#elif defined(SDENS17)
#if defined(DOUBLE_PRES)
      implicit double precision (a-c)
c Error norm0(max) =   3.7240    
c Error norm2(rms) =  0.71822    
#if defined(SIGMA)
c in situ SIGMA (rho-1000 kg/m^3) density as a function of
c in situ temperature, salinity & pressure.
      data c0  / -1.6243434496636450E-01 /
      data c1  /  5.7535908559764719E-02 /
      data c2  / -3.1837995831724064E-03 /
      data c3  / -8.6797786092135336E-03 /
      data c4  /  5.4648837967931438E-05 /
      data c5  /  6.5185416868478354E-07 /
      data c6  /  8.1826851053890479E-05 /
      data c7  / -4.4858245406792951E-07 /
      data c8  / -7.6560639600702460E-09 /
      data c9  / -5.6615940292929387E-07 /
      data c10 /  8.0777616156676312E-01 /
      data c11 / -7.9776236744412338E-06 /
      data c12 /  1.7675041439612339E-07 /
      data c13 /  5.0351140611567597E-03 /
      data c14 / -3.5488739799483131E-05 /
      data c15 / -4.8509877279023854E-08 /
      data c16 /  6.6352773503588382E-10 /
      data c17 / -2.7658618545499495E-11 /
#else
c in situ density (kg/m^3) as a function of
c in situ temperature, salinity & pressure.
      data c0  /  9.9983756565503369E+02 /
      data c1  /  5.7535908559893584E-02 /
      data c2  / -3.1837995831754497E-03 /
      data c3  / -8.6797786092314073E-03 /
      data c4  /  5.4648837968225851E-05 /
      data c5  /  6.5185416868858991E-07 /
      data c6  /  8.1826851054623155E-05 /
      data c7  / -4.4858245407464298E-07 /
      data c8  / -7.6560639602356630E-09 /
      data c9  / -5.6615940293851219E-07 /
      data c10 /  8.0777616156676277E-01 /
      data c11 / -7.9776236744555211E-06 /
      data c12 /  1.7675041439849216E-07 /
      data c13 /  5.0351140611571949E-03 /
      data c14 / -3.5488739799566748E-05 /
      data c15 / -4.8509877279009829E-08 /
      data c16 /  6.6352773503562794E-10 /
      data c17 / -2.7658618546087971E-11 /
#endif
#else
#if defined(SIGMA)
      data c0  / -1.624343E-01 /
      data c1  /  5.753591E-02 /
      data c2  / -3.183800E-03 /
      data c3  / -8.679778E-03 /
      data c4  /  5.464884E-05 /
      data c5  /  6.518542E-07 /
      data c6  /  8.182685E-05 /
      data c7  / -4.485825E-07 /
      data c8  / -7.656064E-09 /
      data c9  / -5.661594E-07 /
      data c10 /  8.077762E-01 /
      data c11 / -7.977624E-06 /
      data c12 /  1.767504E-07 /
      data c13 /  5.035114E-03 /
      data c14 / -3.548874E-05 /
      data c15 / -4.850988E-08 /
      data c16 /  6.635277E-10 /
      data c17 / -2.765862E-11 /
#else
      data c0  /  9.998376E+02 /
      data c1  /  5.753591E-02 /
      data c2  / -3.183800E-03 /
      data c3  / -8.679778E-03 /
      data c4  /  5.464884E-05 /
      data c5  /  6.518542E-07 /
      data c6  /  8.182685E-05 /
      data c7  / -4.485825E-07 /
      data c8  / -7.656064E-09 /
      data c9  / -5.661594E-07 /
      data c10 /  8.077762E-01 /
      data c11 / -7.977624E-06 /
      data c12 /  1.767504E-07 /
      data c13 /  5.035114E-03 /
      data c14 / -3.548874E-05 /
      data c15 / -4.850988E-08 /
      data c16 /  6.635277E-10 /
      data c17 / -2.765862E-11 /
#endif
#endif
/*****************************************************************/
#elif defined(PDENS17)
#if defined(DOUBLE_PRES)
      implicit double precision (a-c)
c Error norm0(max) =   2.8225    
c Error norm2(rms) =  0.52139    
#if defined(SIGMA)
c in situ SIGMA (rho-1000 kg/m^3) density as a function of
c potential temperature, salinity & pressure.
      data c0  / -1.5862652198103819E-01 /
      data c1  /  5.7207239651872372E-02 /
      data c2  / -3.1733586873196486E-03 /
      data c3  / -8.6709261650891846E-03 /
      data c4  /  5.4773992446508810E-05 /
      data c5  /  5.5410488944578117E-07 /
      data c6  /  8.1300196759789216E-05 /
      data c7  / -4.5995132105162293E-07 /
      data c8  / -6.0525121543258126E-09 /
      data c9  / -5.4999448818125165E-07 /
      data c10 /  8.0763554004703426E-01 /
      data c11 / -8.3777800126292660E-06 /
      data c12 /  1.6315692381057324E-07 /
      data c13 /  5.0500721785257240E-03 /
      data c14 / -3.6208523725344514E-05 /
      data c15 / -5.1597455716244535E-08 /
      data c16 /  4.9863336832618436E-10 /
      data c17 / -1.7971906682917162E-11 /
#else
c in situ density (kg/m^3) as a function of
c potential temperature, salinity & pressure.
      data c0  /  9.9984137347801924E+02 /
      data c1  /  5.7207239651807189E-02 /
      data c2  / -3.1733586873184598E-03 /
      data c3  / -8.6709261650839319E-03 /
      data c4  /  5.4773992446462695E-05 /
      data c5  /  5.5410488944324889E-07 /
      data c6  /  8.1300196759551894E-05 /
      data c7  / -4.5995132105069007E-07 /
      data c8  / -6.0525121542334305E-09 /
      data c9  / -5.4999448817739962E-07 /
      data c10 /  8.0763554004702662E-01 /
      data c11 / -8.3777800126130657E-06 /
      data c12 /  1.6315692380962662E-07 /
      data c13 /  5.0500721785252249E-03 /
      data c14 / -3.6208523725296442E-05 /
      data c15 / -5.1597455716262068E-08 /
      data c16 /  4.9863336832462135E-10 /
      data c17 / -1.7971906682702998E-11 /
#endif
#else
#if defined(SIGMA)
      data c0  / -1.586265E-01 /
      data c1  /  5.720724E-02 /
      data c2  / -3.173359E-03 /
      data c3  / -8.670926E-03 /
      data c4  /  5.477399E-05 /
      data c5  /  5.541049E-07 /
      data c6  /  8.130020E-05 /
      data c7  / -4.599513E-07 /
      data c8  / -6.052512E-09 /
      data c9  / -5.499945E-07 /
      data c10 /  8.076355E-01 /
      data c11 / -8.377780E-06 /
      data c12 /  1.631569E-07 /
      data c13 /  5.050072E-03 /
      data c14 / -3.620852E-05 /
      data c15 / -5.159746E-08 /
      data c16 /  4.986334E-10 /
      data c17 / -1.797191E-11 /
#else
      data c0  /  9.998414E+02 /
      data c1  /  5.720724E-02 /
      data c2  / -3.173359E-03 /
      data c3  / -8.670926E-03 /
      data c4  /  5.477399E-05 /
      data c5  /  5.541049E-07 /
      data c6  /  8.130020E-05 /
      data c7  / -4.599513E-07 /
      data c8  / -6.052512E-09 /
      data c9  / -5.499945E-07 /
      data c10 /  8.076355E-01 /
      data c11 / -8.377780E-06 /
      data c12 /  1.631569E-07 /
      data c13 /  5.050072E-03 /
      data c14 / -3.620852E-05 /
      data c15 / -5.159746E-08 /
      data c16 /  4.986334E-10 /
      data c17 / -1.797191E-11 /
#endif
#endif

#endif
/*****************************************************************/