fortran - Undefined reference to `rindex_` -

i have code in fortran 77 (*. f). use compiler fort77 gives me following error:

   geodv.o: in function `main__ ':    fort77-10104-1.c: (. text +0 x287): reference `rindex_ 'undefined    collect2: error: ld returned 1 exit status 

the code can found at dropbox. thank help

you have declared rindex integer*4 on line 15, use nd2=rindex(entete,'/') in line 62. fortran expects line 62 mean rindex function, not integer.