This seems pretty obvious, but I can't recall seeing it anywhere before.
One opamp and two resistors!
Version 4 SHEET 1 880 680 WIRE 80 -48 -128 -48 WIRE -128 16 -128 -48 WIRE 80 16 80 -48 WIRE 48 32 -32 32 WIRE 192 48 112 48 WIRE 336 48 192 48 WIRE 48 64 16 64 WIRE 80 112 80 80 WIRE -128 144 -128 96 WIRE 192 144 192 48 WIRE 336 144 336 48 WIRE -32 256 -32 32 WIRE 192 256 192 224 WIRE 192 256 -32 256 WIRE 16 304 16 64 WIRE 336 304 336 224 WIRE 336 304 16 304 WIRE 192 368 192 256 WIRE 336 368 336 304 WIRE 192 496 192 448 WIRE 336 496 336 448 FLAG 80 112 0 FLAG 192 496 0 FLAG 336 496 0 FLAG -128 144 0 SYMBOL res 320 128 R0 WINDOW 0 66 38 Left 2 WINDOW 3 74 70 Left 2 SYMATTR InstName R1 SYMATTR Value 1 SYMBOL res 176 128 R0 WINDOW 0 56 42 Left 2 WINDOW 3 57 73 Left 2 SYMATTR InstName R2 SYMATTR Value 1K SYMBOL Opamps\\UniversalOpamp2 80 48 R0 WINDOW 0 27 -39 Left 2 SYMATTR InstName U1 SYMBOL current 192 368 R0 WINDOW 0 -104 48 Left 2 WINDOW 3 -338 99 Left 2 WINDOW 123 0 0 Left 2 WINDOW 39 0 0 Left 2 SYMATTR InstName I_IN SYMATTR Value PULSE(1u 10u 10u 1u 1u 1m) SYMBOL res 320 352 R0 WINDOW 0 67 45 Left 2 WINDOW 3 86 79 Left 2 SYMATTR InstName R_LOAD SYMATTR Value 100 SYMBOL voltage -128 0 R0 WINDOW 0 -91 35 Left 2 WINDOW 3 -91 71 Left 2 SYMATTR InstName V1 SYMATTR Value 15 TEXT -305 340 Left 2 !.tran 5m TEXT -400 232 Left 2 ;1000:1 CURRENT MIRROR TEXT -344 280 Left 2 ;JL Dec 27, 2015