How can I see the fortran code in R

How can I see the fortran code in R

I want to see the fortran funciton code referred in R like:
Fortout <- .Fortran("anneal", ...)
Anyone has ideal how can I view this anneal fortran function? Thanks.