Class to represent a distance factory
Class constructor
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(factory_distance) | :: | factory |
A |
|||
character(len=*) | :: | type_ |
A character string with the type of distance to be instantiated |
|||
class(distance_base), | allocatable | :: | dist |
An allocatable |
type factory_distance !! Class to represent a distance factory contains procedure,public :: create_distance end type factory_distance