Nodes of different colours represent the following:
Solid arrows point from a file to a file which depends upon it. A file is dependent upon another if the latter must be compiled before the former can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.
Nodes of different colours represent the following:
Solid arrows point from a file to a file which depends upon it. A file is dependent upon another if the latter must be compiled before the former can be. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.
module classes_coordinates use, intrinsic :: iso_fortran_env, only: DP => REAL64 use data_constants, only: num_dimensions implicit none private type, abstract, public :: Abstract_Coordinates contains procedure(Abstract_get_num), deferred :: get_num procedure(Abstract_get), deferred :: get end type Abstract_Coordinates abstract interface pure integer function Abstract_get_num(this) result(num_coordinates) import :: Abstract_Coordinates class(Abstract_Coordinates), intent(in) :: this end function Abstract_get_num pure function Abstract_get(this, i_particle) result(vector) import :: DP, num_dimensions, Abstract_Coordinates class(Abstract_Coordinates), intent(in) :: this integer, intent(in) :: i_particle real(DP) :: vector(num_dimensions) end function Abstract_get end interface end module classes_coordinates