Goto problem

[klaus]

Hello Erel
I am writing a progam to calculate eigenfrequecies for mecanical systems.
For that I need to calculate eigenvalues and eigenvectors of a matrix.
I have been using a routine from HP with goto's in. The routine ran in HP Basic (since the late 80's) and still runs in VB6. The routine was probably originally written in Fortran.
I transfered it to Basic4ppc and I get an error.
I transfered it from Basic4ppc back to VB, to be shure that I did not add any errors, and the routine works.
I joined the routine below in Basic4ppc and VB.
Can you please have look and see what and why this happens ?

I agree with paul j in his comment not to use goto's
http://www.basic4ppc.com/forum/code-samples-tips/1139-avoid-using-goto.html
but the routine exists and is stable and accurate.

Thank you in advance, I am allways impressed by your quick and very approprate answers.

Klaus
Switzerland

[Erel]

You can't jump into a "code block" - For...Next, If...End If, Do ... Loop, etc.
Its true even if you jump from the same code block.

[klaus]

Thank you for your answer.

That means that there is no way to use this routine ?

Does somebody have a routine to calculate eigenvalue end eigenvector of a matrix, without goto's ?

Klaus
Switzerland