-1

注: F# は 4 日前に開始されたので、反対票を投じる前に検討してください。または、少なくとも、すべての否定的な投票を受け取るために私が間違っていることを教えてください.

インテリジェンス.fs

module Inteligence
open TTTAiFSharpAlphaBeta
open Boards

type Node(board: Board, moveBox :int, point:int)=
    let mutable _moveBox:int=moveBox
    let mutable _point:int=point
    let mutable _board=new Board(board)
    let mutable _parent= board

    new() = Node(new Board(),0,0)
    new(board: Board)= new Node(new Board(board),0,0)

    member this.MoveBox with get() = _moveBox and set(value) = _moveBox <- value
    member this.Point with get() = _point and set(value) = _point <- value
    member this.Board with get() = _board and set(value) = _board <- value
    member this.Parent with get() = _parent and set(value) = _parent <- value

    member this.Copy(node: Node)= 
             _board<- new Board(node.Board)
             _moveBox<- node.MoveBox
             _point<- node.Point
             _parent<- node.Parent




type Inteligence(board:Board,symbol:int)=
    let mutable _nodeCount=0;
    let mutable _rootNode= new Node(board)
    let mutable _level = 0
    let mutable _symbol = symbol
    let mutable _reff = new Boards.Reffery()

    member this.NodeCount with get() = _nodeCount and set(value) = _nodeCount <- value
    member this.RootNode with get() = _rootNode and set(value) = _rootNode <- value
    member this.Level with get() = _level and set(value) = _level <- value
    member this.Symbol with get() = _symbol and set(value) = _symbol <- value

    member this.Move() :int = 0
    member this.MinMaxAlphaBeta(node:Node, min:bool,  alpha:int,  beta:int):int=0
    member this.BoardPoint(node:Node):int=0

AI.fs

    module TTTAiFSharpAlphaBeta
    open AIInterface
    open Boards
    type AI()= 
            let mutable cboard =new Board()
            let mutable level = 0
            let mutable symbol = 0
            interface IAI with
                member this.SetAi (_board: Board ,_level, _symbol)  =
                     cboard <- _board
                     level  <- _level
                     symbol <- _symbol
                member this.GetAiName()="F#AlphaBetaAi"
                member this.GetAiVersion()="0.0.1"
                member this.GetLevel()= [| 3 |];
                member this.AiMove()=
                           Inteligence.Inteligence(cboard,symbol).Move()

問題はアクセスできないことです 

Move()

Inteligence.fs から

member this.AiMove()=
         Inteligence.Inteligence(cboard,symbol).Move()

AI.fs で

取得エラー名前空間またはモジュール「Inteligence」が定義されていません何が間違っていますか?

4

1 に答える 1

2

私はあなたがfsi（から#r）を使用していると推測しています。

あなたが使用する必要がある場合

#load "Intelligence.fs"

Visual Studio では、Intelligence.fs がプロジェクト リスト内の他のファイルの前にあることを確認する必要がある場合 (F# は、ファイルがコンパイルされる順序に影響されます)。

于 2013-10-03T06:09:52.540 に答える