document Subroutine

public subroutine document(opts)

G_scratch_file=scratch(‘prep_scratch.’)) THIS HAS TO BE A UNIQUE NAME – IMPROVE THIS

Arguments

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

Contents

Variables

ierr ios name options

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public		::	ierr
integer,	public		::	ios
character(len=:),	public,	allocatable	::	name
character(len=G_line_length),	public		::	options