converting fortran to vba - SOLVED -

Comments

• quikcarl

  October 2010

  [b]What loops?[/b] I didn't see any DO loops inside
  the subroutine. Just a lot of IF-THEN-ELSE-
  ENDIF statements. You might want to indent
  inside the IF statements to see if there is
  something missing and the FORTRAN compiler is
  compensating.
  
  
  
• legalizeme

  October 2010

  Please, dont focus on that loop, I didn`t add a loop in attachment, just subroutine. The thing is that this subroutine is inside the loop. abstractly it should look like
  
  [code]
  do until eof(sample_data)
  
  get_step_parameters(sample_data)
  
  call mysubroutine(parameters,form,sample,data,and,many,many2,more,parameters,which,are,calculated,from,previous,loop,by,reference)
  
  debug.print which,are
  
  many=0
  many2=0
  more=0
  
  sumBy=sumBy+by
  
  loop
  [/code]
  
  In the same if-then-else system i have a different results running it under fortran and under VBA. E.g. If I`m processing input_data file with 2250 records, the summoned parameters, like "sumBy" here, it differ about 0,5% of it`s value. In fortran it`s 1085, in VBA - 1045.
  
  If someone wants to play around with this and prove me wrong, I`m adding full code in attachment.
  
  
• legalizeme

  October 2010

  This post has been deleted.
• legalizeme

  October 2010

  problem solved.
  before calling sub "snow" there were variable with default value all the time.