| 2431 | } |
| 2432 | |
| 2433 | double IceProps(const char* Name, double T, double p) { |
| 2434 | if (!strcmp(Name, "s")) { |
| 2435 | return s_Ice(T, p * 1000.0); |
| 2436 | } else if (!strcmp(Name, "rho")) { |
| 2437 | return rho_Ice(T, p * 1000.0); |
| 2438 | } else if (!strcmp(Name, "h")) { |
| 2439 | return h_Ice(T, p * 1000.0); |
| 2440 | } else { |
| 2441 | return 1e99; |
| 2442 | } |
| 2443 | } |
| 2444 | |
| 2445 | } /* namespace HumidAir */ |
| 2446 |