±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 948  |  »Ø¸´: 5

geohhy

Òø³æ (³õÈëÎÄ̳)

[ÇóÖú] fortran ¶¯Ì¬Êý×éÎÊÌâ

ÔÚfortran±à³ÌÖÐÓöµ½Ò»¸ö¶¯Ì¬Êý×éÎÊÌ⣬ºÜÀ§»ó£¬ÇëÇó¸ßÈËÖ¸µã£¡
ÏÂÃæÊDZàµÄ³ÌÐòÀý×Ó£º
program main
implicit none
real(8),allocatable::  y( :, : )
integer(4):: i, j, ierr

i=6000 £¡ÕâÀïÈç¹û¸ÄΪi=10000£¬ÏÂÃæ·´¶ø²»³ö´í£¬ÎªÊ²Ã´£¿ÈçºÎ½â¾öÕâ¸öÎÊÌ⣿
j=600000
allocate(y(i,j),stat=ierr)
if(ierr/=0) then
        write(*,*) ierr
endif

end program main

[ Last edited by geohhy on 2013-4-3 at 08:34 ]
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

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

snoopyzhao

ÖÁ×ðľ³æ (Ö°Òµ×÷¼Ò)

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
ÎÒÓà gfortran µÄ²âÊÔ½á¹û±íÃ÷£¬ÄãµÄÄǸö×¢ÊÍÀïµÄ˵·¨ÊDz»ÕýÈ·µÄ¡£¹À¼ÆÔ­Òò»¹ÊÇÊý×éÌ«´óÁË¡­¡­
2Â¥2013-04-03 11:38:52
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

geohhy

Òø³æ (³õÈëÎÄ̳)

ÒýÓûØÌû:
2Â¥: Originally posted by snoopyzhao at 2013-04-03 11:38:52
ÎÒÓà gfortran µÄ²âÊÔ½á¹û±íÃ÷£¬ÄãµÄÄǸö×¢ÊÍÀïµÄ˵·¨ÊDz»ÕýÈ·µÄ¡£¹À¼ÆÔ­Òò»¹ÊÇÊý×éÌ«´óÁË¡­¡­

ÎÒÔÚWINxp SP3ÏÂÓÃPowerstation4.0±àÒë¼ÆËãµÄ½á¹û¾ÍÊÇÕâÑù
3Â¥2013-04-03 15:38:25
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

snoopyzhao

ÖÁ×ðľ³æ (Ö°Òµ×÷¼Ò)

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

ÒýÓûØÌû:
3Â¥: Originally posted by geohhy at 2013-04-03 15:38:25
ÎÒÔÚWINxp SP3ÏÂÓÃPowerstation4.0±àÒë¼ÆËãµÄ½á¹û¾ÍÊÇÕâÑù...

ierr /= 0 ±íʾûÓа취·ÖÅäÄÚ´æ¡£ÎÒ²»ÏëÐÅ£¬ÄãµÄ i = 6000 ʱ²»ÄÜ·ÖÅ䣬µ« i=10000 È´¿ÉÒÔ¡­¡­

ÄãµÄ»úÆ÷ɶÅäÖã¿
4Â¥2013-04-03 15:48:50
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

geohhy

Òø³æ (³õÈëÎÄ̳)

ÒýÓûØÌû:
4Â¥: Originally posted by snoopyzhao at 2013-04-03 15:48:50
ierr /= 0 ±íʾûÓа취·ÖÅäÄÚ´æ¡£ÎÒ²»ÏëÐÅ£¬ÄãµÄ i = 6000 ʱ²»ÄÜ·ÖÅ䣬µ« i=10000 È´¿ÉÒÔ¡­¡­

ÄãµÄ»úÆ÷ɶÅäÖã¿...

µÄÈ·Èç´Ë¡£

ÎÒÓõÄÊÇX200£¬¶øÇÒÔÚÁíһλÅóÓѵĵçÄÔÉÏÒ²ÊÔ¹ý£¬ÊÇÆ»¹û»ú£¨WIN7ϵͳ£¬Powerstaion£©
5Â¥2013-04-03 15:52:06
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

geohhy

Òø³æ (³õÈëÎÄ̳)

ÒýÓûØÌû:
5Â¥: Originally posted by geohhy at 2013-04-03 15:52:06
µÄÈ·Èç´Ë¡£

ÎÒÓõÄÊÇX200£¬¶øÇÒÔÚÁíһλÅóÓѵĵçÄÔÉÏÒ²ÊÔ¹ý£¬ÊÇÆ»¹û»ú£¨WIN7ϵͳ£¬Powerstaion£©...

Áí·Ö±ðÓÃgfortranºÍintelfortran±àÒë¹ý£¬½á¹ûÒ²²»¾¡Ïàͬ£¬ËùÒÔ¾õµÃ·Ç³£Ææ¹Ö£¬ÌØÔÚÕâÀïѰÇó¸ßÈËÖ¸µã£¡
6Â¥2013-04-03 15:54:45
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ geohhy µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 08¹¤¿ÆÇóµ÷¼Á290·Ö +5 1314Åõ»¨ 2026-04-02 8/400 2026-04-02 13:16 by ÇÇßÕßÕßÕ
[¿¼ÑÐ] 314Çóµ÷¼Á +11 1xiaojun23 2026-03-31 12/600 2026-04-02 12:31 by 1xiaojun23
[¿¼ÑÐ] 327Çóµ÷¼Á +9 ¼³Òàê» 2026-03-29 9/450 2026-04-02 11:44 by ÔËÆøyunqi
[¿¼ÑÐ] 261ÇóBÇøµ÷¼Á +5 Ã÷×С¤ 2026-04-01 7/350 2026-04-02 11:17 by ×Þξξ
[¿¼ÑÐ] 329Çóµ÷¼Á +8 miaodesi 2026-04-02 10/500 2026-04-02 10:24 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] ²ÄÁÏ¿¼Ñе÷¼Á +9 Gs´óÍõ 2026-04-02 9/450 2026-04-02 10:24 by olim
[¿¼ÑÐ] Ò»Ö¾Ô¸ÏÃÃÅ´óѧ»¯Ñ§¹¤³Ì£¨×¨Ë¶£©-Êý¶þÓ¢¶þ406·Ö-Çóµ÷¼Á +5 Ïô󻯹¤ 2026-04-01 5/250 2026-04-02 10:03 by jp9609
[¿¼ÑÐ] 290Çóµ÷¼Á +5 dfffsar 2026-03-29 5/250 2026-04-01 19:45 by 6781022
[¿¼ÑÐ] 303·Ö 0807ѧ˶Çóµ÷¼Á +3 TYC3632 2026-04-01 3/150 2026-04-01 19:24 by lwk2004
[¿¼ÑÐ] 265Çóµ÷¼Á +11 yelck 2026-04-01 12/600 2026-04-01 19:12 by 549790059
[¿¼ÑÐ] ²ÄÁÏר˶306Ó¢Ò»Êý¶þ +7 z1z2z3879 2026-03-31 7/350 2026-04-01 14:50 by ZXlzxl0425
[¿¼ÑÐ] 283Çóµ÷¼Á +9 A child 2026-03-28 9/450 2026-04-01 14:20 by Jaylen.
[¿¼ÑÐ] 0710ÉúÎïѧÇóµ÷¼Á£¡ +6 ÐðÊöÎÄ 2026-03-31 6/300 2026-04-01 09:39 by JourneyLucky
[¿¼ÑÐ] Ò»Ö¾Ô¸£ºÎ÷±±´óѧ£¬Ó¢Ò»ÊýÒ»408-284·ÖÇóµ÷¼Á +7 12.27 2026-03-27 7/350 2026-03-31 21:59 by lbsjt
[¿¼ÑÐ] ÕÅ·¼Ãú-Öйúũҵ´óѧ-»·¾³¹¤³Ìר˶-298 +9 ÊÖ»úÓû§ 2026-03-26 9/450 2026-03-31 18:09 by 544594351
[¿¼ÑÐ] ±§Ç¸ +3 ÌïºéÓÐ 2026-03-30 3/150 2026-03-30 19:11 by ÃÔºýCCPs
[¿¼ÑÐ] 356Çóµ÷¼Á +4 gysy?s?a 2026-03-28 4/200 2026-03-29 10:32 by ÌÆãå¶ù
[¿¼ÑÐ] 316Çóµ÷¼Á +7 ½­´Ç666 2026-03-26 7/350 2026-03-28 21:28 by sanrepian
[¿¼ÑÐ] ¸´ÊÔµ÷¼Á +3 raojunqi0129 2026-03-28 3/150 2026-03-28 15:27 by ÂäÉ˼
[¿¼ÑÐ] 0856µ÷¼Á +5 ÇóÇóÈÃÎÒÓÐÊé¶Á° 2026-03-26 6/300 2026-03-27 15:12 by caszguilin
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û