00001 #ifndef DEVRIESMAT_H
00002 #define DEVRIESMAT_H
00003
00004 #include <stdio.h>
00005 #include "genfile.h"
00006
00007 class devriesmat
00008 {
00009 public:
00010 devriesmat (void);
00011 ~devriesmat (void);
00012
00013 void matcond (matrix &d,long ri,long ci,long ipp);
00014 void matcap (double &c,long ri,long ci,long ipp);
00015
00016 void matcond1d (matrix &d,long ri,long ci,long ipp);
00017 void matcond2d (matrix &d,long ri,long ci,long ipp);
00018 void matcond3d (matrix &d,long ri,long ci,long ipp);
00019
00020 void read (XFILE *in);
00021 void print(FILE *out);
00022
00023 double k11 (double x1,double x2,double x3);
00024 double k12 (double x1,double x2,double x3);
00025 double k13 (double x1,double x2,double x3);
00026
00027 double k21 (double x1,double x2,double x3);
00028 double k22 (double x1,double x2,double x3);
00029 double k23 (double x1,double x2,double x3);
00030
00031 double k31 (double x1,double x2,double x3);
00032 double k32 (double x1,double x2,double x3);
00033 double k33 (double x1,double x2,double x3);
00034
00035 double c11 (double x1,double x2,double x3);
00036 double c12 (double x1,double x2,double x3);
00037 double c13 (double x1,double x2,double x3);
00038
00039 double c21 (double x1,double x2,double x3);
00040 double c22 (double x1,double x2,double x3);
00041 double c23 (double x1,double x2,double x3);
00042
00043 double c31 (double x1,double x2,double x3);
00044 double c32 (double x1,double x2,double x3);
00045 double c33 (double x1,double x2,double x3);
00046
00047 void auxiliarydata (double x1,double x2,double x3);
00048
00049 double transmission_transcoeff(double trc,long ri,long ci,long nn,long bc,long ipp);
00050 double transmission_nodval(double nodval,long ri,long ci,long nn,long bc,long ipp);
00051 double transmission_flux(double nodval,long ri,long ci,long nn,long bc,long ipp);
00052
00053 double get_transmission_nodval_11(double bv,double x1,double x2,double x3,long bc,long ipp);
00054 double get_transmission_transcoeff_11(double x1,double x2,double x3,long bc,long ipp);
00055 double get_transmission_flux_11(double bv,double x1,double x2,double x3,long bc,long ipp);
00056
00057
00058 double get_othervalue(long compother,long ipp, double x1,double x2,double x3);
00059 void print_othervalue_name(FILE *out,long compother);
00060 void CorD(int cislochar, int &kvyhl,double in,int rhw, double x, double & y, double & z, double &z2);
00061 double saturation_water_vapour_pressure(double x1, double x2, double x3);
00062 double derivation_saturation_water_vapour_pressure_temperature(double x1, double x2, double x3);
00063 double partial_water_vapour_pressure_function(double x1, double x2, double x3);
00064 void sorption_izotherm_derivation(double x1, double x2, double x3, double & derfi);
00065 double derivation_specific_internal_energy_of_water_vapour(double x1, double x2, double x3);
00066 double get_rel_hum(double w);
00067 double sortpion_isotherm_root_shifted(double x1, double w_hyg, double rh_hyg);
00068 void give_data_si_root_dfidw(double x1, double x2, double x3, double rh_hyg, double w_sat, double w_hyg, double shift_w, double & dfdw);
00069 double get_moisture(double rh);
00070 void sorption_izoterms_giva_data(int kod,double x1, double x2, double x3, double & fi, double & dfdw);
00071 void give_data_si_root_fi(double x1, double x2, double x3, double w_hyg, double w_sat, double rh_hyg, double shift_w, double & relh);
00072 double pressure_head(double x1, double x2, double x3);
00073 double derivation_pressure_head(double x1, double x2, double x3);
00074 double relative_volume_ration_a(double x1, double x2, double x3);
00075 double surface_tension(double x1, double x2, double x3);
00076 double derivation_surface_tension_on_temperature(double x1, double x2, double x3);
00077 double coeff_of_water_diffusion_by_moisture_grad(double x1, double x2, double x3);
00078 double coeff_of_water_diffusion_by_temperature_grad(double x1, double x2, double x3);
00079 double coeff_dwv(double x1, double x2, double x3);
00080 double coeff_dtv(double x1, double x2, double x3);
00081 double specific_heat_capacities_star(double x1, double x2, double x3);
00082 double partial_density_of_water_vapor(double x1, double x2, double x3);
00083 double latent_heat_of_evaporation_of_water(double x1, double x2, double x3);
00084 double derivation_drov_dw(double x1, double x2, double x3);
00085 double diffusion_coefficient_of_water_vapor_in_air(double x1, double x2, double x3);
00086
00087
00088
00089 private:
00090
00091
00092 int MatChar [20];
00093 double MatConst [20];
00094 double MatData [20][3][150];
00095 double MatFunce [20][5];
00096
00097 int madripom;
00098 int kd;
00099 double a1,a2,a3;
00100
00101 };
00102
00103 #endif
00104
00105