matlab - 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 の「計算された goto」であり、現在は推奨されていません。行番号は である必要はありません1,2,3...。任意の有効な行番号を指定できます...リストから N 番目が選択されます。