Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
fixed a bug in error handling
  • Loading branch information
Austin Blevins committed Jul 25, 2022
1 parent e659999 commit eb7d6be
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/io/io_read_surf.f90
Original file line number Diff line number Diff line change
Expand Up @@ -69,7 +69,7 @@ subroutine io_read_surf(user,surf)

open(LUN,file=TIMEFILE,status='old',form='unformatted',recl=recsize,access='direct',iostat=ioerr)
if (ioerr/=0) then
write(*,*) 'Error! Cannot read file ',trim(adjustl(DIAMFILE))
write(*,*) 'Error! Cannot read file ',trim(adjustl(TIMEFILE))
stop
end if
do i=1,user%numlayers
Expand Down

0 comments on commit eb7d6be

Please sign in to comment.