The file FM_parallel.f95 contains the thread-safe version of the FM package.
Here are some more details.
There are two sample programs below giving examples of using FM for parallel calculations.
The actual files shown on this page are in this archive that contains all the FM files from this
website: FM_files.zip
The individual file pointers here display as pdf files for browsing. The longer files are cut
off after 20 pages.
fm_parallel.f95
Subroutine library for multiple-precision parallel operations. 114,340 lines of code
SampleFM_parallel_coarray.f95
Small sample program using coarrays with fm_parallel.f95. 537 lines of code
SampleFM_parallel_openmp.f95
Small sample program using openmp with fm_parallel.f95. 512 lines of code
SampleFM_parallel.chk
Expected output from the sample programs. Times can vary. 78 lines
TestFM_parallel_coarray.f95
Checks operations using coarrays for many of the fm_parallel routines. 1,833 lines of code
TestFM_parallel_openmp.f95
Checks operations using openmp for many of the fm_parallel routines. 1,963 lines of code
FM_Parallel_User_Manual.txt
User's guide for the package, along with a list of the files, and an example set of
compiler/linker commands for building the programs. 114 lines