fixed bug in iri fortran code