calculate_text_anchor Subroutine

public subroutine calculate_text_anchor(annotation, text_width, text_height, anchor_x, anchor_y)

Calculate anchor position based on alignment settings

Arguments

Type	Intent	Optional	Attributes		Name
type(text_annotation_t),	intent(in)			::	annotation
real(kind=wp),	intent(in)			::	text_width
real(kind=wp),	intent(in)			::	text_height
real(kind=wp),	intent(out)			::	anchor_x
real(kind=wp),	intent(out)			::	anchor_y