// VerilogA for ISFET, EpH, veriloga
`include "constants.vams"
`include "disciplines.vams"
module EpH(r10,r1,n23,n46);
inout r10,r1;
input n23,n46;
electrical r10,r1,n23,n46;
// real pH;
analog begin
// @(initial_step) begin
// V(r1) <+ 0;
// end
// pH = V(r10,r1);
V(r10,r1) <+ (pow(1.345223707,-36)*(exp(-77.294686*V(r10,r1)-exp(V(n46)))))/(exp(-77.294686*V(r10,r1))+exp(V(n23)*exp(-38.647343*V(r10,r1)))+exp(V(n46))) + (pow(8.968158044,-37)*exp(-38.647343*V(r10,r1)))/(exp(-38.647343*V(r10,r1)) + pow(6.329113924,-12)*exp(V(n23)));
end
endmodule