Solved conflict between a call to tensor::real and the F77 type 'real'.