Marriage Problem

   {  Exmpl2.5_Marriage.mpl  }

   {  Murty, Operations Research, Determining Optimization Models  }

   {  Chapter 2,  Example 2.5,  Assignment,  Size: 10x25,  Page 36  }


TITLE
    MarriageProblem;

INDEX
    man   := 1..5;
    woman := 1..5;

DATA
    Happyness[man,woman] := ( 78, -16,  19,  25,  83,
                              99,  98,  87,  16,  92,
                              86,  19,  39,  88,  17,
                             -20,  99,  88,  79,  65,
                              67,  98,  90,  48,  60);

VARIABLES
    TimeTogether[man,woman];

MODEL

    MAX TotalHappyness = SUM(man,woman: Happyness * TimeTogether);

SUBJECT TO
    MenMonogamous[man]:

       SUM(woman: TimeTogether) = 1;

    WomenMonogamous[woman]:

       SUM(man: TimeTogether) = 1;

END