Fortran implementation of `7_fwd`

[joewallwork]

We have already figured this out as part of the Fortran-Enzyme project so will contribute the implementation back here.