xota GNDA I_5U VCCA VN VP OUT OTA
****load
cl out gnd 2p
I_5U I_5U 0 5u
vp vp vp1 sin(0 1m 1k) ac 1
vp1 vp1 gnd 1.5
vn vn gnd 1.5
.ac dec 10 1 100g
.pz v(out) vp
.TF v(out) vp
.print ac ga=par('vdb(out)-vdb(vp)')
.print ac pa=par('vp(out)')
.meas ac gain when vdb(out)=0
.meas ac phase find vp(out) when vdb(out)=0