create_first_node Subroutine

private pure subroutine create_first_node(this, column, element)

Subroutine to add the first node to the linked list. Allocates a new node and sets both the head and tail to this node.

Type Bound

row_t

Arguments

Type	Intent	Optional	Attributes		Name
class(row_t),	intent(inout)			::	this	type instance
integer,	intent(in)			::	column	column position of element
class(*),	intent(in)			::	element	the element to be added