1) Function RationalPoints-of-C (C, C ( ) ).

2) Initilize found-ponits = empty list.

3) Add P = ( a ,0 ) to found-points.

4) for each Q ( x , y ) C ( ) such that x a do.

5) Compute P ( x , y ) C ( ) such that.

6) x = 1 + a x x and y = y x 4 .

7) end for.

8) Add P and ι ( P ) to found-points.

9) return -points of C.