Prolog - Assert into a new database...

Prolog deciding a certain rule to choose depending on input...

Prolog assert/retract not working (?)...