copy_primary Subroutine

public subroutine copy_primary(p1, p2, aux_type)

Arguments

Type	Intent	Optional	Attributes		Name
type(PrimaryExport),	intent(in)			::	p1
type(PrimaryExport),	intent(out)			::	p2
character(len=*),	intent(in)			::	aux_type