Problem when closing external files after reading

Hello everyone,

I am writing a UMAT in FORTRAN for modeling material behavior of discontinuous composites. I read the fibre orientation per each element from a txt file using a SDVINI subroutine.

I got many errors so far, but I was finally able to make the code work. The problem was, apparently, that I closed the file. My code was:

OPEN (15, FILE='file location', ACTION='read')
READ (15,*) read content
CLOSE (15)

It didn't work until I removed the CLOSE line.

Has anybody have experience with this and why it happens?

Thank you