anchor.diff:  	io:format("~n-------ocl_dotProduct TEST-------~n"),
   	io:format("Vectors' dimension: ~w~nV1 = seq(0,~w)~nV2 = duplicate(~w,~w): ~n~n", [NumVal, NumVal-1, NumVal, Val]),
   	
  -	V1 = [ X+0.0 || X <- lists:seq(0,NumVal-1) ],
  -	V2 = [ X+0.0 || X <- lists:duplicate(NumVal,Val) ],
  +	[V1,V2] = generate_input(NumVal,Val),
   	
   %% 	F_start = now(),
   %% 
  
positive.code: main(erl, N_ELEM_EXP_POW2) ->
  	erl_dotProduct_test(erl_utils:pow2(N_ELEM_EXP_POW2))
  .
  
  
  ocl_dotProduct(NumVal, V1, V2) ->
  
negative.code: 		erl_dotProduct_test/1,
  		erl_dotProduct/2,
  		
  		main/2,
  		test/1
  		]).
  
  -import(erl_utils, 
  