孕妇梦见青色花纹大蟒蛇

　　女儿

买的橘子特别甜，吃完很久了嘴里都是甜的，橘子是青色

　　好东西，自然好吃

孕妇梦见烂花菜但没买，也梦见西红柿和青菜，都没买

　　3.3 计算编程3.3.1 编程思想在前面的章节中，详细推导并得到了研究所需要的一个线性方程组。但要真正运用这个方程组却并不容易。我们必须解决下面几个问题：（1） 公式中出现了矩阵函数的运算，然而此函数的运算是非常繁琐复杂的。（2） 如果只有单个的矩阵函数，那么或许手算还有可能。然而，如前所述，为了得到关于纤维束的更多信息，我们有必要将纤维是划分为多段。这样一来，我们面临的是很多矩阵函数，此时是根本无法手算的。（3） 根据纤维束之间交联的具体情况，需要给出相应的纤维间相互作用矩阵。（4） 线性方程组的边界条件需要根据结构具体的边界条件加以确定。考虑上面的问题，结合MAPLE软件，本文有了下面的编程思想：（1） 输入基本参数。（2） 输入纤维间相互作用矩阵（不同的分段可能有不同的相互作用矩阵，矩阵应该与分段一一对应）。（3） 计算分段矩阵构成的矩阵函数，将其转化为一般的矩阵。（4） 将（3）中计算所得的矩阵按照顺序相乘，从而得到线性方程组的系数矩阵。（5） 引入整个结构的边界条件。（6） 求解线性方程组，从而可以获得整个结构左右两端全部八个量（位移与纵向应力）。（7） 应用分段法，由（6）中所解得的未知量，构成新的边界条件。运用循环，求出每个分段处的位移与纵向应力。（8） 将所得数据输出为文档，利用MAPLE的绘图功能，绘制相关的曲线图。3.3.2 编写程序根据前述编程思想，利用MAPLE，下面给出具体的程序。内容分为两部分。第一部分为符号说明，第二部分为具体的MAPLE程序。此程序将前文所提的纤维数均分为多段，段内或含有交联，或不含有交联，以此可模拟交联的分布，亦可计算纤维分段上更多的力学参数。（1） 符号说明E：碳纳米管的弹性模量；L：碳纳米管的长度；R：碳纳米管的半径；Mu：碳纳米管间的剪切模量；K：碳纳米管间的相互作用系数；Sigma：施加的外力；A1、A2：碳纳米管间的相互作用矩阵；DL：分段的长度；B1、B2：矩阵函数转化为一般矩阵；JL：分段共价交联的信息；C：线性方程组系数矩阵；（2） 详细程序E := .46*10^12;L := 19.84*10^(-6);R := 1.5*10^(-6);Mu := .24*10^12;d := 3*R;k := mu/(R^2*ln(d/(2*R)+sqrt(d^2/(4*R^2)-1)));sigma := 10*10^9;A1 := Matrix(4, 4, [[0, k, 0, -k], [1/E, 0, 0, 0], [0, -k, 0, k], [0, 0, 1/E, 0]]);A2 := Matrix(4, 4, [[0, 0, 0, 0], [1/E, 0, 0, 0], [0, 0, 0, 0], [0, 0, 1/E, 0]]);with(LinearAlgebra);DL:= (1/100)*L;B1 := MatrixFunction(A1*DL, exp(x), x);B2 := MatrixFunction(A2*DL, exp(x), x);JL := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\JL.txt”,1 )C := Matrix(4, 4, [[1, 0, 0, 0], [0, 1, 0, 0], [0, 0, 1, 0], [0, 0, 0, 1]]):for i from 1 by 1 to 100 doif JL[i] = 1 thenC := B1 . CelseC := B2 . Cend ifend do:XS := evalf(C):Y := Vector[column](4, [t10, 0, 0, u20]):M := evalf(XS . Y):eqns := {0 = M[1], sigma = M[3], u110 = M[2], u210 = M[4]}:sols := evalf(solve(eqns, {t10, u110, u20, u210})):Y[1] := op(2, op(1, sols))：Y[4] := op(2, op(3, sols))：XSBL := Matrix(4, 4, [[1, 0, 0, 0], [0, 1, 0, 0], [0, 0, 1, 0], [0, 0, 0, 1]]):Z := Vector[column](4, [0, 0, 0, 0]):for i from 1 by 1 to 100 doIf JL[i]=1 thenXSBL:=B1.XSBL;elseXSBL:=B2.XSBL;end if;M := evalf(XSBL . Y);eqns := {z1 = M[1], z2 = M[2], z3 = M[3], z4 = M[4]};sols := evalf(solve(eqns, {z1, z2, z3, z4}));Z[1] := op(2, op(1, sols));Z[2] := op(2, op(2, sols));Z[3] := op(2, op(3, sols));Z[4] := op(2, op(4, sols));YL1 := array([[i*DL, Z[1]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\YL1.txt",YL1 );YL2 := array([[i*DL, Z[3]]]):writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\YL2.txt”,YL2 );WY1 := array([[i*DL, Z[2]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\WY1.txt",WY1);WY2:=array([[i*DL,Z[4]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\WY2.txt",WY2);If i=1 thenQYL1 := array([[i*DL, Z[1]-Y[1]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL1.txt",QYL1 );QYL2 := array([[i*DL, Z[3]-Y[3]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL2.txt",QYL2G);next end if;XSBL2 := Matrix(4, 4, [[1, 0, 0, 0], [0, 1, 0, 0], [0, 0, 1, 0], [0, 0, 0, 1]]);for j from 1 by 1 to i-1 doif JL[j]=1 thenXSBL2 := B1 . XSBL2;ElseXSBL2 := B2 . XSBL2;end if;end do;MM := evalf(XSBL2 . Y);eqns := {qz1 = MM[1], qz2 = MM[2], qz3 = MM[3], qz4 = MM[4]};sols := evalf(solve(eqns, {qz1, qz2, qz3, qz4}));QZ[1] := op(2, op(1, sols));QZ[2] := op(2, op(2, sols));QZ[3] := op(2, op(3, sols));QZ[4] := op(2, op(4, sols));QYL1 := array([[i*DL, Z[1]-QZ[1]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL1.txt",QYL1);QYL2 := array([[i*DL, Z[3]-QZ[3]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL2.txt",QYL2 );end do:YL1 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\YL1.txt6",YL1 );YL2 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\YL2.txt",YL2) ;QYL1 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL1.txt",QYL1) ;QYL2 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL2.txt",QYL2);WY1 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\WY1.txt" ,WY1) ;WY2 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\WY2.txt",WY2);plot(YL1);plot(YL2);plot(QYL1);plot(QYL2);plot(WY1);plot(WY2);plot([YL1, QYL1]);plot([YL2, QYL2]);

孕妇梦见烂花菜但没买，也梦见西红柿和青菜，都没买

　　3.3 计算编程3.3.1 编程思想在前面的章节中，详细推导并得到了研究所需要的一个线性方程组。但要真正运用这个方程组却并不容易。我们必须解决下面几个问题：（1） 公式中出现了矩阵函数的运算，然而此函数的运算是非常繁琐复杂的。（2） 如果只有单个的矩阵函数，那么或许手算还有可能。然而，如前所述，为了得到关于纤维束的更多信息，我们有必要将纤维是划分为多段。这样一来，我们面临的是很多矩阵函数，此时是根本无法手算的。（3） 根据纤维束之间交联的具体情况，需要给出相应的纤维间相互作用矩阵。（4） 线性方程组的边界条件需要根据结构具体的边界条件加以确定。考虑上面的问题，结合MAPLE软件，本文有了下面的编程思想：（1） 输入基本参数。（2） 输入纤维间相互作用矩阵（不同的分段可能有不同的相互作用矩阵，矩阵应该与分段一一对应）。（3） 计算分段矩阵构成的矩阵函数，将其转化为一般的矩阵。（4） 将（3）中计算所得的矩阵按照顺序相乘，从而得到线性方程组的系数矩阵。（5） 引入整个结构的边界条件。（6） 求解线性方程组，从而可以获得整个结构左右两端全部八个量（位移与纵向应力）。（7） 应用分段法，由（6）中所解得的未知量，构成新的边界条件。运用循环，求出每个分段处的位移与纵向应力。（8） 将所得数据输出为文档，利用MAPLE的绘图功能，绘制相关的曲线图。3.3.2 编写程序根据前述编程思想，利用MAPLE，下面给出具体的程序。内容分为两部分。第一部分为符号说明，第二部分为具体的MAPLE程序。此程序将前文所提的纤维数均分为多段，段内或含有交联，或不含有交联，以此可模拟交联的分布，亦可计算纤维分段上更多的力学参数。（1） 符号说明E：碳纳米管的弹性模量；L：碳纳米管的长度；R：碳纳米管的半径；Mu：碳纳米管间的剪切模量；K：碳纳米管间的相互作用系数；Sigma：施加的外力；A1、A2：碳纳米管间的相互作用矩阵；DL：分段的长度；B1、B2：矩阵函数转化为一般矩阵；JL：分段共价交联的信息；C：线性方程组系数矩阵；（2） 详细程序E := .46*10^12;L := 19.84*10^(-6);R := 1.5*10^(-6);Mu := .24*10^12;d := 3*R;k := mu/(R^2*ln(d/(2*R)+sqrt(d^2/(4*R^2)-1)));sigma := 10*10^9;A1 := Matrix(4, 4, [[0, k, 0, -k], [1/E, 0, 0, 0], [0, -k, 0, k], [0, 0, 1/E, 0]]);A2 := Matrix(4, 4, [[0, 0, 0, 0], [1/E, 0, 0, 0], [0, 0, 0, 0], [0, 0, 1/E, 0]]);with(LinearAlgebra);DL:= (1/100)*L;B1 := MatrixFunction(A1*DL, exp(x), x);B2 := MatrixFunction(A2*DL, exp(x), x);JL := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\JL.txt”,1 )C := Matrix(4, 4, [[1, 0, 0, 0], [0, 1, 0, 0], [0, 0, 1, 0], [0, 0, 0, 1]]):for i from 1 by 1 to 100 doif JL[i] = 1 thenC := B1 . CelseC := B2 . Cend ifend do:XS := evalf(C):Y := Vector[column](4, [t10, 0, 0, u20]):M := evalf(XS . Y):eqns := {0 = M[1], sigma = M[3], u110 = M[2], u210 = M[4]}:sols := evalf(solve(eqns, {t10, u110, u20, u210})):Y[1] := op(2, op(1, sols))：Y[4] := op(2, op(3, sols))：XSBL := Matrix(4, 4, [[1, 0, 0, 0], [0, 1, 0, 0], [0, 0, 1, 0], [0, 0, 0, 1]]):Z := Vector[column](4, [0, 0, 0, 0]):for i from 1 by 1 to 100 doIf JL[i]=1 thenXSBL:=B1.XSBL;elseXSBL:=B2.XSBL;end if;M := evalf(XSBL . Y);eqns := {z1 = M[1], z2 = M[2], z3 = M[3], z4 = M[4]};sols := evalf(solve(eqns, {z1, z2, z3, z4}));Z[1] := op(2, op(1, sols));Z[2] := op(2, op(2, sols));Z[3] := op(2, op(3, sols));Z[4] := op(2, op(4, sols));YL1 := array([[i*DL, Z[1]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\YL1.txt",YL1 );YL2 := array([[i*DL, Z[3]]]):writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\YL2.txt”,YL2 );WY1 := array([[i*DL, Z[2]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\WY1.txt",WY1);WY2:=array([[i*DL,Z[4]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\WY2.txt",WY2);If i=1 thenQYL1 := array([[i*DL, Z[1]-Y[1]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL1.txt",QYL1 );QYL2 := array([[i*DL, Z[3]-Y[3]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL2.txt",QYL2G);next end if;XSBL2 := Matrix(4, 4, [[1, 0, 0, 0], [0, 1, 0, 0], [0, 0, 1, 0], [0, 0, 0, 1]]);for j from 1 by 1 to i-1 doif JL[j]=1 thenXSBL2 := B1 . XSBL2;ElseXSBL2 := B2 . XSBL2;end if;end do;MM := evalf(XSBL2 . Y);eqns := {qz1 = MM[1], qz2 = MM[2], qz3 = MM[3], qz4 = MM[4]};sols := evalf(solve(eqns, {qz1, qz2, qz3, qz4}));QZ[1] := op(2, op(1, sols));QZ[2] := op(2, op(2, sols));QZ[3] := op(2, op(3, sols));QZ[4] := op(2, op(4, sols));QYL1 := array([[i*DL, Z[1]-QZ[1]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL1.txt",QYL1);QYL2 := array([[i*DL, Z[3]-QZ[3]]]);writedata[APPEND]("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL2.txt",QYL2 );end do:YL1 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\YL1.txt6",YL1 );YL2 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\YL2.txt",YL2) ;QYL1 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL1.txt",QYL1) ;QYL2 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\QYL2.txt",QYL2);WY1 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\WY1.txt" ,WY1) ;WY2 := readdata("D:\\编程\\应力分布与位移分布的研究\\均匀分布\\WY2.txt",WY2);plot(YL1);plot(YL2);plot(QYL1);plot(QYL2);plot(WY1);plot(WY2);plot([YL1, QYL1]);plot([YL2, QYL2]);

梦见很多橘子

梦到很多橘子，预示你会交好运，走红运。

梦到很多生橘子，要多注意身体健康，预示你可能会生病。

梦到送别人很多橘子，预示你会受到别人的喜爱和赞扬。

梦到繁茂的橘子树挂满很多成熟的橘子，预示健康和成功的情形。

已婚男人梦到很多橘子，如果续弦，会娶一个年轻美丽的女子。

未婚男人梦到很多橘子，预示将娶一位健康美貌的妻子。

未婚女人梦到很多熟橘子，预示会有很好的名声。

经商的人梦到剥了很多橘子，预示会有大生意，利润丰厚。

年轻女子梦到吃很多橘子，预示她可能失去爱人。

梦到很多橘子的网友梦例

网友梦境：梦到去世的妈妈给我摘橘子

周公解梦：橘子主运。橘子光洁红润，象征着红运当头。

梦中去世的母亲给你摘橘子，暗示母亲会在天堂庇护你，希望你能一切顺利！

梦见橘子树

在收获的季节，橘子树上挂满黄澄澄的橘子，象征着丰收和财富。

梦见橘子树，吉兆，预示着会有意外之财。

商人梦见橘子树，生意会获利。

梦见多棵繁茂的橘子树挂满成熟的橘子，预示健康和成功的情形。

年轻女子梦见成色很好的橘子挂在高高的枝头，预示她将谨慎地在众多追求者中选择一个做丈夫。

孕妇梦见从橘子树上摘到橘子，说明着有所收获，预示可以顺利生下健康的宝宝。

梦见橘子树的案例分析

梦境描述：我梦见一大片橘子树，树上挂满了红橙橙的橘子，是什么意思？

梦境解析：梦见橘子树挂满成熟的橘子，预示健康和成功，是个好梦，说明你身体健康，精力充沛，你能全身心的投入到工作当中，势必会给你事业上带

孕妇梦见自己买千笔

　　第一种解释:这是暗示你生下的是一个细致勤劳的人; 　　第二种解释:因渴望有一儿子所致; 　　第三种解释:反象暗示:将生一贵子。

孕妇梦见让别人帮自己买豆芽是什么意思

　　孕妇梦见豆芽——预示着你多会生一个男孩子，是喜得贵子的吉兆。 孕妇梦见买豆芽——预示着你最近要注重孕期的补充才行，同时也提醒你要更加努力，这样才能克服孕期的种种困难。

梦见树上结满橘子

梦到树上结满橘子，是吉兆，生活会顺利。

梦到婴儿树上结满橘子，表示你的身体健康欠佳，或者即将有不愉快的事情会发生。

梦到死人伤心的大哭，表示你有某些事处理不当，应该赶快检讨反省，否则将会有对你不利的舆论出现。

女人梦到树上结满橘子，预示着你近期财运亨通，洋洋得意，但不要得意忘形，太松懈傲慢会有烦恼，同时小心受骗，提防火灾。

男人梦到树上结满橘子，预示着你要出远门，但结伴而行才是吉兆，倘若单独旅行会不利。

求职者梦到树上结满橘子，预示着在职场上存在的变数较大，内部的约定比表面的竞争更能决定最终结果，记住心态放平是关键。

准备考试的人梦到树上结满橘子，意味着成绩不理想，难录取。

谈婚论嫁的人梦到树上结满橘子，说明保养身体，和气谦虚相处，婚姻可成。

梦到树上结满橘子的网友梦例

网友梦境：时刻：凌晨，梦境：清晰，性别：男，梦境描述：梦到妈妈去世，但是梦里好像妈妈还托梦给姐姐，说不放心我的婚事，我在梦里伤心的大哭

周公解梦：见人死自死皆吉。《原版周公解梦》通常梦到在世的人死去是表示这个人长寿。

梦见橘子树结满了橘子

　　日子红火:吉祥顺利