Skip to content
Merged
Changes from 1 commit
Commits
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
14 changes: 14 additions & 0 deletions precice.f90
Original file line number Diff line number Diff line change
Expand Up @@ -302,6 +302,20 @@ subroutine precicef_write_gradient_data(meshName, dataName, size, ids, &
integer(kind=c_int), value :: dataNameLength
end subroutine precicef_write_gradient_data

subroutine precicef_start_profiling_section(sectionName, sectionNameLength) &
& bind(c, name="precicef_start_profiling_section_")

use, intrinsic :: iso_c_binding
character(kind=c_char), dimension(*) :: sectionName
integer(kind=c_int), value :: sectionNameLength
end subroutine precicef_start_profiling_section

subroutine precicef_stop_last_profiling_section() &
& bind(c, name="precicef_stop_last_profiling_section_")

use, intrinsic :: iso_c_binding
end subroutine precicef_stop_last_profiling_section

subroutine precicef_get_version_information(versionInfo, lengthVersionInfo) &
& bind(c, name="precicef_get_version_information_")

Expand Down