Changed zero indexes to 1. Fortran starts at 1...