[問題] 關於fortran上lib連結的問題
大家好,我是fortran的新手
若打擾到大家的時間萬分抱歉
以下是我的線性迴歸的程式碼
INTEGER INTCEP, LDX, NCOEF, NIND, NOBS
PARAMETER (INTCEP=1, NIND=3, NOBS=9, LDX=NOBS,NCOEF=INTCEP+NIND)
INTEGER NOUT
REAL B(NCOEF), SSE, SST, X(LDX,NIND), Y(NOBS)
EXTERNAL RLSE, UMACH, WRRRN
DATA (X(1,J),J=1,NIND)/ 7.0, 5.0, 6.0/, Y(1)/ 7.0/
DATA (X(2,J),J=1,NIND)/ 2.0, -1.0, 6.0/, Y(2)/-5.0/
DATA (X(3,J),J=1,NIND)/ 7.0, 3.0, 5.0/, Y(3)/ 6.0/
DATA (X(4,J),J=1,NIND)/-3.0, 1.0, 4.0/, Y(4)/ 5.0/
DATA (X(5,J),J=1,NIND)/ 2.0, -1.0, 0.0/, Y(5)/ 5.0/
DATA (X(6,J),J=1,NIND)/ 2.0, 1.0, 7.0/, Y(6)/-2.0/
DATA (X(7,J),J=1,NIND)/-3.0, -1.0, 3.0/, Y(7)/ 0.0/
DATA (X(8,J),J=1,NIND)/ 2.0, 1.0, 1.0/, Y(8)/ 8.0/
DATA (X(9,J),J=1,NIND)/ 2.0, 1.0, 4.0/, Y(9)/ 3.0/
CALL RLSE (NOBS, Y, NIND, X, LDX, INTCEP, B, SST, SSE)
CALL WRRRN ('B', NCOEF, 1, B, NCOEF, 0)
CALL UMACH (2, NOUT)
WRITE (NOUT,*)
WRITE (NOUT,99999)'SST = ', SST, ' SSE =', SSE
99999 FORMAT (A7, F7.2, A7, F7.2)
END
DEBUG的訊息為
Linking...
RLSE.OBJ : error LNK2001: unresolved external symbol _RLSE@36
RLSE.OBJ : error LNK2001: unresolved external symbol _WRRRN@28
RLSE.OBJ : error LNK2001: unresolved external symbol _UMACH@8
Debug/LINEAR.exe : fatal error LNK1120: 3 unresolved externals
Error executing link.exe.
LINEAR.exe - 4 error(s), 0 warning(s)
我是照著IMSL裡面的說明範列照打下來的
有去翻文章說這應該是lib path上設定錯誤~
但並沒有講明設定方式
這裡該怎麼解決呢?
感激不盡
我是用MS VISUAL FORTRAN PRO 6.6版
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.124.50.204
※ 編輯: m710387 來自: 140.124.50.204 (08/01 13:15)
※ 編輯: m710387 來自: 140.124.50.204 (08/01 13:25)