Merge pull request #2 from PESchoenberg/develop

Updated info.

COPYING

@@ -6,7 +6,7 @@
  of this license document, but changing it is not allowed.
 
                             Preamble
-
+ 
   The GNU General Public License is a free, copyleft license for
 software and other kinds of works.
 

COPYING.LESSER

@@ -162,5 +162,5 @@ General Public License ever published by the Free Software Foundation.
 whether future versions of the GNU Lesser General Public License shall
 apply, that proxy's public statement of acceptance of any version is
 permanent authorization for you to choose that version for the
-Library.
+Library. 
 

README.md

@@ -7,16 +7,18 @@
 
 A collection under development of Fortran modules and functions written over
 time that might be useful for calculations in maths, astronomy, aeronautics,
-etc. Some of these functions are still unfinished or need further testing.
+etc. Some of these functions are still unfinished or need further testing; all
+of them originated as "scrapbook material" from various Matlab and Frotran
+projects that I kept jsut because they could be useful in the future.
 
 
 ## Dependencies and requirements:
 
-* gfortran.
+* gfortran compiler.
 
-* OpenMP.
+* OpenMP library.
 
-* MPICH or OpenMPI.
+* MPICH or OpenMPI libraries.
 
 
 ## Installation:

cfmath.sh

@@ -1,15 +1,15 @@
 #!/bin/bash
 clear
-echo 'Compiling fmath libraries...'
-echo 'fmath3...'
+echo 'Compiling fmath libraries... '
+echo 'fmath3... ' 
 gfortran -std='gnu' -c fmath3.f95 -O3 -march=native -Wall -Wextra -ffree-form
-echo 'fmath4...'
+echo 'fmath4... '
 gfortran -std='gnu' -c fmath4.f95 -O3 -march=native -Wall -Wextra -ffree-form
-echo 'fmath1...'
+echo 'fmath1... '
 gfortran -std='gnu' -c fmath1.f95 -O3 -march=native -Wall -Wextra -ffree-form
-echo 'fmath2...'
+echo 'fmath2... '
 gfortran -std='gnu' -c fmath2.f95 -O3 -march=native -Wall -Wextra -ffree-form
-echo 'fmath5...'
+echo 'fmath5... '
 gfortran -std='gnu' -c fmath5.f95 -O3 -march=native -Wall -Wextra -ffree-form
 echo
 echo 'Finished compiling fmath libraries.'

fmath1.f95

@@ -3834,6 +3834,7 @@ subroutine RspFTestFmath1All()
 
 
         !> Test for fmath1 subroutines and functions.
+        !>
         !> - RspFTestTime(...)
         !> - RspFTestMetricImperial(...)
         !> - RspFTestMetricLength(...)

fmath2.f95

@@ -112,7 +112,6 @@ pure real( kind = fmath2_p1 ) function RspFLinearMomentum1( p_m, p_v )
 
             real( kind = fmath2_p1 ), intent(in) :: p_m, p_v
 
-            !RspFLinearMomentum1 = p_m * p_v * RspFLorentzFactor( RspFConst("c") )
             RspFLinearMomentum1 = p_m * p_v * RspFLorentzFactor( p_v )
 
             return
@@ -1699,6 +1698,7 @@ subroutine RspFTestFmath2All()
 
 
         !> Test for fmath2 subroutines and functions.
+        !>
         !> - RspFAngularMomentum1(...)
         !> - RspFAngularMomentum2(...)
         !> - RspFLinearMomentum1(...)
@@ -1821,6 +1821,7 @@ subroutine RspFTestFmath21()
 
 
         !> Test for fmath2 subroutines and functions.
+        !>
         !> - RspFApproximateRocheLobeEggleton(...)
         !> - RspFHillSphere(...)
         !> - RspFArcsec2Km(...)
@@ -2071,6 +2072,7 @@ subroutine RspFTestFmath23()
 
 
         !> Test for fmath2 subroutines and functions.
+        !>
         !> - RspFIsBlackHole(...)
         !> - RspFIsOverChandrasekharLimit(...)
         !> - RspFKg2Em(...)
@@ -2213,6 +2215,7 @@ subroutine RspFTestFmath24()
 
 
         !> Test for fmath2 subroutines and functions.
+        !>
         !> - RspFMeanMotion(...)
         !> - RspFPs2Ly(...)
         !> - RspFRadius2SchwarzschildRatio(...)
@@ -2340,6 +2343,7 @@ subroutine RspFTestFmath25()
 
 
         !> Test for fmath2 subroutines and functions.
+        !>
         !> - RspFSurfaceGravity1(...)
         !> - RspFSurfaceGravity2(...) 
         !>

fmath3.f95

@@ -32,7 +32,6 @@ module fmath3
 
     ! Setting a platform-independent floating point precision.
     integer, parameter :: fmath3_p1 = selected_real_kind( 10,300 )
-    !integer, parameter :: fmath3_p2 = 10
 
     !------------------------------------------------------------------------------
     contains

fmath4.f95

@@ -39,7 +39,7 @@ module fmath4
         ! Misc functions.
 
 
-        !> Draws a line on console.
+        !> Draws a simple line in the console.
         !>
         subroutine RspFLine()
 

fmath5.f95

@@ -21,9 +21,6 @@
 !> 
 !> =============================================================================
 !> 
-!> Modified:
-!> - Jul 5 2018.
-!>
 !> Compilation:
 !> - ./cfmath.sh or 
 !> - mpif90 -std='gnu' -c fmath5.f95 -O3 -march=native -Wall -Wextra -fopenmp -fdec-math

tfmath1.f95

@@ -23,7 +23,7 @@
 !> 
 !> Test program for fmath* functions.
 !>
-!> Compilation nad linking:
+!> Compilation and linking:
 !> - gfortran -std='gnu' tfmath1.f95 fmath1.o fmath2.o fmath3.o fmath4.o fmath5.o -o tfmath1 -O3 -march=native -Wall -Wextra -fopenmp
 !>
 !> or (if you want to use MPICH with this)
@@ -35,7 +35,9 @@
 !>
 !> or (if you compiled it for use with MPICH)
 !>
-!> - mpiexec -np [n] ./tfmath1_mpi (n = number of processes to use, recommended n = 1 in this case).
+!> - mpiexec -np [n] ./tfmath1_mpi (n = number of processes to use, recommended
+!>  n = 1 in this case, because you might get errors otherwise, at least it the
+!>  present version of fmath).
 !> 
 program tfmath1