Goto problem

Discussion in 'Questions (Windows Mobile)' started by klaus, Nov 15, 2007.

  1. klaus

    klaus Expert Licensed User

    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/showthread.php?t=1139
    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
     

    Attached Files:

  2. Erel

    Erel Administrator Staff Member Licensed User

    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.
     
  3. klaus

    klaus Expert Licensed User

    Eigenvalue end eigenvector calculation

    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
     
Loading...