data_shape_eq Function

public function data_shape_eq(shape1, shape2)

Arguments

Type	Intent	Optional	Attributes		Name
type(cable_output_dim_t),	intent(in),		dimension(:)	::	shape1
type(cable_output_dim_t),	intent(in),		dimension(:)	::	shape2

Return Value logical