Function rho_Ice

src/Ice.cpp:127–134

}

double rho_Ice(double T, double p) {
#ifndef __powerpc__
    // Returned value is in units of kg/m3
    return 1 / dg_dp_Ice(T, p);
#else
    return 1e99;
#endif
}

double s_Ice(double T, double p) {
#ifndef __powerpc__