testAtomConcatFirstIsVar

Tests the queries

?- atom_concat(X,query,testquery).

succeeds.