The source code file contains the Fortran source code and examples for TFPOP Version 2.2, the most recent version of TFPOP. It was originally handed out in 1999, and includes the airgap modelling features documented in RMS Technical Note 4.
It is a superset of TFPOP Version 2.1, handed out in 1996 and documented in RMS Report 18.
Directories contained in the zip file:
src ... Source code for each separate subroutine, originally compiled on unix system with make command
src_all ... All source code concatenated into single file tfpop_all.f
exmp1, exmp2 ... Subdirectories with examples as described in Technical Note 4.
Recent history:
The code has most recently (2011) been successfully compiled with gfortran. The only change made to the original 1996 code was in auxil.f:
Original: opened .eq. false
Revised: opened .eqv. false
It compiles with multiple warnings (see src_all/tfpop.log), due mainly to array-handling features of public-domain support routines.
It gives identical results to exmp1 as originally handed out.
Steve Winterstein
November 2011