fortran java_Java中的Fortran GOTO

是的,我研究了在

java中实现GOTO的各种方法,但这是现实世界：

我需要一个最新的fortran LAPACK例程转换为java,

看到

http://www.netlib.org/lapack/timing/eig/eigsrc/dlasq3.f

例如.：

10 CONTINUE

IF( N0.LT.I0 )

$ RETURN

IF( N0.EQ.I0 )

$ GO TO 20

NN = 4*N0 + PP

IF( N0.EQ.( I0+1 ) )

$ GO TO 40

OPS = OPS + DBLE( 3 )

IF( Z( NN-5 ).GT.TOL2*( SIGMA+Z( NN-3 ) ) .AND.

$ Z( NN-2*PP-4 ).GT.TOL2*Z( NN-7 ) )

$ GO TO 30

20 CONTINUE

fortran code ...

GO TO 10

30 CONTINUE

OPS = OPS + DBLE( 2 )

IF( Z( NN-9 ).GT.TOL2*SIGMA .AND.

$ Z( NN-2*PP-8 ).GT.TOL2*Z( NN-11 ) )

$ GO TO 50

40 CONTINUE

fortran code ...

GO TO 10

50 CONTINUE

什么是处理所有可能的GOTO的“标准”方式？