²é¿´: 2581  |  »Ø¸´: 8

dexter337

Ìú¸Ëľ³æ (СÓÐÃûÆø)

[½»Á÷] ×î½üÅöµ½µÄÒ»¸öIntel visual Fortran ¼ÆË㾫¶ÈµÄÎÊÌâ.´ó¼ÒµÄ»úÆ÷ÉÏÊÇ·ñÒ²ÊÇÕâÑù? ÒÑÓÐ5È˲ÎÓë

ÎÒ ÒÔǰ¶¼ÊÇÓÃcompaq visual Fortran 6.6µÄimsl¿â½øÐмÆËãµÄ.µ«ÊǽüÆÚÐèÒª¼Ó´ó¼ÆËãµÄ¾ØÕóάÊý.Òò´ËÐèÒª¸ÄÓÃIntel visual FortranµÄmklº¯Êý¿â.ÎҵijÌÐòÖÐÓõ½ÁËzgesvÕâ¸öº¯ÊýÇó½âÒ»¸ö¸´ÏµÊýµÄ·½³Ì×é.
       Ô­À´ÓÃcompaq visual FortranµÄʱºòÓõÄÊÇimslÖеÄdlsacg¾«¶ÈºÜºÃ.µ«ÊÇÔÚIntel visual FortranÉÏÅܵĽá¹ûÎó²îºÜÑÏÖØ.ÓÚÊÇ¿ªÊ¼²éÕÒ³ö´íÔ­Òò.
       ºóÀ´ÎÒ·¢ÏÖÒ»¸öÆæ¹ÖµÄÏÖÏó.¾ÍÊÇÓÃimslÊÖ²áÖеÄÒ»¸ö¼ÆËãÀý×Ó,ÔÚIntel ÉϳöµÄ½á¹û¾«¶ÈºÃÏñ²»¹».Ï£Íû´ó¼ÒÌáÌáÒâ¼û,¶à¶àÌÖÂÛ,С³æ²»Ê¤¸Ð¼¤.
       Intel visual FortranÖгÌÐòÀý×ÓÈçÏÂ:
               program main
        implicit none
        integer(8),parameter::n=3
        complex(8)::a(n,n),b(n)
        integer(8)::info,ipiv(n)
        a=reshape((/(3.0d0,-2.0d0),(1.0d0,1.0d0),(4.0d0,0.0d0),(2.0d0,4.0d0),(2.0d0,-6.0d0),&
        (-5.0d0,1.0d0),(0.0d0,-3.0d0),(1.0d0,2.0d0),(3.0d0,-2.0d0)/),(/n,n/))
        b=(/(10.0d0,5.0d0),(6.0d0,-7.0d0),(-1.0d0,2.0d0)/)
        call zgesv(n,1,a,n,ipiv,b,n,info)
        open(2,file='x.txt')
        write(2,5)b
5        format(2f20.16)
        end program main

       Õâ¸öÀý×ÓÇó½â·½³Ìa*x=bÕâÑùµÄÎÊÌâ.½á¹ûÊǺÜÕûÆëµÄ½âÎö½á¹ûÊÇx=(1-i,2+i,3i).ÓÃcompaq visual FortranµÄ½á¹ûÊÇ.
       1.0000000000000000 -1.0000000000000000
       2.0000000000000000  1.0000000000000000
       0.0000000000000000  3.0000000000000000
       »ù±¾ÉÏ¿´²»³öÎó²î.ÏàÓ¦µÄdlsacgº¯ÊýÔÚÎÒÒª¼ÆËãµÄÄ£ÐÍÖй¤×÷µÄ¾«¶È¶¼ºÜºÃ.
       ¿ÉÊÇÎÊÌâÀ´ÁË,ÔÚIntelÖÐ(Ò²¾ÍÊÇÉÏÃæµÄ³ÌÐò.ÓÃmkl¿â¸ø³öµÄ½á¹ûÊÇ.
      1.0000000000000024 -1.0000000000000004
      1.9999999999999987  1.0000000000000000
      -0.0000000000000039  2.9999999999999991
       Õâ¸ö½á¹ûÓÐЩ³öÈËÒâÁÏ,Ï£Íû´ó¼Ò²»ÒªÐ¦»°ÎÒ.ÒòΪÎÒ½ÓÏÂÀ´Óõ½Õâ¸öº¯ÊýµÄµØ·½¾ØÕóµÄÐÔÖʱÈÀý×ÓÖеľØÕó²îµÄ·Ç³£¶à.¼ÆËãµÄ½á¹û¾«¶È·Ç³£²»ÀíÏë.
       ÏëÎÊÎÊÂÛ̳ÀïµÄ³æÓÑÃÇ,´ó¼ÒÓÐûÓÐÓöµ½¹ýÕâÑùµÄÎÊÌâ.ÓÐûÓÐʲôµ÷½Ú»òÕßУ׼mkl»òÕßIntel visual FortranµÄ·½·¨»òÕßÉèÖÃÄØ?
       ÎÒʹÓõÄÊÇ Intel visual Fortran 11.1.065רҵ°æ.×Ô´øµÄmklÊÇ10.2°æµÄ.
       ÔÚÕâÀïÏÈлл´ó¼ÒÁË,×£³æÓÑÃÇÊ¥µ®¿ìÀÖ!
»Ø¸´´ËÂ¥

» ±¾ÌûÒÑ»ñµÃµÄºì»¨£¨×îÐÂ10¶ä£©

» ²ÂÄãϲ»¶

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

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

pippi6

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

¹¤³ÌºÍ¿ÆÑ§ÊýÖµ¼ÆËã×Éѯ

¡ï
Сľ³æ: ½ð±Ò+0.5, ¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
ÎÒ¿´ÁËһϣ¬ËƺõIntel ¸ø³öµÄÊý¾ÝÒ²ÔÚË«¾«¶ÈÉáÈëÎó²îÔÊÐí·¶Î§ÄÚ£¬ÈçÓвî±ðÒ²²»ÏÔÖø¡£ÄãûÓоßÌå˵Ã÷ÕâÑùµÄÉáÈëÎó²îÊÇÈçºÎÓ°ÏìÄãºóÃæµÄ½á¹ûµÄ¡£Èç¹ûÕâÑùµÄÎó²îÄÜÓ°ÏìÄãºóÃæµÄ½á¹û£¬ÄÇÖ»ÄÜ˵Ã÷ÄãºóÃæµÄËã·¨²»Ì«robust¡£ÕâÖÖÁ¿¼¶µÄÎó²î¿ÉÄÜÓи÷ÖÖÔ­ÒòÒýÆð£¬²»Ò»¶¨ÊÇÊýѧ¿âµÄÔ­Òò¡£±ÈÈçÄã¸øµÄcvfÊý¾Ý½á¹ûÀï3.0000000000000000 ÓÐ16λ0£¬ÕâÏÔÈ»²»¿ÉÄÜÊÇÒ»°ãµÄ½á¹û¡£±ä»»Êý×éÔÚÄÚ´æÖеÄλÖã¬¶ÔÆäËû±äÁ¿µÄ¸³Öµ¶¼¿ÉÄÜ»á¸Ä±äÕâÒ»×´¿ö¡£
2Â¥2014-12-26 04:28:54
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ëͺ컨һ¶ä
3Â¥2014-12-26 08:43:39
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

todd0226

гæ (³õÈëÎÄ̳)

¡ï
Сľ³æ: ½ð±Ò+0.5, ¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
1¡¢ÊDz»ÊÇÊý¾ÝÀàÐͲ»Ò»Ö£¬ÎÒ֮ǰµÄ³ÌÐòÒòΪÕâ¸öÔ­Òò½á¹ûÓÐЩÎó²î¡£
2¡¢µ±ÎÒÔÚUse Intel Math Kernel LibraryÖÐÉèÖóÉSequential (/Qmkl:sequential)ʱ£¬releaseºÍdebugģʽϼÆËã½á¹ûÍêȫһÑù£¬¶øÇÒ¶à´Î¼ÆËã½á¹ûÒ»Ñù¡£È»¶øµ±ÎÒÉèÖóÉParallel (/Qmkl:parallel)ʱ£¬releaseºÍdebugģʽϼÆËã½á¹ûÓÐЩ²»Í¬£¬¶à´Î¼ÆËãµÄ½á¹ûÒ²ÓÐЩ΢²î±ð¡£
²»ÖªÂ¥Ö÷µÄÎÊÌâÓÐûÓпÉÄÜÊÇÉÏÃæµÄÔ­Òò¡£»òÕßÂ¥Ö÷ÄÜ·ñ½âÊÍһϵڶþ¸öÎÊÌâµÄÔ­ÒòÄØ£¿
4Â¥2014-12-26 09:17:54
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

dexter337

Ìú¸Ëľ³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
4Â¥: Originally posted by todd0226 at 2014-12-26 09:17:54
1¡¢ÊDz»ÊÇÊý¾ÝÀàÐͲ»Ò»Ö£¬ÎÒ֮ǰµÄ³ÌÐòÒòΪÕâ¸öÔ­Òò½á¹ûÓÐЩÎó²î¡£
2¡¢µ±ÎÒÔÚUse Intel Math Kernel LibraryÖÐÉèÖóÉSequential (/Qmkl:sequential)ʱ£¬releaseºÍdebugģʽϼÆËã½á¹ûÍêȫһÑù£¬¶øÇÒ¶à´Î¼ÆËã½á¹ûÒ» ...

¸ÐлÄãµÄ»Ø¸´.
      ÎÒÒ²»³ÒɹýÕâ¸öÎÊÌâ,Ê×ÏÈÉèÖÃÁËFortranĬÈϵÄÊý¾Ý´æ´¢ÀàÐÍ.(ĬÈÏÊÇinteger kind=4,real kind=4,complex kind=8),ËùÒÔÔÚ×ʼ·¢ÏÖµÄÎÊÌâÊÇÊäÈë¸øº¯ÊýµÄÊý¾Ý²»Í¬ÓÚcompaqµÄ.(´ËÎÊÌâÔÚ·¢ÌûǰÒѾ­Åųý).
      ºóÀ´ÎÒÒ²ÔÚ·þÎñÆ÷ÉÏʵÑéÁËÕâ¸öÀý×Ó,½á¹ûºĮ́ʽ»úÉÏÒ»Ñù.ÓõÄÊÇ´®ÐмÆËã.ÎÒÊÔÑéµÄ½á¹ûÊÇ,´®ÐкͲ¢Ðнá¹ûÒ»Ñù.
5Â¥2014-12-26 16:19:06
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

dexter337

Ìú¸Ëľ³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
2Â¥: Originally posted by pippi6 at 2014-12-26 04:28:54
ÎÒ¿´ÁËһϣ¬ËƺõIntel ¸ø³öµÄÊý¾ÝÒ²ÔÚË«¾«¶ÈÉáÈëÎó²îÔÊÐí·¶Î§ÄÚ£¬ÈçÓвî±ðÒ²²»ÏÔÖø¡£ÄãûÓоßÌå˵Ã÷ÕâÑùµÄÉáÈëÎó²îÊÇÈçºÎÓ°ÏìÄãºóÃæµÄ½á¹ûµÄ¡£Èç¹ûÕâÑùµÄÎó²îÄÜÓ°ÏìÄãºóÃæµÄ½á¹û£¬ÄÇÖ»ÄÜ˵Ã÷ÄãºóÃæµÄËã·¨²»Ì«robus ...

¸ÐлÄãµÄ»Ø¸´:
      È·Êµ,ÎÒ¾õµÃÕâÑùµÄ·ÖÎöºÜÓеÀÀí.ÎÒ»³ÒÉ¿ÉÄÜÊÇcompaq visual FortranÖеÄimsl4.0°æ±¾ÖеÄdlsacgº¯ÊýÀïÃæ¿ÉÄÜÓÐË«¾«¶È¸´ÊýÊý¾Ýת´æµÄ²Ù×÷.Òò´Ë°ÉºóÃæºÜСµÄÐ鲿Ҳ¿ÉÄܰüº¬µÄÎó²îĨ³ýµôÁË.
      ²»¹ýºóÀ´ÔÚIntel visual FortranÉÏÒ²°²×°ÁËimsl7.0º¯Êý¿â.½á¹ûʹÓÃÏàͬµÄdlsacg½øÐмÆËãµÄʱºò½á¹ûÊǺ¬ÓÐÎó²îµÄ,½á¹û¿ÉÒÔ¾«È·µ½Ð¡Êýµãºó14λ.¿´À´°æ±¾±ä»¯µÄʱºòº¯ÊýÄÚ²¿¿ÉÄܲ»Í¬ÁË.
      »¹ÓоÍÊÇ,ÎÒ·ÖÎöÁ˺¯Êý±»µ÷ÓÃ֮ǰµÄÊäÈë(¸ødlsacg,zgesvµÄÊäÈë),Êý¾ÝÊÇÒ»ÑùµÄ.ËùÒÔ,ÎÒ¾õµÃ²î±ðÓ¦¸ÃÊÇÔÚº¯ÊýÄÚ²¿.
6Â¥2014-12-26 16:30:11
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

dexter337

Ìú¸Ëľ³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
3Â¥: Originally posted by liujiebaggio at 2014-12-26 08:43:39

Äú¶¼ÒѾ­ÀÏʦÁË,±ðÅܳöÀ´µ·ÂÒ¹þ.
Ä㻵»µ
7Â¥2014-12-26 16:31:10
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lion-wolf

Òø³æ (ÕýʽдÊÖ)

¡ï
Сľ³æ: ½ð±Ò+0.5, ¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
Ëͺ컨һ¶ä
ÄÜ·¢Ò»¸öIntel visual Fortran 11.1.065רҵ°æµÄ¼¤»îÎļþ¸øÎÒÂð
Ȱ¾ýĪϧ½ðÂÆÒ£¬È°¾ýÎüÈ¡ÉÙÄêʱ£»»¨¿ª¿°ÕÛÖ±ÐëÕÛ£¬Äª´ýÎÞ»¨¿ÕÕÛÖ¦¡£
8Â¥2016-01-17 16:20:34
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÎÊÌì¸ó

ľ³æ (ÕýʽдÊÖ)

¡ï
Сľ³æ: ½ð±Ò+0.5, ¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
Ñ¡Ö÷ÔªµÄËã·¨µÄÊÂÇéÓÐûÓпÉÄÜ

·¢×ÔСľ³æAndroid¿Í»§¶Ë
9Â¥2016-01-18 12:38:06
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ dexter337 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] Ò»Ö¾Ô¸±±»¯315 Çóµ÷¼Á +3 akrrain 2026-03-24 3/150 2026-03-24 19:35 by ÁËÁËÁËÁË¡£¡£
[¿¼ÑÐ] 085602 289·ÖÇóµ÷¼Á +5 WWWÎ÷Î÷¸¥Ë¹ 2026-03-24 5/250 2026-03-24 18:51 by jhhcooi
[¿¼ÑÐ] 0703»¯Ñ§µ÷¼Á£¬Çóµ¼Ê¦ÊÕ +6 ÌìÌìºÃÔËÀ´Éϰ¶° 2026-03-24 6/300 2026-03-24 17:19 by dick_runner
[¿¼ÑÐ] 300Çóµ÷¼Á£¬²ÄÁÏ¿ÆÑ§Ó¢Ò»Êý¶þ +5 leaflight 2026-03-24 5/250 2026-03-24 16:25 by laoshidan
[¿¼²©] É격26Äê +4 °Ë6°Ë68 2026-03-19 4/200 2026-03-24 15:49 by СBenºÇºÇ
[¿¼ÑÐ] Ò»Ö¾Ô¸¼ª´ó»¯Ñ§322Çóµ÷¼Á +4 17501029541 2026-03-23 6/300 2026-03-24 10:21 by ´÷Χ²±µÄСÎÃ×Ó
[¿¼²©] 26É격×Ô¼ö +3 whh869393 2026-03-24 3/150 2026-03-24 09:55 by 21018060
[¿¼ÑÐ] 284Çóµ÷¼Á +10 Zhao anqi 2026-03-22 10/500 2026-03-24 00:08 by Equinoxhua
[¿¼ÑÐ] ÉϺ£µçÁ¦´óѧ²ÄÁÏ·À»¤ÓëвÄÁÏÖØµãʵÑéÊÒÕÐÊÕµ÷¼ÁÑо¿Éú£¨²ÄÁÏ¡¢»¯Ñ§¡¢µç»¯Ñ§£¬»·¾³£© +3 ÎÒ°®Ñ§µç³Ø 2026-03-23 3/150 2026-03-23 17:16 by AZMK
[¿¼ÑÐ] 306Çóµ÷¼Á +9 chuanzhu´¨Öò 2026-03-18 9/450 2026-03-23 13:17 by luoyongfeng
[¿¼ÑÐ] 263Çóµ÷¼Á +6 yqdszhdap£­ 2026-03-22 9/450 2026-03-23 12:57 by yqdszhdap£­
[¿¼ÑÐ] Ò»Ö¾Ô¸070300Õã´ó»¯Ñ§358·Ö£¬Çóµ÷¼Á£¡ +4 ËÖËÖÓã.. 2026-03-21 4/200 2026-03-23 08:12 by Iveryant
[¿¼ÑÐ] 275Çóµ÷¼Á +6 shansx 2026-03-22 8/400 2026-03-22 15:27 by barlinike
[¿¼ÑÐ] ³õÊÔ 317 +7 °ëÀ­Ô±û 2026-03-20 7/350 2026-03-21 22:26 by peike
[¿¼ÑÐ] 278Çóµ÷¼Á +9 ÑÌ»ðÏÈÓÚ´º 2026-03-17 9/450 2026-03-21 17:47 by ѧԱ8dgXkO
[¿¼ÑÐ] 313Çóµ÷¼Á +4 ËÁÈþ·¡Ò¼22 2026-03-19 4/200 2026-03-21 17:33 by ColorlessPI
[¿¼ÑÐ] Çóµ÷¼Á +3 °×QF 2026-03-21 3/150 2026-03-21 13:12 by zhukairuo
[¿¼ÑÐ] 288Çóµ÷¼Á +16 ÓÚº£º£º£º£ 2026-03-19 16/800 2026-03-20 22:28 by JourneyLucky
[¿¼ÑÐ] Ò»Ö¾Ô¸ Î÷±±´óѧ £¬070300»¯Ñ§Ñ§Ë¶£¬×Ü·Ö287£¬Ë«·ÇÒ»±¾£¬Çóµ÷¼Á¡£ +4 ³¿»èÏßÓëÐǺ£ 2026-03-19 4/200 2026-03-20 22:15 by JourneyLucky
[¿¼ÑÐ] 085410È˹¤ÖÇÄÜר˶317Çóµ÷¼Á£¨0854¶¼¿ÉÒÔ£© +4 xbxudjdn 2026-03-18 4/200 2026-03-20 09:07 by ²»168
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û