Znn3bq.jpeg
²é¿´: 3128  |  »Ø¸´: 4
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

yuahua

гæ (СÓÐÃûÆø)

[ÇóÖú] intel visual fortranÖÐMKLÈçºÎʹÓã¬ÊÇÓÃuse module»¹ÊÇinclude£¿

intel visual fortranÖÐMKLÈçºÎʹÓã¬ÊÇÓÃuse module»¹ÊÇinclude£¬ÁíÍâÔõô¿´Ëùµ÷Óõĺ¯ÊýÊÇÔÚÄÄÒ»¸ö¿âÀ»òÕßÔÚÄÄÒ»¸öÍ·ÎļþÀï£©ÄØ£¿±ÈÈçÕâÕÅͼÀïµÄdot£¨x£¬y£©£¬ÎÒÔÚfortran³ÌÐòÖÐʹÓÃdotº¯ÊýµÄʱºò¸ÃÔõôÓÃÄØ£¿
Çó½âÊÍ
ÎҵijÌÐòÈçÏ£º
program main
!include  blas.f90
integer n
real,allocatable::vec_a(,vec_b(
integer ii
read *,n
allocate(vec_a(n))
allocate (vec_b(n))

do ii=1,n
    vec_a(ii)=1.25*ii
    vec_b(ii)=0.75*ii
end do
dot_result=dot(vec_a,vec_b)
end

´íÎóÌáʾÊÇ£º>Source1.obj : error LNK2019: ÎÞ·¨½âÎöµÄÍⲿ·ûºÅ _DOT£¬¸Ã·ûºÅÔÚº¯Êý _MAIN__ Öб»ÒýÓÃ
1>Debug\exm_mkl_innerprod.exe : fatal error LNK1120: 1 ¸öÎÞ·¨½âÎöµÄÍⲿÃüÁî
intel visual fortranÖÐMKLÈçºÎʹÓã¬ÊÇÓÃuse module»¹ÊÇinclude£¿
ÎÞ±êÌâ.png
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

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

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

yuahua

гæ (СÓÐÃûÆø)

ÒýÓûØÌû:
2Â¥: Originally posted by pippi6 at 2013-06-30 11:15:17
Ò»°ãʹÓÿ⺯¶¼ÊÇÒªlink ÏàÓ¦µÄlib£¬include ÊÇÄãÓÐ×Ô¼ºµÄsource code »òheader file£¬use Ò²²»³£¼û¡£google ÁËÒ»ÏÂfortran MKL
http://stackoverflow.com/questions/5925816/fortran-double-precision-program-wi ...

¾ÍÊÇ˵£¬ÎÒÔÚʹÓÃmklµÄº¯Êý»òÕßÄ£¿éµÄʱºò£¬ÎÒ²»ÖªµÀ¸ÃÔõô¿´mkl°ïÖúÎĵµ£¬Í¼Æ¬ÖжÔdotµÄ½éÉÜÖ»ÊÇ˵ÁËËùÐèÒªµÄincludeÎļþ£¬µ«ÊÇÎÒ¸ÃÔõôÓÃÄØ£¿
4Â¥2013-06-30 11:27:26
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 5 ¸ö»Ø´ð

pippi6

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

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

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

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
Ò»°ãʹÓÿ⺯¶¼ÊÇÒªlink ÏàÓ¦µÄlib£¬include ÊÇÄãÓÐ×Ô¼ºµÄsource code »òheader file£¬use Ò²²»³£¼û¡£google ÁËÒ»ÏÂfortran MKL
http://stackoverflow.com/questio ... le-mkl-blas-routine
ÕÒÕÒÄã×Ô¼ºÏëÒªµÄ
2Â¥2013-06-30 11:15:17
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

yuahua

гæ (СÓÐÃûÆø)

ÒýÓûØÌû:
2Â¥: Originally posted by pippi6 at 2013-06-30 11:15:17
Ò»°ãʹÓÿ⺯¶¼ÊÇÒªlink ÏàÓ¦µÄlib£¬include ÊÇÄãÓÐ×Ô¼ºµÄsource code »òheader file£¬use Ò²²»³£¼û¡£google ÁËÒ»ÏÂfortran MKL
http://stackoverflow.com/questions/5925816/fortran-double-precision-program-wi ...

ÎÒ¿´ÁËÒ»ÏÂmkµÄÀý×Ó£¬·¢ÏÖ¶¼ÊÇÓÃuseÀ´¼ÓÔØmoduleµÄ°¡£¬ÎÒÏÖÔÚ¾ÍÊDz»ÖªµÀ¸ÃÔõôÕÒÕâ¸ömodule£¬±ÈÈçÉÏÃæµÄÕâ¸öͼƬÖеÄdotº¯Êý£¬ÎÒÒªÊÇÔÚÎҵijÌÐòÀïÓõϰ£¬ÎÒ¸ÃÔõôÓÃÄØ£¿ÎÒ¿´include fileÖÐ˵ҪÓõ½mkl.fi»òÕßblas.f90£¬µ«ÊÇÎÒ³ÌÐòÀïдÉÏ include blas.f90»¹ÊÇ»á³ö´í¡£
3Â¥2013-06-30 11:19:47
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

fortran_19

Í­³æ (ÕýʽдÊÖ)

ÒýÓûØÌû:
4Â¥: Originally posted by yuahua at 2013-06-30 11:27:26
¾ÍÊÇ˵£¬ÎÒÔÚʹÓÃmklµÄº¯Êý»òÕßÄ£¿éµÄʱºò£¬ÎÒ²»ÖªµÀ¸ÃÔõô¿´mkl°ïÖúÎĵµ£¬Í¼Æ¬ÖжÔdotµÄ½éÉÜÖ»ÊÇ˵ÁËËùÐèÒªµÄincludeÎļþ£¬µ«ÊÇÎÒ¸ÃÔõôÓÃÄØ£¿...

Â¥Ö÷ÊÇ·ñ½â¾öÁËÕâ¸öÎÊÌâÄØ
5Â¥2015-12-09 11:42:34
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] Ò»Ö¾Ô¸0807 ÊýÒ»Ó¢Ò» 313 ÓÐûÓжþÂÖµ÷¼Á +7 emokidd 2026-04-08 7/350 2026-04-09 00:11 by Evan_Liu
[¿¼ÑÐ] 265Çóµ÷¼Á +3 ·ç˵ËýÔçÍüÁË 2026-04-07 3/150 2026-04-08 20:20 by ÄæË®³Ë·ç
[¿¼ÑÐ] 344Çóµ÷¼Á +11 κ×Óper 2026-04-07 11/550 2026-04-07 23:01 by JourneyLucky
[¿¼ÑÐ] 277Çóµ÷¼Á ÊýÒ»104·Ö +9 Æ¿×ÓPZ 2026-04-05 14/700 2026-04-07 17:52 by À¶ÔÆË¼Óê
[¿¼ÑÐ] ÉúÎïµ÷¼Á +5 ³È×Ó³È×Ó³È×Ó°¡ 2026-04-05 9/450 2026-04-07 15:31 by Éϰ¶¿ì¿ì
[¿¼ÑÐ] »¯¹¤µ÷¼Á303·Ö£¬¹ýËļ¶ +34 ÆÜÎà´ý·ç 2026-04-02 34/1700 2026-04-07 12:30 by 1018329917
[¿¼ÑÐ] 327¿¼Ñе÷¼ÁÍÆ¼ö +6 ÎØÎØÎØÎØÄØ 2026-04-06 6/300 2026-04-06 21:39 by à£à£à£0119
[¿¼ÑÐ] ¹¤¿Æ370Çóµ÷¼Á +3 äçÐļ弦µ° 2026-04-05 3/150 2026-04-06 10:55 by ÕâÊÇÒ»¸öÎÞÁĵÄê
[¿¼ÑÐ] 296Çóµ÷¼Á +3 Íô£¡£¿£¡ 2026-04-05 4/200 2026-04-05 20:13 by à£à£à£0119
[¿¼ÑÐ] 298·Ö 070300Çóµ÷¼Á +15 zwen03 2026-04-02 15/750 2026-04-05 12:52 by Hdyxbekcb
[¿¼ÑÐ] ¿¼Ñе÷¼Á +3 mcbbc 2026-04-04 3/150 2026-04-05 10:03 by barlinike
[¿¼ÑÐ] µ÷¼ÁÇóÖú +10 Ïë»»ÊÖ»ú²»Ïë½âÊ 2026-04-02 13/650 2026-04-05 09:41 by sam3303
[¿¼ÑÐ] 280Çóµ÷¼Á +21 ¹¾ààÏþÏþ 2026-04-02 22/1100 2026-04-04 11:12 by Öí»á·É
[¿¼ÑÐ] 278Çóµ÷¼Á +6 Yy7400 2026-04-03 6/300 2026-04-04 09:53 by zhangdingwa
[¿¼ÑÐ] 322Çóµ÷¼Á +4 FZAC123 2026-04-03 4/200 2026-04-03 20:55 by zhq0425
[¿¼ÑÐ] 285Çóµ÷¼Á +5 AZMK 2026-04-03 8/400 2026-04-03 18:17 by AZMK
[¿¼ÑÐ] 081200-11408-276ѧ˶Çóµ÷¼Á +5 ´Þwj 2026-04-03 5/250 2026-04-03 15:06 by arrow8852
[¿¼ÑÐ] ¹¤¿Æ341·Öµ÷¼Á +3 Âå¶àÂÞ 2026-04-03 3/150 2026-04-03 14:20 by 1753564080
[¿¼ÑÐ] 315Çóµ÷¼Á +6 ˳Àí³ÉÕÅ 2026-04-03 8/400 2026-04-03 14:04 by °ÙÁéͯ888
[¿¼ÑÐ] Çóµ÷¼Á 302·Ö³õÊÔ 0854 +5 Áæ¿ÉÀÖ 2026-04-02 5/250 2026-04-02 17:53 by ±ÊÂä½õÖÝ
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û