time_print Subroutine

public subroutine time_print(time)

Print the current time and date

Arguments

Type	Intent	Optional	Attributes		Name
logical,		optional		::	time	If time is requested

Contents

Variables

datstr timstr

Variables

Type	Visibility	Attributes		Name		Initial
character(len=8),	public		::	datstr
character(len=10),	public		::	timstr