-
Notifications
You must be signed in to change notification settings - Fork 2
/
versions.f90
75 lines (75 loc) · 2.74 KB
/
versions.f90
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
!
! SCID-TDSE: Simple 1-electron atomic TDSE solver
! Copyright (C) 2015-2021 Serguei Patchkovskii, [email protected]
!
! This program is free software: you can redistribute it and/or modify
! it under the terms of the GNU General Public License as published by
! the Free Software Foundation, either version 3 of the License, or
! (at your option) any later version.
!
! This program is distributed in the hope that it will be useful,
! but WITHOUT ANY WARRANTY; without even the implied warranty of
! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
! GNU General Public License for more details.
!
! You should have received a copy of the GNU General Public License
! along with this program. If not, see <https://www.gnu.org/licenses/>.
!
!
! Report versions of all modules in this build
!
subroutine versions
use accuracy
use bicg_tools
use cap_tools
use checkpoint_tools
use composition_analysis
use constants
use coulomb_functions
use cubic_spline
use math
use node_tools
use potential_tools
use propagator_tools
use rotation_tools
use sort_tools
use spherical_bessel
use spherical_data
use spherical_data_initialize
use spherical_tsurf
use spherical_tsurf_data
use test_tools
use timer
use tridiagonal_cyclic
use tridiagonal_pivoted
use tridiagonal_tools
use vectorpotential_tools
use wavefunction_tools
!
write (out,"(t5,a)") trim(rcsid_accuracy)
write (out,"(t5,a)") trim(rcsid_bicg_tools)
write (out,"(t5,a)") trim(rcsid_cap_tools)
write (out,"(t5,a)") trim(rcsid_checkpoint_tools)
write (out,"(t5,a)") trim(rcsid_composition_analysis)
write (out,"(t5,a)") trim(rcsid_constants)
write (out,"(t5,a)") trim(rcsid_coulomb_functions)
write (out,"(t5,a)") trim(rcsid_cubic_spline)
write (out,"(t5,a)") trim(rcsid_math)
write (out,"(t5,a)") trim(rcsid_node_tools)
write (out,"(t5,a)") trim(rcsid_potential_tools)
write (out,"(t5,a)") trim(rcsid_propagator_tools)
write (out,"(t5,a)") trim(rcsid_rotation_tools)
write (out,"(t5,a)") trim(rcsid_sort_tools)
write (out,"(t5,a)") trim(rcsid_spherical_bessel)
write (out,"(t5,a)") trim(rcsid_spherical_data)
write (out,"(t5,a)") trim(rcsid_spherical_data_initialize)
write (out,"(t5,a)") trim(rcsid_spherical_tsurf)
write (out,"(t5,a)") trim(rcsid_spherical_tsurf_data)
write (out,"(t5,a)") trim(rcsid_test_tools)
write (out,"(t5,a)") trim(rcsid_timer)
write (out,"(t5,a)") trim(rcsid_tridiagonal_cyclic)
write (out,"(t5,a)") trim(rcsid_tridiagonal_pivoted)
write (out,"(t5,a)") trim(rcsid_tridiagonal_tools)
write (out,"(t5,a)") trim(rcsid_vectorpotential_tools)
write (out,"(t5,a)") trim(rcsid_wavefunction_tools)
end subroutine versions