let jitter_list n =
    match n with
          1 -> [ (0.00, 0.00) ]
    | 2 -> [ (0.25, 0.75);
             (0.75, 0.25) ]
    | 4 -> [ (0.375, 0.25);
             (0.125, 0.75);
             (0.875, 0.25);
             (0.625, 0.75) ]
    | _ -> raise (Failure "not coded with jitter points for such antialiasing")