diagnosisFarm Subroutine

public subroutine diagnosisFarm(obj, FileName)

Type Bound

Farm_

Arguments

Type	Intent	Optional	Attributes		Name
class(Farm_),	intent(inout)			::	obj
character(len=*),	intent(in),	optional		::	FileName