通过x,y对输入两个向量x,y对的数组,并找到这两个x,y对输出新数组的函数.?
let v1 = [|for x, y in [3.,3.; 5.,5.; 1.,1.] -> Vector(x, y)|];;
let v2 = [|for x, y in [1.,1.; 2.,2.; 4.,4.] -> Vector(x, y)|];;
let data8 v1 v2 = Array.map2 (fun x y -> Vector.CrossProduct) v1 v2val v1 :向量[] =3,3;5,5;1,1
val v2 :向量[] =1,1;2,2;4,4
val data8:'a [] -> 'b [] -> (向量*向量->浮点数) []
data8 v1 v2;;val it:(向量*向量->浮点数) [] =x;;\x
发布于 2011-10-11 15:47:30
请参阅:http://fpish.net/topic/Some/0/73895
,您忘了将参数传递给Vector.CrossProduct:
设data8 v1 v2 = Array.map2 (Array.map2 x y -> Vector.CrossProduct(x,y)) v1 v2
https://stackoverflow.com/questions/7728586
复制相似问题