00001 #ifndef AXISYMLT_H
00002 #define AXISYMLT_H
00003
00004 #include "alias.h"
00005 struct matrix;
00006 struct vector;
00007 struct ivector;
00008
00009
00010
00011
00012
00013
00014
00015 class axisymlt
00016 {
00017 public:
00018 axisymlt (void);
00019 ~axisymlt (void);
00020
00021 double approx (vector &areacoord,vector &nodval);
00022 double approx_nat (double xi,double eta,vector &nodval);
00023 void bf_matrix (matrix &n,double xi,double eta);
00024 void bf_matrix (matrix &n,vector &areacoord);
00025 void geom_matrix (matrix &gm,vector &areacoord,vector &x,vector &y);
00026 void geom_matrix_block (matrix &gm,long ri,vector &areacoord,vector &x,vector &y);
00027 void dmatblock (long ri,long ci,matrix &d, matrix &dd);
00028 void transf_matrix (ivector &nodes,matrix &tmat);
00029 void stiffness_matrix (long eid,long ri,long ci,matrix &sm);
00030 void stiffness_matrix_block (long eid,long ri,long ci,matrix &sm);
00031 void res_stiffness_matrix (long eid,matrix &sm);
00032 void mass_matrix (long eid,matrix &mm);
00033
00034 void edge_integral (long edg,vector &x,vector &y,long intord,vector &gp,vector &w,
00035 vector &coef,matrix &km);
00036 void edgenodeval (long edg,vector &nodval,double *list);
00037 void edgeload (long eid,long *le,double *list,vector &nf);
00038
00039
00040
00041 void res_mainip_strains (long lcid,long eid);
00042 void mainip_strains (long lcid,long eid,long ri,long ci,vector &x,vector &y,vector &r);
00043 void nod_strains_ip (long lcid,long eid);
00044 void nod_strains_comp (long lcid,long eid);
00045 void res_allip_strains (long lcid,long eid);
00046 void allip_strains (long lcid,long eid,long ri,long ci);
00047 void strains (long lcid,long eid,long ri,long ci);
00048 void nodecoord (vector &xi,vector &eta);
00049 void nodipnum (long eid,ivector &ipnum);
00050 void appval (double xi,double eta,long fi,long nc,vector &eps,double **val);
00051 void res_mainip_stresses (long lcid,long eid);
00052 void mainip_stresses (long lcid,long eid,long ri,long ci);
00053 void nod_stresses_ip (long lcid,long eid);
00054 void nod_stresses_comp (long lcid,long eid);
00055 void res_allip_stresses (long lcid,long eid);
00056 void allip_stresses (long lcid,long eid,long ri,long ci);
00057 void appstress (long lcid,long eid,double xi,double eta,long fi,long ncomp,vector &sig);
00058 void stresses (long lcid,long eid,long ri,long ci);
00059 void nod_eqother_ip (long eid);
00060 void load_matrix (long eid,matrix &lm);
00061
00062 void internal_forces (long lcid,long eid,long ri,long ci,vector &ifor,vector &x,vector &y);
00063 void nonloc_internal_forces (long lcid,long eid,long ri,long ci,vector &ifor,vector &x,vector &y);
00064 void incr_internal_forces (long lcid,long eid,long ri,long ci,vector &ifor,vector &x,vector &y);
00065 void eigstrain_forces (long lcid,long eid,long ri,long ci,vector &nfor,vector &x,vector &y);
00066
00067 void res_internal_forces (long lcid,long eid,vector &ifor);
00068 void res_nonloc_internal_forces (long lcid,long eid,vector &ifor);
00069 void res_incr_internal_forces (long lcid,long eid,vector &ifor);
00070 void res_eigstrain_forces (long lcid,long eid,vector &nfor);
00071
00072 void compute_nlstress (long lcid,long eid,long ri,long ci);
00073 void compute_nlstressincr (long lcid,long eid,long ri,long ci);
00074 void local_values (long lcid,long eid,long ri,long ci);
00075 void compute_nonloc_nlstress (long lcid,long eid,long ri,long ci);
00076 void compute_eigstress (long lcid,long eid,long ri,long ci);
00077 void elem_integration (integratedquant iq,long lcid,long eid,long ri,long ci,vector &nv,vector &x,vector &y);
00078
00079 void ipcoord (long eid,long ipp,long ri,long ci,vector &coord);
00080 void inicipval(long eid, long ri, long ci, matrix &nodval, inictype *ictn);
00081
00082
00083
00084 long ndofe;
00085
00086 long nne;
00087
00088 long ned;
00089
00090 long nned;
00091
00092 long tncomp;
00093
00094 long tnip;
00095
00096 long *ncomp;
00097
00098 long *cncomp;
00099
00100 long napfun;
00101
00102 long **intordsm;
00103
00104 long intordmm;
00105
00106 long **nip;
00107
00108 long nb;
00109
00110 long intordb;
00111
00112 strastrestate ssst;
00113
00114 };
00115
00116 #endif