How to model a negative resistor with subcircuit

Hi All,

I am wondering how to model a negative resitor with subcircuit. I found example as below:

* test
.SUBCKT RES_10K 1 2
ERES 1 3 VALUE = { I(VSENSE)*10K }
VSENSE 3 2 DC 0
.ENDS

r1 1 0 10K
Xr2 1 2 RES_10K
v1 2 0 5

.dc 0 5 0.1
.print dc v(1)
.end