High-Performance Design Patterns for Modern Fortran
Listing 7
type, extends(co_object):: tensor
private
real, allocatable:: global_f(:)[:]
contains
!…
procedure:: assign_local_to_global
procedure:: multiply_by_local
procedure:: add_to_local
procedure:: x => df_dx
generic:: operator() => &
multiply_by_local
generic:: assignment(=) => &
assign_local_to_global
!…
end type
We are committed to sharing findings related to COVID-19 as quickly as possible. We will be providing unlimited waivers of publication charges for accepted research articles as well as case reports and case series related to COVID-19. Review articles are excluded from this waiver policy. Sign up here as a reviewer to help fast-track new submissions.