As a software CEO I'm paying you only for the pain. I can get low quality code almost anywhere. I can get you the code, believe me. There are ways, Dude. You don't wanna know about it, believe me.
Surely i, j, k, l, m and n should be integers, and the rest should all be floats? Seems to me that this language model hasn't been trained up on enough FORTRAN77.