Added alias atg for adiabatic_temperature_gradient function
This commit is contained in:
parent
f2bc090609
commit
fe0b0451f5
|
@ -39,5 +39,7 @@ double sound_speed(double salinity, double temperature, double pressure);
|
|||
|
||||
#define svan(salinity, temperature, pressure, sigma) \
|
||||
specific_volume_anomaly(salinity, temperature, pressure, sigma)
|
||||
#define atg(salinity, temperature, pressure) \
|
||||
adiabatic_temperature_gradient(salinity, temperature, pressure)
|
||||
|
||||
#endif /* OCEANOGRAPHY_H */
|
||||
|
|
|
@ -116,6 +116,9 @@ START_TEST(test_adiabatic_temperature_gradient)
|
|||
2.416120e-04));
|
||||
ck_assert(cmp_double(adiabatic_temperature_gradient(40, 40, 10000),
|
||||
3.255976e-04));
|
||||
|
||||
/* Test again the first case using the function alias atg. */
|
||||
ck_assert(cmp_double(atg(25, 0, 0), 1.687100e-05));
|
||||
}
|
||||
END_TEST
|
||||
|
||||
|
|
Loading…
Reference in a new issue