function calibration()
{
	switch(geodef) {
		case "xd": dorling_factor = 1.5;	
		case "pd": dorling_factor = 1.4;
		case "xe": dorling_factor = 1.45;
		case "xf": dorling_factor = 1.4;
		case "xv": dorling_factor = 1.35;
		case "xw": dorling_factor = 1.3;
	 default:	   dorling_factor = 1.0;
	}
	
	boxwidth = xsize;
	if (xsize=="dyn") boxwidth=1000;
	
	width_factor= (Math.floor(10+(10*boxwidth*dorling_factor/1000)))/20;
	
	switch(zbox) {
		case "ch1": 	box_factor=1;   break; 
		case "ch2": 	box_factor=1;   break; 
		case "ch3": 	box_factor=1;   break; 
		case "nech":	box_factor=3; 	break; 
		case "ge":  	box_factor=6; 	break;    
		case "qge":  	box_factor=10; 	break;    
		case "gl":  	box_factor=7;  	break; 
		case "zh":  	box_factor=5; 	break; 
		case "qzh":  	box_factor=10; 	break; 
		case "nwch":	box_factor=3; 	break;        
		case "swch":	box_factor=4; 	break; 
		case "ag":  	box_factor=5; 	break; 
		case "bs":  	box_factor=7; 	break; 
		case "bl":  	box_factor=7; 	break; 
		case "ju":  	box_factor=6;  	break; 
		case "vd":  	box_factor=4; 	break; 
		case "qla":  	box_factor=10; 	break; 
		case "sech": 	box_factor=5; 	break;      
		case "ne":  	box_factor=8;  	break; 
		case "be":  	box_factor=2.5; break; 
		case "qbe":  	box_factor=10; break; 
		case "fr":  	box_factor=6; 	break; 
		case "gr":  	box_factor=6;  	break; 
		case "so":  	box_factor=5; 	break; 
		case "tg":  	box_factor=6; 	break; 
		case "sh":  	box_factor=7;  	break;  
		case "sg":  	box_factor=4; 	break; 
		case "ti":  	box_factor=7; 	break; 
		case "ur":  	box_factor=9; 	break; 
		case "vs":  	box_factor=6; 	break; 
		case "sz":  	box_factor=7; 	break; 
		case "cech":	box_factor=3; 	break; 
		case "ap":  	box_factor=8; 	break;
		case "uw":  	box_factor=6;  	break; 
		case "lu":  	box_factor=4; 	break; 
		case "zg":  	box_factor=6; 	break;
		case "wrzh":  	box_factor=4; 	break;
		default: 		box_factor=2;
	}
	
	switch(geounits) {
		case "pg00":	reg_factor=1.25; break; 
		case "pg06":	reg_factor=1.3; break; // 10febr2007
		case "pg06q4":	reg_factor=1.3; break; // 10febr2007
		case "tg3o":	reg_factor=1.35; break;   
		case "zg3o":	reg_factor=1.4; break;      
		case "zg3oq4":	reg_factor=1.4; break;      
		case "zg3op4q4":	reg_factor=1.4; break;      
		case "bkc0":	reg_factor=1.5; break;// vor dem 10. Nov. 04: 1.8 hst
		case "bkc1":	reg_factor=1.5; break;// 10febr2007
		case "kt00":	reg_factor=2.0; break;       
		default: 		reg_factor=1.0;
	}
	
	
	switch (box_factor) {
		case "1": domain_factor=1.0; break;
		default: switch (stat_domain) {
				case "kult": domain_factor= 0.8; break;
				case "poku": domain_factor= 0.8; break;
				case "nrw_vari": domain_factor= 1.2; break;
				default: domain_factor=1.0;
				}
	}
		
	

	corr_factor= (Math.floor(10*width_factor * box_factor * reg_factor * domain_factor))/10;
	
	debugalert (0,'boxwidth= '+boxwidth +'  corr_factor= '+corr_factor +' width_factor= '+width_factor +'  box_factor= '+box_factor+'  reg_factor= '+reg_factor+'  domain_factor= '+domain_factor, 'ms_lib_calibration.js')
}