[mesa-users] Array out of bounds

[Rob.Farmer]

Hi
Doing some debugging with gfortran compiler options turns out there's an out of bounds array:

MESA version 5527

file num/private/slvrod.dek line 117

ptr(1:n) => ak(m1+1:m1+n)

ak is size 4, m1=2 and n=4 thus we go between 3 and 6

This breaks the compile test suite

Not really sure what's going on in this code

slvrod.dek is called by num/private/mod_rosenbrock.f line 955 which has n and ns passed into it by line 584 (roscor) and now i'm losing track of what sets n or ns, or could it be m1 should be 0 somehow?

testing without the -fbounds-check shows the same issue just without throwing any errors

Any ideas?
Rob
-- The Open University is incorporated by Royal Charter (RC 000391), an exempt charity in England & Wales and a charity registered in Scotland (SC 038302).