00001 #ifndef QUADBART_H
00002 #define QUADBART_H
00003
00004 #include "genfile.h"
00005
00006
00007
00008
00009 class quadbart
00010 {
00011 public:
00012 quadbart (void);
00013 ~quadbart (void);
00014
00015 void codnum (long *cn,long ri);
00016 double approx (double xi,vector &nodval);
00017 void intpointval (long eid);
00018 void intpointgrad (long eid);
00019 void intpointother (long eid);
00020
00021 void bf_matrix (matrix &n,double xi);
00022 void grad_matrix (matrix &gm,vector &x,double xi,double &jac);
00023 void conductivity_matrix (long lcid,long eid,long ri,long ci,matrix &km);
00024 void capacity_matrix (long eid,long ri,long ci,matrix &cm);
00025 void quantity_source_vector (vector &sv,vector &nodval,long eid,long ri,long ci);
00026 void transmission_matrix (long lcid,long eid,long ri,long ci,matrix &km);
00027 void transmission_vector (vector &tmv,long lcid,long eid,long leid,long ri,long ci);
00028 void convection_vector (vector &f,long lcid,long eid,long leid,long ri,long ci);
00029 void internal_fluxes (long lcid,long eid,vector &ifl);
00030
00031 void res_conductivity_matrix (long eid,long lcid,matrix &km);
00032 void volume_rhs_vector (long lcid,long eid,long ri,long ci,vector &vrhs);
00033 void res_volume_rhs_vector (vector &f,long eid,long lcid);
00034 void res_capacity_matrix (long eid,matrix &cm);
00035 void res_convection_vector (vector &f,long lcid,long eid,long leid);
00036 void res_transmission_vector (vector &f,long lcid,long eid,long leid);
00037 void res_quantity_source_vector (vector &sv,vector &nodval,long lcid,long eid);
00038 void res_internal_fluxes (long eid,vector &elemif);
00039 double total_integral(long eid,vector &nodval);
00040 void boundary_flux (vector &tmv,long lcid,long eid,long leid,long ri,long ci);
00041 void res_boundary_flux (vector &f,long lcid,long eid,long leid);
00042
00043 void nod_others_comp (long lcid,long eid,long ri,long ci);
00044
00045
00046 long ntm;
00047
00048 long ndofe;
00049
00050 long **dofe;
00051
00052 long nne;
00053
00054 long nen;
00055
00056
00057 long ned;
00058
00059 long nned;
00060
00061 long napfun;
00062
00063 long ncomp;
00064
00065 long **nip;
00066
00067 long **ordering;
00068
00069 long **intordkm;
00070
00071 long **intordcm;
00072 };
00073
00074 #endif