Semantic representation of passive sentences

Does anyone know how to do (in Prolog) the semantic representation of a sentence like:

  

Pedro was kissed by Ana.

... so that the semantic representation is the same as the active voice:

  

Ana kissed Pedro.