Copy_fxt_header Subroutine

private pure subroutine Copy_fxt_header(left, right)

Arguments

Type IntentOptional Attributes Name
type(ply_fxt_header_type), intent(out) :: left

fpt to copy to

type(ply_fxt_header_type), intent(in) :: right

fpt to copy from