/*
	_cl_dist_pr.idlg -- cluster analysis distances program include file

*!  VERSION 1.0.2  20dec2005
*/

	put "measure("
	if main.rb_distc {
		put main.lb_distc
		if main.en_power {
			put "(" main.en_power ")"
		}
	}
	if main.rb_distb {
		put main.lb_distb
	}
	if main.rb_distm {
		put main.lb_distm
	}
	put ")"
