如何將fortran goto狀態轉換爲matlab

Question

如何轉換goto狀態（fortran）爲matlab？
那就是說，如果NOPN等於1，則執行第1行，
NOPN等於2，執行第2行？

subroutine VECT(N1,N2,N3,NOPN) 

COMMONS WORMX(3,24), QVALU,DJACB 

    I1=N1 
    GO TO (1,2,3,4,5),NOPN 
1 I1=N2 
2 QVALU=0.0 
    DO 10 I=1=3 
10 QVALU=QVALU+WORMX(I,N1)*WORMX(I,I1) 

Answer 1

是的，你已經知道了。這是一個「計算轉換」 - 來自非常古老的FORTRAN - 現在已被棄用。行號不一定是1,2,3...。它們可以是任何有效的行號......從列表中選擇N個。