A Mathematica LibraryLink library to efficiently replace numerical data in place

First, you have to change the path to the library and execute the following code:

ClearAll[ReplacePartNDInPlace];

ReplacePartNDInPlace = 
  LibraryFunctionLoad[
   "C:\\Users\\USER_NAME\\Downloads\\replace_part_nd.dll", 
   "replace_part_nd", {{_, _, "Shared"}, {Integer, 2, "Constant"}, {_, 1, "Constant"}}, "Void"];

Remember the changes are in place just like list[[i]] = x. You have to have the following inputs:

• Data could be any dimension (Integer or Real)
• Positions you want to change (it should be a 2D list like: {{1}, {2}} or {{1,2}, {2,2}})
• Values (should be 1D list - Integer or Real - but the type must match the Data)

Block[{x = Range[10]},
 ReplacePartNDInPlace[x, {{2}, {5}, {10}}, {-1, -2, -3}];
 x
 ]
(* Output: {1, -1, 3, 4, -2, 6, 7, 8, 9, -3} *)

If you provide an invalid position like {11} for the case above the kernel will crash (Could be fix in the future).