(*
ocamlfind ocamlopt -package batteries -linkpkg main.ml -o a.out
*)
open Batteries
open BatList

let n = Scanf.sscanf (read_line ()) "%d" (
        fun n -> 
                n
)

let lst = Str.split (Str.regexp " ") (read_line ())

let lst2 = BatList.map2 (fun i elmnt -> (i, elmnt)) (BatList.map string_of_int (BatList.range 1 `To n)) lst
           |> BatList.fast_sort (fun (ai, ae) (bi, be) -> if ae = be then 0 else if ae < be then -1 else 1)
           |> BatList.map (fun (i, e) -> i)

let () = 
        BatList.fold_right (fun a b -> a ^ " " ^ b) lst2 ""
        |> Printf.printf "%s\n"
