S SmartDocs
系列: haskell haskell 80 行 · 更新於 2026-02-03

Examples.hs

haskell/Examples.hs

{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Examples where
import Chess
import ChessGraphics(render)


emptyBoard :: GameState
emptyBoard = []

starting :: GameState
starting =
  [ ((0,0),Piece Black Rook)
  , ((0,1),Piece Black Knight)
  , ((0,2),Piece Black Bishop)
  , ((0,3),Piece Black Queen)
  , ((0,4),Piece Black King)
  , ((0,5),Piece Black Bishop)
  , ((0,6),Piece Black Knight)
  , ((0,7),Piece Black Rook)
  , ((1,0),Piece Black Pawn)
  , ((1,1),Piece Black Pawn)
  , ((1,2),Piece Black Pawn)
  , ((1,3),Piece Black Pawn)
  , ((1,4),Piece Black Pawn)
  , ((1,5),Piece Black Pawn)
  , ((1,6),Piece Black Pawn)
  , ((1,7),Piece Black Pawn)
  , ((6,0),Piece White Pawn)
  , ((6,1),Piece White Pawn)
  , ((6,2),Piece White Pawn)
  , ((6,3),Piece White Pawn)
  , ((6,4),Piece White Pawn)
  , ((6,5),Piece White Pawn)
  , ((6,6),Piece White Pawn)
  , ((6,7),Piece White Pawn)
  , ((7,0),Piece White Rook)
  , ((7,1),Piece White Knight)
  , ((7,2),Piece White Bishop)
  , ((7,3),Piece White Queen)
  , ((7,4),Piece White King)
  , ((7,5),Piece White Bishop)
  , ((7,6),Piece White Knight)
  , ((7,7),Piece White Rook)
  ]

scholarsMate:: GameState
scholarsMate =
  [ ((0,0),Piece Black Rook)
  , ((2,2),Piece Black Knight)
  , ((0,2),Piece Black Bishop)
  , ((0,3),Piece Black Queen)
  , ((0,4),Piece Black King)
  , ((0,5),Piece Black Bishop)
  , ((2,5),Piece Black Knight)
  , ((0,7),Piece Black Rook)
  , ((1,0),Piece Black Pawn)
  , ((1,1),Piece Black Pawn)
  , ((1,2),Piece Black Pawn)
  , ((1,3),Piece Black Pawn)
  , ((3,4),Piece Black Pawn)
  , ((1,6),Piece Black Pawn)
  , ((1,7),Piece Black Pawn)
  , ((6,0),Piece White Pawn)
  , ((6,1),Piece White Pawn)
  , ((6,2),Piece White Pawn)
  , ((6,3),Piece White Pawn)
  , ((4,4),Piece White Pawn)
  , ((6,5),Piece White Pawn)
  , ((6,6),Piece White Pawn)
  , ((6,7),Piece White Pawn)
  , ((7,0),Piece White Rook)
  , ((7,1),Piece White Knight)
  , ((7,2),Piece White Bishop)
  , ((1,5),Piece White Queen)
  , ((7,4),Piece White King)
  , ((4,2),Piece White Bishop)
  , ((7,6),Piece White Knight)
  , ((7,7),Piece White Rook)
  ]
← 上一頁

ChessGraphics.hs

 下一頁 →

Fibonacci.hs

相關文章

haskell haskell 更新於 2026-02-03

Adding.hs

Adding.hs — haskell source code from the haskell learning materials (haskell/Adding.hs).

閱讀文章 →
haskell haskell 更新於 2026-02-03

Area.hs

Area.hs — haskell source code from the haskell learning materials (haskell/Area.hs).

閱讀文章 →
haskell haskell 更新於 2026-02-03

Chess.hs

Chess.hs — haskell source code from the haskell learning materials (haskell/Chess.hs).

閱讀文章 →
haskell haskell 更新於 2026-02-03

ChessGraphics.hs

ChessGraphics.hs — haskell source code from the haskell learning materials (haskell/ChessGraphics.hs).

閱讀文章 →
haskell haskell 更新於 2026-02-03

Fibonacci.hs

Fibonacci.hs — haskell source code from the haskell learning materials (haskell/Fibonacci.hs).

閱讀文章 →
haskell haskell 更新於 2026-02-03

GPACalculator.hs

GPACalculator.hs — haskell source code from the haskell learning materials (haskell/GPACalculator.hs).

閱讀文章 →