/* Sample Japanese Grammar in DCG      */
/* Copyright (C) 1993 Yuji Matsumoto   */

:- sax_top_node_category(_,ʸ/0).

% ʸ
ʸ --> 
	(   ³, (  ; [] )
	;   []
	),
	Ҹ,
	(  ; [] ).

% ̾ 
̾ --> ñ̾.
̾ --> ̾.


ñ̾ -->
	( Ϣλ ; Ϣλֻؼ ; Ҹ ),
	̾.
ñ̾ -->
	Ѹ,
	̾Ҹ.
ñ̾ --> ( ̾ ; ̾ ; Ū̾ ; ʣ̾ ; ֻ̾ؼ ).

̾ -->
	( ̾ ; ñ̾ ),
	( ̾³ ; ³ ),
	(  ; [] ),
	ñ̾.
̾ -->
	( ̾ ; ñ̾ ),
	,
	( ³ ; [] ),
	ñ̾.

ʣ̾ -->
	( ̾Ƭ ; ʷƻƬ ),
	̾.
ʣ̾ -->
	̾,
	( ̾̾ ; ̾̾ ).
ʣ̾ --> 
	̾,
	( ̾ ; ʣ̾ ).

̾ --> ( ̾ ; ̾ ; ͭ̾ ; ̾ ; ̾ ;  ; ư ).

% ֻ
ֻ -->
	ֻ,
	( ʽ ;  ; Ωƽ ).
ֻ -->
	̾,
	( ̾³ ; [] ),
	( ʽ ;  ;  ; Ωƽ ).
ֻ -->
	Ҹ,
	Ҹ³,
	( ʽ ;  ; Ωƽ ).
ֻ -->
	Ҹ,
	( ѽ ; Ωƽ ).
ֻ -->
	Ҹ,
	Ū̾,
	(  ; [] ).
ֻ -->
	( ƻ ; ư ),
	ƻҸ.
ֻ --> ( ƻ ; ƻ ;  ; ֻؼ ).

% 
 --> (  ;  ; 	;  ;  ;
           Ľ ; ɾ ; ȯ ; Ū̾ ; ̾).

% Ҹ
Ҹ --> ñҸ.
Ҹ --> Ҹ.

ñҸ -->
	ֻ,
	,
	( ³ ; [] ),
	(  ; [] ),
	Ҹ.
ñҸ -->
	ֻ,
	Ҹ.
ñҸ -->
	̾,
	̾̾,
	( ̾̾ ; [] ),
	Ҹ.
ñҸ -->
	Ҹ,
	( ư ;  ).
ñҸ --> Ѹ.

Ҹ -->
	ñҸ,
	Ҹ³,
	(  ; [] ),
	( Ҹ ; ñҸ ).
Ҹ -->
	ñҸ,
	(  ; [] ),
	( ³ ; [] ),
	(  ; [] ),
	( Ҹ ; ñҸ ).

Ѹ -->
	̾,
	( ư ;  ; Ƚ ).
Ѹ --> Ѹ.

Ѹ -->
	( ƻƬ ; ʷƻƬ ),
	ƻ.
Ѹ -->
	( ưƬ ; ̾ ; ̾ ),
	ư.
Ѹ -->
	Ѹ,
	( ƻҸ ; ư ).
Ѹ --> ƻ.
Ѹ --> ( ƻ ; ư ).


̾ -->
	̾,
	(   ̾³
	;   , ( ³ ; [] )
	;   []
	),
	̾.
̾ --> ̾.

ƻ -->
	̾,
	ƻ̾,
	(   ̾³
	;   ( , ( ³ ; [] ) )
	;   []
	),
	ƻ.
ƻ -->
	̾,
	ƻ̾.
		
̾ -->
	̾,
	̾̾,
	(   ̾³
	;   ( , ( ³ ; [] ) )
	;   []
	),
	̾.
̾ -->
	̾,
	̾̾.

̾ -->
	̾,
	̾̾,
	(   ̾³
	;   ( , ( ³ ; [] ) )
	;   [] ),
	̾.
̾ -->
	̾,
	̾̾.
