00001 #include "crsec3d.h"
00002 #include "global.h"
00003 #include "stochdriver.h"
00004
00005
00006
00007
00008
00009
00010
00011
00012 crsec3d::crsec3d (void)
00013 {
00014 rho=0.0;
00015 }
00016
00017
00018
00019
00020
00021
00022
00023
00024 crsec3d::~crsec3d (void)
00025 {
00026
00027 }
00028
00029
00030
00031
00032
00033
00034
00035
00036
00037
00038
00039
00040
00041 void crsec3d::read (XFILE *in)
00042 {
00043 switch (Mp->tprob){
00044 case linear_statics:{
00045 xfscanf (in,"%lf",&rho);
00046 break;
00047 }
00048 case eigen_dynamics:{
00049 xfscanf (in,"%lf",&rho);
00050 break;
00051 }
00052 case forced_dynamics:{
00053 xfscanf (in,"%lf",&rho);
00054 break;
00055 }
00056 case mat_nonlinear_statics:{
00057 xfscanf (in,"%lf",&rho);
00058 break;
00059 }
00060 case growing_mech_structure:
00061 case mech_timedependent_prob:{
00062 xfscanf (in,"%lf",&rho);
00063 break;
00064 }
00065 default:{
00066 print_err("unknown problem type is required", __FILE__, __LINE__, __func__);
00067 }
00068 }
00069 }
00070
00071
00072
00073
00074
00075
00076
00077
00078
00079
00080
00081 void crsec3d::print (FILE *out)
00082 {
00083 switch (Mp->tprob){
00084 case linear_statics:{
00085 fprintf (out,"\n %le",rho);
00086 break;
00087 }
00088 case eigen_dynamics:{
00089 fprintf (out,"\n %le",rho);
00090 break;
00091 }
00092 case forced_dynamics:{
00093 fprintf (out,"\n %le",rho);
00094 break;
00095 }
00096 case mat_nonlinear_statics:{
00097 fprintf (out,"\n %le",rho);
00098 break;
00099 }
00100 case growing_mech_structure:
00101 case mech_timedependent_prob:{
00102 fprintf (out,"\n %le",rho);
00103 break;
00104 }
00105 default:{
00106 print_err("unknown problem type is required", __FILE__, __LINE__, __func__);
00107 }
00108 }
00109 }
00110
00111
00112
00113
00114
00115
00116
00117
00118
00119
00120
00121
00122
00123
00124 void crsec3d::changeparam (atsel &atcs,vector &val)
00125 {
00126 long i;
00127
00128 for (i=0;i<atcs.num;i++){
00129 switch (atcs.atrib[i]){
00130 case 0:{
00131 rho=val[i];
00132 break;
00133 }
00134 default:{
00135 print_err("wrong number of atribute", __FILE__, __LINE__, __func__);
00136 }
00137 }
00138 }
00139 }