±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 2418  |  »Ø¸´: 12
µ±Ç°Ö÷ÌâÒѾ­´æµµ¡£
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

wlscxf

Í­³æ (СÓÐÃûÆø)

[½»Á÷] ¡¾ÇóÖú¡¿FORTRAN90 ½¨ÎļþÔõôÓñäÁ¿×÷ÎļþÃû£¿¡¾ÒÑÍê³É¡¿

Çë½Ì£ºÓÃFORTRAN±à³ÌʱÔÚÒ»¸ö DO Ñ­»·ÖÐÒª open Îļþ£¬ÏëÓñäÁ¿×öÎļþÃû£¬¸ÃÔõôʵÏÖ£¿
³ÌÐòÈçÏ£º
do i=1,n
     open(i, 'file_i',status="unknown"
     write(i,*)a,b,c
end do
¼Ù¶¨ÆäÖеıäÁ¿¶¼ÒѾ­ºÏ·¨ÉùÃ÷¹ý¡£
Ò²¾ÍÊÇ˵ÔÚÑ­»·ÖÐÒª´´½¨n¸ö²»Í¬µÄÎļþ£¬ÆäÖÐÎļþÃû ¡®file_i¡¯ ÏëÒÔ i Çø·Ö£¬¸ÃÔõôÃüÃûÄØ£¿Ð´³É ¡®file_i¡¯ ºÃÏñ²»Ðа¡¡£
Çë´ïÈËÖ¸½Ì£¬Ð»Ð»¡£

[ Last edited by wlscxf on 2009-8-28 at 21:34 ]
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

wlscxf

Í­³æ (СÓÐÃûÆø)

wangen994(½ð±Ò+0,VIP+0):Äã¿ÉÒÔÖ±½Ó¸ø¶þÂ¥·¢Õ¾ÄÚÐÅ 8-27 08:43
ÒýÓûØÌû:
Originally posted by tjyl at 2009-8-26 00:19:
ÓÃÄÚ²¿Îļþ£¬¾ÍLS˵µÄÄÇÑù¡£

ÁíÍ⣬ÆäʵÊä³öÎļþ¿ÉÒÔ²»ÏÈopenµÄ¡£

Ö±½Ówirte(x,*)  ...
»áÊä³öΪifort.x ÕâÑùµÄÎļþ¡£
»òÐíÕâÑù¸ü¼òµ¥£¬Êä³öÎļþ¾ÍÊÇifort.x£¨X=N1:N2£©

Âé·³Äܲ»ÄÜ˵µÄ¸üÏêϸЩ£¿ÎÒÊÔÁ˲»Ðа¡¡£
xÊDZíʾʲô£¿ÐèÒªÊÂÏÈÉùÃ÷Âð£¿
ÎÒÊÇÏëÔÚÒ»¸öÑ­»·Öдò¿ªÎļþ£¬ËùÒÔÎļþÃûÒª²»Í¬¡£

ÎÒÏÖÔÚÊÇÓÃÊý×é±íʾµÄ£¬Ò²¾ÍÊÇ1Â¥µÄ·½·¨£¬ÉùÃ÷Ò»¸öºÜ³¤µÄÊý×飺
character(len=2) a(1:50):/ '01', '02', '03', '04', '05', '06', ....,'50' /)
È»ºóÔÚÑ­»·ÖУº
open(i, file=a(i))
¾õµÃÓÐЩÂé·³¡£

ºÜÆÚ´ý2Â¥µÄÏê½â£¬Ð»Ð»¡£
8Â¥2009-08-26 18:24:27
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 13 ¸ö»Ø´ð

qingyun533

Ìú¸Ëľ³æ (ÖøÃûдÊÖ)

¡ï ¡ï ¡ï
csfn(½ð±Ò+1,VIP+0):thx very much »¶Ó­³£À´½»Á÷ 8-26 10:33
wlscxf(½ð±Ò+2,VIP+0): 8-26 18:15
¶¨Òå×Ö·ûÊý×é¼´¿É
2Â¥2009-08-25 22:47:09
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

tjyl

½ð³æ (ÕýʽдÊÖ)

¡ï ¡ï ¡ï ¡ï ¡ï ¡ï
csfn(½ð±Ò+3,VIP+0):thx very much »¶Ó­³£À´½»Á÷ 8-26 10:33
wlscxf(½ð±Ò+3,VIP+0): 8-26 18:15
ÓÃÄÚ²¿Îļþ£¬¾ÍLS˵µÄÄÇÑù¡£

ÁíÍ⣬ÆäʵÊä³öÎļþ¿ÉÒÔ²»ÏÈopenµÄ¡£

Ö±½Ówirte(x,*)  ...
»áÊä³öΪfort.x ÕâÑùµÄÎļþ¡£
»òÐíÕâÑù¸ü¼òµ¥£¬Êä³öÎļþ¾ÍÊÇifort.x£¨X=N1:N2£©

[ Last edited by tjyl on 2009-8-27 at 09:27 ]
3Â¥2009-08-26 00:19:03
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

wlscxf

Í­³æ (СÓÐÃûÆø)

лл, ÏÈÊÔһϣ¬»ØÍ·ÔÙÀ´Ëͽð±Ò£¡
5Â¥2009-08-26 09:49:11
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] Ò»Ö¾Ô¸¹þ¶û±õ¹¤Òµ´óѧ²ÄÁÏÓ뻯¹¤·½Ïò336·Ö +9 ³½ãå5211314 2026-03-26 9/450 2026-03-29 01:12 by ÎÒÊÇС¿µ
[¿¼ÑÐ] 356Çóµ÷¼Á +3 gysy?s?a 2026-03-28 3/150 2026-03-29 00:33 by 544594351
[¿¼ÑÐ] 0703»¯Ñ§µ÷¼Á£¬Çóµ¼Ê¦ÊÕ +9 ÌìÌìºÃÔËÀ´Éϰ¶° 2026-03-24 10/500 2026-03-28 22:17 by chemzp
[¿¼ÑÐ] һ־Ը̫ԭÀí¹¤°²È«¹¤³Ì300·Ö£¬Çóµ÷¼Á +5 0857Çóµ÷¼Á. 2026-03-24 6/300 2026-03-28 22:04 by zhq0425
[¿¼ÑÐ] ±¾¿ÆÐÂÄÜÔ´¿ÆÑ§Ó빤³Ì£¬Ò»Ö¾Ô¸»ªÀíÄܶ¯285Çóµ÷¼Á +7 AZMK 2026-03-28 11/550 2026-03-28 21:01 by xxxsssccc
[¿¼ÑÐ] »¯Ñ§0703 µ÷¼Á 306·Ö Ò»Ö¾Ô¸211 +4 26ÒªÉϰ¶ 2026-03-28 4/200 2026-03-28 15:30 by 1018329917
[¿¼ÑÐ] 085600 286·Ö ²ÄÁÏÇóµ÷¼Á +7 ÂéÀ±öÏÓã 2026-03-27 8/400 2026-03-28 12:17 by zllcz
[¿¼ÑÐ] 286Çóµ÷¼Á +12 PolarBear11 2026-03-26 12/600 2026-03-28 12:14 by zllcz
[¿¼ÑÐ] 340Çóµ÷¼Á +5 jhx777 2026-03-27 5/250 2026-03-28 04:18 by fmesaito
[¿¼ÑÐ] 070300»¯Ñ§Çóµ÷¼Á +4 Æð¸öÃûÕ¦ÕâôÄÑ 2026-03-27 4/200 2026-03-27 21:39 by 83503ËïÀÏʦ
[¿¼ÑÐ] 298µ÷¼Á +3 jiyingjie123 2026-03-27 3/150 2026-03-27 11:57 by wxiongid
[¿¼ÑÐ] 315µ÷¼Á +4 0860Çóµ÷¼Á 2026-03-26 5/250 2026-03-27 11:23 by wangjy2002
[ÂÛÎÄͶ¸å] Journal of Mechanical Science and Technology +3 Russ_ss 2026-03-25 5/250 2026-03-27 10:49 by ½С¹û»­´ó±ý
[¿¼ÑÐ] 292Çóµ÷¼Á +4 ÇóÇóÁËÊÕÏÂÎÒ°É£ 2026-03-26 4/200 2026-03-27 10:37 by zhshch
[¿¼ÑÐ] 081200-11408-276ѧ˶Çóµ÷¼Á +4 ´Þwj 2026-03-26 4/200 2026-03-27 08:04 by chemisry
[¿¼ÑÐ] 325Çóµ÷¼Á +3 Aoyijiang 2026-03-23 3/150 2026-03-26 20:46 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] 085602 289·ÖÇóµ÷¼Á +8 WWWÎ÷Î÷¸¥Ë¹ 2026-03-24 8/400 2026-03-26 16:33 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] »·¾³×¨Ë¶324·ÖÇóµ÷¼ÁÍÆ¼ö +5 ÐùСÄþ¡ª¡ª 2026-03-26 5/250 2026-03-26 12:05 by i_cooler
[¿¼ÑÐ] Ò»Ö¾Ô¸¼ªÁÖ´óѧ²ÄÁÏÓ뻯¹¤303·ÖÇóµ÷¼Á +4 Ϊѧ666 2026-03-24 4/200 2026-03-25 11:27 by BruceLiu320
[¿¼ÑÐ] ʯºÓ×Ó´óѧ£¨211¡¢Ë«Ò»Á÷£©Ë¶²©Ñо¿Éú³¤ÆÚÕÐÉú¹«¸æ +3 Àî×ÓÄ¿ 2026-03-22 3/150 2026-03-22 21:01 by ÔõôÊÍ»³
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û