Merge pull request #152 from lcpp-org/library_reflection

Updates to Fortran wrappers.

Author: drobnyjt

rustbca.f90

@@ -33,12 +33,13 @@ subroutine reflect_single_ion_c(num_species_target, ux, uy, uz, E1, &
 
         end subroutine reflect_single_ion_c
 
-        function compound_bca_list_fortran(num_incident_ions, ux, uy, uz, E1, &
+        function compound_bca_list_fortran(num_incident_ions, track_recoils, ux, uy, uz, E1, &
             Z1, m1, Ec1, Es1, &
             num_species_target, Z2, m2, Ec2, Es2, Eb2, n2, &
             num_emitted_particles) bind(c) result(output)
 
             use, intrinsic :: iso_c_binding
+            logical(c_bool), intent(in) :: track_recoils
             integer(c_int), intent(in) :: num_incident_ions, num_species_target
             integer(c_int), intent(out) :: num_emitted_particles
             real(c_double), intent(in), dimension(*) :: ux, uy, uz, E1, Z1, m1, Ec1, Es1