00001 #ifndef GLASGOWNEW_H 00002 #define GLASGOWNEW_H 00003 00004 #include "iotools.h" 00005 #include "alias.h" 00006 #include "genfile.h" 00007 00008 /** 00009 ordering of variables in eqother array 00010 00011 temperature [K], 00012 00013 */ 00014 class glasgownew 00015 { 00016 public: 00017 00018 glasgownew (); 00019 ~glasgownew (); 00020 void read (XFILE *in); 00021 00022 void material_matrix_fts (long ipp,matrix &d,strastrestate ssst); 00023 void material_matrix_td (long ipp,matrix &d,strastrestate ssst); 00024 00025 void free_thermal_strains (long ipp, vector &epsft); 00026 double thermdamfunction (long ipp,double tempr,vector &kappa); 00027 void nlstresses(long ipp, long ido); 00028 void updateval(long ipp, long ido); 00029 00030 /// normalized temperature 00031 double norm_tempr; 00032 /// coefficient of free thermal strain 00033 double alpha; 00034 /// the highest reached normalized temperature 00035 double t_hat; 00036 00037 }; 00038 00039 #endif