00001 #ifndef GLOBMATT_H
00002 #define GLOBMATT_H
00003
00004 #include "genfile.h"
00005 #include "aliast.h"
00006
00007 void conductivity_matrix (long lcid);
00008
00009 void capacity_matrix (long lcid);
00010
00011 void residuum (double *r,double *p,double *v,double dt,long n,long lcid);
00012
00013 void elemvalues_puc (long lcid,long eid,double *r,long ndofe);
00014 void elemvalues (long lcid,long eid,double *r,long *cn,long ndofe);
00015 void nodalval (long lcid,double *r, long idn);
00016 double nodalval (long lcid,long nid,long dofid);
00017 void initnodval (long lcid,double *r, long idn);
00018 void prevnodval (long lcid,double *r, long idn,double *lhs);
00019 void nodalotherval (double *r,ivector &nod);
00020 void nodalderivatives (double *r,long *cn,long ndofe);
00021 void prescvalues (double *r,long *cn,long ndofe);
00022 void initialvalues (double *r,long *cn,long ndofe);
00023
00024
00025 void approximation ();
00026 void approximation_puc ();
00027 void actual_previous_change ();
00028 void actual_previous_nodval ();
00029
00030 void assemble_init (double *rhs);
00031 void trfel_right_hand_side (long lcid,double *rhs,long n);
00032 void trfel_bound_flux (long lcid,double *rhs,long n);
00033
00034 void compute_req_valt (long lcid);
00035
00036
00037 void give_nodal_humid (double *gv,long mnt);
00038
00039 void solution_correction ();
00040
00041 void compute_cycles (double *plhs,double *pplhs);
00042
00043 void copy_nodval (long lcid);
00044
00045 void assemble_gradients_contrib(double *rhs);
00046 void assemble_l_matrix (matrix &lm, matrix <m);
00047 void assemble_conductivity_matrix (matrix &km);
00048 void assemble_average_d_matrix (matrix &km, double &area);
00049 void assemble_average_c_matrix (matrix &cm);
00050
00051
00052
00053 double total_integral (long lcid);
00054
00055
00056
00057 double total_integral_ip (long varid);
00058
00059 void dt_subdom ();
00060
00061 void lnso_leso_setting (long *lsso);
00062
00063 #endif