Scientific Programming / 2015 / Article / Lst 5

Research Article

High-Performance Design Patterns for Modern Fortran

Listing 5

type, extends(object):: local_tensor
   real:: f(local_grid_size)
  contains
  !
  procedure:: add
  procedure:: assign_local
  procedure:: state
  procedure:: subtract
  generic:: operator(+)   => add
  generic:: operator(−)   => subtract
  generic:: assignment(=) => assign_local
  !
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.