F#map2 iter2 ||>如何?与Vector合作?

时间:2011-10-11 15:31:13

标签: f# map vector geometry iteration

输入两个Vector 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 v2

val v1:Vector [] = [| 3,3; 5,5; 1,1 |]

val v2:Vector [] = [| 1,1; 2,2; 4,4 |]

val data8:'a [] - > 'b [] - > (Vector * Vector - > float)[]

  

data8 v1 v2 ;;   val it :( Vector * Vector - > float)[] =     [|; ; |]

1 个答案:

答案 0 :(得分:4)

请参阅:http://fpish.net/topic/Some/0/73895

  

您忘记将参数传递给Vector.CrossProduct:

let data8 v1 v2 = Array.map2 (fun x y -> Vector.CrossProduct(x, y)) v1 v2