±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 2415  |  »Ø¸´: 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

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

ÒýÓûØÌû:
Originally posted by argo at 2009-8-27 14:33:
ÒÔǰÓõÄÒ»ÖÖ·½·¨£¬¹©²Î¿¼£¬f77µÄÓï·¨
[code]
        open(20,file="n100Phi="
        1        //char(48+int(dphi+1.e-6))//"."
        1        //char(48+mod(int((dphi+1.e-6)*10),10))
        1        //char(48+mod(int((dphi ...

лл£¡
13Â¥2009-08-27 19: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µÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] Ò»Ö¾Ô¸±±¾©Àí¹¤´óѧ±¾¿Æ211²ÄÁϹ¤³Ì294Çóµ÷¼Á +6 mikasaµÄΧ½í 2026-03-28 6/300 2026-03-29 01:32 by fmesaito
[¿¼ÑÐ] 086000ÉúÎïÓëÒ½Ò©µ÷¼Á +3 Feisty¡£ 2026-03-28 7/350 2026-03-29 00:41 by 544594351
[¿¼ÑÐ] 11408Èí¼þ¹¤³ÌÇóµ÷¼Á +3 Qiuѧing 2026-03-28 3/150 2026-03-28 21:50 by zhq0425
[¿¼ÑÐ] Çóµ÷¼Á +3 QiMing7 2026-03-25 4/200 2026-03-28 14:30 by QiMing7
[¿¼ÑÐ] 0703±¾¿ÆÖ£ÖÝ´óѧÇóµ÷¼Á +3 nhj_ 2026-03-25 3/150 2026-03-28 13:24 by Iveryant
[¿¼ÑÐ] 283Çóµ÷¼Á +7 A child 2026-03-28 7/350 2026-03-28 12:05 by zllcz
[¿¼ÑÐ] 081200-314 +3 LILIQQ 2026-03-27 4/200 2026-03-28 09:41 by ±£»¤µØÇòÄãÎÒ×öÆ
[¿¼ÑÐ] 308Çóµ÷¼Á +7 īīĮ 2026-03-27 7/350 2026-03-28 07:43 by ÈÈÇéɳĮ
[¿¼ÑÐ] 291Çóµ÷¼Á +7 ‹üÈA 2026-03-22 7/350 2026-03-28 04:02 by fmesaito
[¿¼ÑÐ] 322Çóµ÷¼Á +4 ÎÒÕæµÄºÜÏëѧϰ 2026-03-23 4/200 2026-03-27 13:51 by ÑîÑîÑî×Ï
[¿¼ÑÐ] 298µ÷¼Á +3 jiyingjie123 2026-03-27 3/150 2026-03-27 11:57 by wxiongid
[¿¼ÑÐ] 341Çóµ÷¼Á +7 ÇàÄûÃÊ1 2026-03-26 7/350 2026-03-27 00:19 by wxiongid
[¿¼ÑÐ] ²ÄÁÏÓ뻯¹¤304ÇóBÇøµ÷¼Á +3 Çñgl 2026-03-26 6/300 2026-03-26 18:03 by Çñgl
[¿¼ÑÐ] 281Çóµ÷¼Á +6 Koxui 2026-03-24 7/350 2026-03-26 15:37 by Î޼ʵIJÝÔ­
[¿¼ÑÐ] Ò»Ö¾Ô¸ÖÐÄÏ´óѧ»¯Ñ§Ñ§Ë¶0703×Ü·Ö337Çóµ÷¼Á +7 niko- 2026-03-22 7/350 2026-03-25 20:14 by qingfeng258
[¿¼ÑÐ] 284Çóµ÷¼Á +15 Zhao anqi 2026-03-22 15/750 2026-03-25 12:51 by wht0531
[¿¼ÑÐ] 085404µç×ÓÐÅÏ¢284·ÖÇóµ÷¼Á +4 13659058978 2026-03-24 4/200 2026-03-24 12:15 by syl20081243
[¿¼ÑÐ] 344Çóµ÷¼Á +3 desto 2026-03-24 3/150 2026-03-24 10:09 by ²«»÷518
[¿¼ÑÐ] 333Çóµ÷¼Á +3 ALULU4408 2026-03-23 3/150 2026-03-23 19:04 by macy2011
[¿¼ÑÐ] 336»¯¹¤µ÷¼Á +4 Íõ´ó̹1 2026-03-23 5/250 2026-03-23 18:32 by allen-yin
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û