PARI GP ispseudoprime

THREE=(((((floor((23^7347-44-10)/10^7400)-1+2442*2-48)*3-2)*3-2)*3-2)*3-2)*3-2

To be completed...