//VerilogA for tools,riout,veriloga `include "constants.vams" `include "disciplines.vams" module riout(Ipow,Iphase,Vreal,Vimag); input Ipow,Iphase; output Vreal,Vimag; electrical Ipow,Iphase,Vreal,Vimag; analog begin V(Vreal) <+ V(Ipow)*cos(V(Iphase)); V(Vimag) <+ V(Ipow)*sin(V(Iphase)); end endmodule