this repo has no description
at develop 1.7 kB view raw
1% 2% Main authors: 3% Guido Tack <tack@gecode.org> 4% 5% Copyright: 6% Guido Tack, 2010 7% 8% This file is part of Gecode, the generic constraint 9% development environment: 10% http://www.gecode.org 11% 12% Permission is hereby granted, free of charge, to any person obtaining 13% a copy of this software and associated documentation files (the 14% "Software"), to deal in the Software without restriction, including 15% without limitation the rights to use, copy, modify, merge, publish, 16% distribute, sublicense, and/or sell copies of the Software, and to 17% permit persons to whom the Software is furnished to do so, subject to 18% the following conditions: 19% 20% The above copyright notice and this permission notice shall be 21% included in all copies or substantial portions of the Software. 22% 23% THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 24% EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF 25% MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 26% NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE 27% LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION 28% OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION 29% WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. 30% 31% 32 33include "bin_packing_load.mzn"; 34 35predicate fzn_bin_packing_capa(array[int] of int: c, 36 array[int] of var int: bin, 37 array[int] of int: w) = 38 let { 39 array[min(index_set(c))..max(index_set(c))] of var 0..ub_array(c): l 40 } in ( 41 forall( i in index_set(l) ) ( l[i] <= c[i] ) 42 /\ bin_packing_load(l,bin,w) 43 );