main()
{
         she = alloc_first_she(nice, pretty, tall, smart, rich);
         while   (!dead(me))
         {
                 ....
                 if ( she->love != me )
                 {
                         free(she);
                         she = alloc_new_she(--nice, --pretty, --tall,
                         --smart, --rich);
                 }
                 else
                 {
                         f...ck(she);
                         new_she = alloc_new_she(++nice, ++pretty,
                         ++tall, ++smart, ++rich);
                         if( new_she && new_she->love == me )
                         {
                                 free(she);
                                 she = new_she;
                         }
                         else
                         {
                                 free(new_she);
                                 nice--;
                                 pretty--;
                                 tall--;
                                 smart--;
                                 reach--;
                         }
                 }
               ....
           }
         free(me);
         return 0;
}