points = (2 * !PI / 99.0) * FINDGEN(100)

for q = 0, 49, 2 do begin

    temp_points = points[q*2:(q+1)*2-1]

    x = hmin * COS(temp_points)

    y = hmin * SIN(temp_points)

    arr = TRANSPOSE([[x],[y]])

    plots, arr, /data

endfor