The tic-tac-toe application was originally written using Quintus Prolog. Port the tic-tac-toe application to run using SWI-Prolog and show a few examples of it working successfully.  You will have to at least write some code to replace the Quintus Prolog library predicate changearg. 

Also, modify the program to use file operations to write a log of the game to a file.  The log should indicate the move the player makes as well as the computer for each iteration and the final board state and the result of the game.