picking in fortran

OpenGL OpenGL: Basic Coding
1

I’m trying to do a picking routine similar to picksquare.c from the red book but in Fortran. So far I can manage to put it to work. As anyone ever done such? Some example code would help.

Thanks
Nuno