blocks Module

Contents

Subroutines

draw_piece freeze game_over

Subroutines

public subroutine draw_piece(P)

Arguments

Type	Intent	Optional	Attributes		Name
class(Piece),	intent(in)			::	P

public subroutine freeze(F, P, NP)

Arguments

Type	Intent	Optional	Attributes		Name
class(Field),	intent(inout)			::	F
class(Piece),	intent(inout)			::	P
class(Piece),	intent(inout)			::	NP

public subroutine game_over(F, P, msg)

Arguments

Type	Intent	Optional	Attributes		Name
class(Field),	intent(in)			::	F
class(Piece),	intent(in),	optional		::	P
character(len=*),	intent(in),	optional		::	msg