prep Program

Contents

Variables

cmd help_text ilast ios isscratch keeptabs letterd line out_filename prefix string version_text

Functions

exists

Subroutines

auto

Variables

Type	Attributes		Name		Initial
character(len=:),	allocatable	::	cmd
character(len=:),	allocatable	::	help_text(:)
integer		::	ilast
integer		::	ios
logical		::	isscratch
logical		::	keeptabs	=	.false.
character(len=1)		::	letterd
character(len=G_line_length)		::	line
character(len=G_line_length)		::	out_filename	=	''
character(len=1)		::	prefix
character(len=:),	allocatable	::	string
character(len=:),	allocatable	::	version_text(:)

Functions

function exists(filename) result(r)

Arguments

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

Return Value logical

Subroutines

subroutine auto()

Arguments

None