eriol/liboceanography
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Added alias svan for specific_volume_anomaly function

Browse source
This commit is contained in:
Daniele Tricoli 2011-01-17 05:38:18 +01:00
parent ec7e806fe3
commit f2bc090609
2 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/oceanography.h
View file

@ -37,4 +37,7 @@ double potential_temperature(double salinity, double temperature,
double pressure, double reference_pressure);
double sound_speed(double salinity, double temperature, double pressure);
#define svan(salinity, temperature, pressure, sigma) \
specific_volume_anomaly(salinity, temperature, pressure, sigma)
#endif /* OCEANOGRAPHY_H */

4
tests/test_oceanography.c
View file

@ -77,6 +77,10 @@ START_TEST(test_specific_volume_anomaly)
ck_assert(cmp_double(specific_volume_anomaly(40, 40, 10000, &sigma),
981.301907));
ck_assert(cmp_double(sigma, 59.820375));
/* Test again the first case using the function alias svan. */
ck_assert(cmp_double(svan(0, 0, 0, &sigma), 2749.539368));
ck_assert(cmp_double(sigma, -0.1574));
}
END_TEST