Skip to content

Update frequency sweep #21

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
jchristopherson merged 4 commits into from
May 27, 2026
Merged

Update frequency sweep #21

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
4 commits
Select commit Hold shift + click to select a range
fb95040
Update the frequency sweep method
jchristopherson May 27, 2026
264aba2
Clean up comments
jchristopherson May 27, 2026
9d65619
Update documentation
jchristopherson May 27, 2026
7f1c85e
Update version info
jchristopherson May 27, 2026
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion CMakeLists.txt
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@ cmake_minimum_required(VERSION 3.24)
project(
dynamics
LANGUAGES Fortran C CXX
VERSION 1.3.1
VERSION 1.3.2
)
set(CMAKE_Fortran_STANDARD 2018)
set(CMAKE_Fortran_STANDARD_REQUIRED TRUE)
Expand Down
2 changes: 1 addition & 1 deletion doc/index.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -164,7 +164,7 @@ <h3>Derived Types</h3>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
2 changes: 1 addition & 1 deletion doc/interface/frequency_response.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -957,7 +957,7 @@ <h4>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
4 changes: 2 additions & 2 deletions doc/interface/ode_excite.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -188,7 +188,7 @@ <h3>Arguments</h3>
</tbody>
</table>

<h3>Return Value <span class="anchor" id="variable-rst~44"></span><small>real(kind=real64)</small></h3>
<h3>Return Value <span class="anchor" id="variable-rst~43"></span><small>real(kind=real64)</small></h3>
<p>The result.</p>
<h3>Description</h3>
<p>Defines the interface for a ODE excitation function.</p>
Expand All @@ -209,7 +209,7 @@ <h3>Description</h3>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
2 changes: 1 addition & 1 deletion doc/lists/modules.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -122,7 +122,7 @@ <h1>Modules</h1>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
2 changes: 1 addition & 1 deletion doc/lists/procedures.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -278,7 +278,7 @@ <h1>Procedures</h1>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
2 changes: 1 addition & 1 deletion doc/lists/types.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -138,7 +138,7 @@ <h1>Derived Types</h1>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
16 changes: 8 additions & 8 deletions doc/module/dynamics.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -158,18 +158,18 @@ <h3 class="panel-title">Uses</h3>
<ul class="list-group">
<li class="list-group-item">
<ul class="list-inline">
<li><a href='../module/dynamics_frequency_response.html'>dynamics_frequency_response</a></li>
<li><a href='../module/dynamics_quaternions.html'>dynamics_quaternions</a></li>
<li><a href='../module/dynamics_kinematics.html'>dynamics_kinematics</a></li>
<li><a href='../module/dynamics_helper.html'>dynamics_helper</a></li>
<li><a href='../module/dynamics_system_id.html'>dynamics_system_id</a></li>
<li><a href='../module/dynamics_frequency_response.html'>dynamics_frequency_response</a></li>
<li><a href='../module/dynamics_vibrations.html'>dynamics_vibrations</a></li>
<li><a href='../module/dynamics_stability.html'>dynamics_stability</a></li>
<li><a href='../module/dynamics_controls.html'>dynamics_controls</a></li>
<li><a href='../module/dynamics_helper.html'>dynamics_helper</a></li>
<li><a href='../module/dynamics_geometry.html'>dynamics_geometry</a></li>
<li><a href='../module/dynamics_structural.html'>dynamics_structural</a></li>
<li><a href='../module/dynamics_linkage.html'>dynamics_linkage</a></li>
<li><a href='../module/dynamics_kinematics.html'>dynamics_kinematics</a></li>
<li><a href='../module/dynamics_stability.html'>dynamics_stability</a></li>
<li><a href='../module/dynamics_structural.html'>dynamics_structural</a></li>
<li><a href='../module/dynamics_vibrations.html'>dynamics_vibrations</a></li>
<li><a href='../module/dynamics_rotation.html'>dynamics_rotation</a></li>
<li><a href='../module/dynamics_controls.html'>dynamics_controls</a></li>
</ul>
</li>
</ul>
Expand Down Expand Up @@ -230,7 +230,7 @@ <h3>Contents</h3>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
2 changes: 1 addition & 1 deletion doc/proc/chirp.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -308,7 +308,7 @@ <h3>Contents</h3>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
2 changes: 1 addition & 1 deletion doc/search.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -119,7 +119,7 @@ <h1>Search Results</h1>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
2 changes: 1 addition & 1 deletion doc/sourcefile/dynamics.f90.html
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -401,7 +401,7 @@ <h2><span class="anchor" id="src"></span>Source Code</h2>
<p class="text-right">
Documentation generated by
<a href="https://github.com/Fortran-FOSS-Programmers/ford">FORD</a>
on 2026-05-26 09:43 </p>
on 2026-05-27 14:00 </p>
</div>
</div>
<br>
Expand Down
2 changes: 1 addition & 1 deletion doc/tipuesearch/tipuesearch_content.js
View file
Open in desktop

Large diffs are not rendered by default.

2 changes: 1 addition & 1 deletion fpm.toml
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
name = "dynamics"
version = "1.3.1"
version = "1.3.2"
license = "GPL-3.0"
author = "Jason Christopherson"
maintainer = "Jason Christopherson"
Expand Down
Binary file modified images/frf_sweep_example_1.png
View file
Open in desktop
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
1 change: 1 addition & 0 deletions src/c/dynamics.h
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -65,6 +65,7 @@ typedef struct {
int cycle_count;
int transient_cycles;
int points_per_cycle;
bool frequency_in_hz;
} c_frequency_sweep_controls;

typedef struct {
Expand Down
9 changes: 6 additions & 3 deletions src/c/dynamics_c_api.f90
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -112,6 +112,7 @@ subroutine c_ss_excitation(n, t, u) bind(C, name = "c_ss_excitation")
integer(c_int) :: cycle_count
integer(c_int) :: transient_cycles
integer(c_int) :: points_per_cycle
logical(c_bool) :: frequency_in_hz
end type

type, bind(C) :: c_iteration_controls
Expand Down Expand Up @@ -1243,7 +1244,8 @@ subroutine c_frf_sweep(n, nfreq, fcn, freq, iv, solver, rsp, ldr, opts) &

frsp = frequency_sweep(odefcn, freq, iv, solver = integrator_obj, &
args = arg, ncycles = opts%cycle_count, &
ntransient = opts%transient_cycles, points = opts%points_per_cycle)
ntransient = opts%transient_cycles, points = opts%points_per_cycle, &
inHz = logical(opts%frequency_in_hz))
rsp(1:nfreq,1:n) = frsp%responses
end subroutine

Expand All @@ -1264,9 +1266,10 @@ subroutine cfrf_sweep_fcn(freq, t, x, dxdt, args)
subroutine c_set_frequency_sweep_defaults(x) &
bind(C, name = "c_set_frequency_sweep_defaults")
type(c_frequency_sweep_controls), intent(inout) :: x
x%cycle_count = 20
x%transient_cycles = 200
x%cycle_count = 5
x%transient_cycles = 30
x%points_per_cycle = 1000
x%frequency_in_hz = .false.
end subroutine

! ------------------------------------------------------------------------------
Expand Down
Loading
Loading