| Slide 14.31: Search (cont.) Slide 14.33: Search (cont.) Home |   | 
     fun( X ) :- red( X ),  car( X ).
     fun( X ) :- blue( X ), bike(X).
     red( apple_1 ).            /* database of red items */
     red( block_1 ).
     red( car_27 ).
     car( desoto_48 ).          /* database of cars */
     car( edsel_57 ).           
   /* clause 1 */
   fun( X ) :-    /* we've tried this clause but without luck */
        red( X ),
        car( X ).
   /* clause 2 */
   fun( X ) :-   /* so lets have a go with this clause now */
        blue( X ),
        bike( X ).
        
Thus we will now try to prove that something is fun, by trying to find something that is blue, using the blue database:
/* database of blue items */ blue( flower_3 ). blue( glass_9 ). blue( honda_81 ).In this case we now choose
blue(flower_3).