copy_file_content Subroutine

public subroutine copy_file_content(input_file, output_file)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	input_file
character(len=*),	intent(in)			::	output_file