You can not select more than 25 topics
			Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
		
		
		
		
		
			
		
			
				
					
					
						
							39 lines
						
					
					
						
							992 B
						
					
					
				
			
		
		
		
			
			
			
				
					
				
				
					
				
			
		
		
	
	
							39 lines
						
					
					
						
							992 B
						
					
					
				| /* mplsamp2.c */ | |
| 
 | |
| #include <stdio.h> | |
| #include <stdlib.h> | |
| #include <glpk.h> | |
|  | |
| int main(void) | |
| {     glp_prob *mip; | |
|       glp_tran *tran; | |
|       int ret; | |
|       mip = glp_create_prob(); | |
|       tran = glp_mpl_alloc_wksp(); | |
|       ret = glp_mpl_read_model(tran, "sudoku.mod", 1); | |
|       if (ret != 0) | |
|       {  fprintf(stderr, "Error on translating model\n"); | |
|          goto skip; | |
|       } | |
|       ret = glp_mpl_read_data(tran, "sudoku.dat"); | |
|       if (ret != 0) | |
|       {  fprintf(stderr, "Error on translating data\n"); | |
|          goto skip; | |
|       } | |
|       ret = glp_mpl_generate(tran, NULL); | |
|       if (ret != 0) | |
|       {  fprintf(stderr, "Error on generating model\n"); | |
|          goto skip; | |
|       } | |
|       glp_mpl_build_prob(tran, mip); | |
|       glp_simplex(mip, NULL); | |
|       glp_intopt(mip, NULL); | |
|       ret = glp_mpl_postsolve(tran, mip, GLP_MIP); | |
|       if (ret != 0) | |
|          fprintf(stderr, "Error on postsolving model\n"); | |
| skip: glp_mpl_free_wksp(tran); | |
|       glp_delete_prob(mip); | |
|       return 0; | |
| } | |
| 
 | |
| /* eof */
 |