| ²é¿´: 894 | »Ø¸´: 7 | |||
| µ±Ç°Ö÷ÌâÒѾ´æµµ¡£ | |||
| µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû | |||
Ʈѩ139½ð³æ (³õÈëÎÄ̳)
|
[½»Á÷]
¡¾ÇóÖú¡¿c++±à³Ì£¬Çë¸ßÊÖ°ïÎÒ¿´¿´Õâ¸ö³ÌÐòÓ¦¸ÃÔõôд
|
||
|
³ÌÐòÖеĹ«Ê½Îª£º p[I][j]=(p[j]+p[i-1][j])/2; s[I][j]=-2*miu*h*p[I][j]*p[I][j]*(1-p[I][j])/(4*dx*4*dx); fw[i-1][j]=((k[j]+k[i-1][j])/2*v[I][j]+(k[j]+k[i-2][j])/2*v[I-1][j])/2; fe[j]=((k[i+1][j]+k[j])/2*v[I+1][j]+(k[j]+k[i-1][j])/2*v[I][j])/2; aw[I-1][j]=dw[i-1][j]+fw[i-1][j]/2; ae[I+1][j]=de[j]-fe[j]/2; ÔÚÕâ¸ö³ÌÐòÖаüº¬i£¬j£¬I,J¡£ÎÒ¿ÉÒÔÏñϱßÕâÑùд³ÌÐòÂ𣿠for(I=3;I<=m;I++) for(J=3;J<=n;J++) { for(i=2;i<=m;i++) for(j=2;j<=n;j++) { p[I][j]=(p[j]+p[i-1][j])/2; s[I][j]=-2*miu*h*p[I][j]*p[I][j]*(1-p[I][j])/(4*dx*4*dx); fw[i-1][j]=((k[j]+k[i-1][j])/2*v[I][j]+(k[j]+k[i-2][j])/2*v[I-1][j])/2; fe[j]=((k[i+1][j]+k[j])/2*v[I+1][j]+(k[j]+k[i-1][j])/2*v[I][j])/2; aw[I-1][j]=dw[i-1][j]+fw[i-1][j]/2; ae[I+1][j]=de[j]-fe[j]/2; } } [ Last edited by Ʈѩ139 on 2008-3-14 at 20:47 ] |
» ²ÂÄãϲ»¶
¼ÆËã»ú11408£¬286·ÖÇóµ÷¼Á
ÒѾÓÐ4È˻ظ´
0703»¯Ñ§321·ÖÇóµ÷¼Á
ÒѾÓÐ17È˻ظ´
²ÄÁÏÓ뻯¹¤371Çóµ÷¼Á
ÒѾÓÐ10È˻ظ´
Ò»Ö¾Ô¸ ½ÄÏ´óѧ 085602 »¯¹¤×¨Ë¶ 338·ÖÇóµ÷¼Á
ÒѾÓÐ6È˻ظ´
22408 ×Ü·Ö320£¬Ò»ÆªÂÛÎĶþ×÷£¬Á½¸ö¹úÈý£¬Çóµ÷¼Á
ÒѾÓÐ3È˻ظ´
277Çóµ÷¼Á
ÒѾÓÐ3È˻ظ´
¿¼ÑÐÉúÎïѧ¿¼AÇø211£¬³õÊÔ322£¬¿ÆÄ¿Éú»¯ºÍÉúÎï×ۺϣ¬Çóµ÷¼Á
ÒѾÓÐ6È˻ظ´
Çóµ÷¼Á
ÒѾÓÐ3È˻ظ´
285Çóµ÷¼Á
ÒѾÓÐ6È˻ظ´
²ÄÁÏÇóµ÷¼Á
ÒѾÓÐ3È˻ظ´
Ʈѩ139
½ð³æ (³õÈëÎÄ̳)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 979
- Ìû×Ó: 44
- ÔÚÏß: 8.3Сʱ
- ³æºÅ: 477085
- ×¢²á: 2007-12-13
|
for(I=3;I<=m;I++) for(J=3;J<=n;J++) { for(i=2;i<=m;i++) for(j=2;j<=n;j++) { p[I][j]=(p[j]+p[i-1][j])/2; s[I][j]=-2*miu*h*p[I][j]*p[I][j]*(1-p[I][j])/(4*dx*4*dx); dw[i-1][j]=miu*k[i-1][j]/dx; de[j]=miu*k[j]/dx; fw[i-1][j]=((k[j]+k[i-1][j])/2*v[I][j]+(k[j]+k[i-2][j])/2*v[I-1][j])/2£» fe[j]=((k[i+1][j]+k[j])/2*v[I+1][j]+(k[j]+k[i-1][j])/2*v[I][j])/2; aw[I-1][j]=dw[i-1][j]+fw[i-1][j]/2; ae[I+1][j]=de[j]-fe[j]/2; au[I][j]=(k[j]+k[i-1][j])/2; } } |
4Â¥2008-03-15 17:54:57
¡ï
zzgyb(½ð±Ò+1,VIP+0):ллÄúµÄ²ÎÓ룬»¶ÓÄú³£À´¼ÆËãÄ£Äâ°æ½â´ðÎÊÌâ¡£
zzgyb(½ð±Ò+1,VIP+0):ллÄúµÄ²ÎÓ룬»¶ÓÄú³£À´¼ÆËãÄ£Äâ°æ½â´ðÎÊÌâ¡£
|
Â¥Ö÷¶¨ÒåµÄkÊÇһάÊý×黹ÊǶþάÊý¾Ý£¿ Ôõôһ»áÊÇk[j]£¬Ò»»á¶ùÓÖÊÇk[i-1][j]¡£Ïë²»Ã÷°×£¬Ôõô¾ÍÈ˰ïÄãѽ£¡ |
2Â¥2008-03-15 08:53:11
Ʈѩ139
½ð³æ (³õÈëÎÄ̳)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 979
- Ìû×Ó: 44
- ÔÚÏß: 8.3Сʱ
- ³æºÅ: 477085
- ×¢²á: 2007-12-13
3Â¥2008-03-15 17:46:06
zsuzwr
ľ³æ (ÕýʽдÊÖ)
- Ó¦Öú: 2 (Ó×¶ùÔ°)
- ¹ó±ö: 0.15
- ½ð±Ò: 2811.7
- É¢½ð: 10
- Ìû×Ó: 554
- ÔÚÏß: 275Сʱ
- ³æºÅ: 209571
- ×¢²á: 2006-03-06
- רҵ: Äý¾Û̬ÎïÐÔI:½á¹¹¡¢Á¦Ñ§ºÍ

5Â¥2008-03-15 18:02:51














»Ø¸´´ËÂ¥