function modify_CH_components() E = 1; m = 0.33; a = E / ( (1+m) * (1-2*m) ); D0 = [a*(1-m) a*m a*m 0 0 0 a*m a*(1-m) a*m 0 0 0 a*m a*m a*(1-m) 0 0 0 0 0 0 a*(0.5-m) 0 0 0 0 0 0 a*(0.5-m) 0 0 0 0 0 0 a*(0.5-m)]; rho_min = 1e-6; D=D0.*rho_min; load CH_components_largerange_newH.mat aa bb cc... c11 c12 c13 c21 c22 c23 c31 c32 c33 c44 c55 c66 c11=max(c11,D(1,1)); c12=max(c12,D(1,2)); c13=max(c13,D(1,3)); c21=max(c21,D(2,1)); c22=max(c22,D(2,2)); c23=max(c23,D(2,3)); c31=max(c31,D(3,1)); c32=max(c32,D(3,2)); c33=max(c33,D(3,3)); c44=max(c44,D(4,4)); c55=max(c55,D(5,5)); c66=max(c66,D(6,6)); save CH_components_largerange_newH_modified.mat aa bb cc... c11 c12 c13 c21 c22 c23 c31 c32 c33 c44 c55 c66 end