}u`TCxg\[X

//(|R)̐킢ł
//ÁE̕t̖{鏊̕Ώۂł
//Ȃ̂ŗjCxgW̓ҊOƂ
//ɂĕʕł

//ƒ|R͉؏ɂ悤ł
//Cxgō쐬Rc͉؁`Ԃ̗HʂȂH
//悤Ȃ̂Ŏ̒Ő킹Ă܂

//20241228_V1.00Jcˉz


`v^[:{
	Cxg:̐킢E]{//
		:x
		_@:]Jn()
		:{
			nq:{
				`mc:{//̕t̏ꍇ
					:(l::l.喼)==(̕t)
					:(喼::ËMv.)==(^)
					:(::R.喼)==(̕t)
					nq:{
						:(::.喼)==(ËMv)
						:(::.喼)==(̕t)
					}//nq
					:(l::l._)==(l勒_)
					:(::N)>=(1558)
				}//`mc
				`mc:{//Â̏ꍇ
					:(l::l.喼)==(ËMv)
					:(l::Í΋v.CxgQ\)
					:(l::Í΋v.喼)==(ËMv)
					:(喼::̕t.)==(^)
					:(::R.喼)==(̕t)
					nq:{
						:(::.喼)==(ËMv)
						:(::.喼)==(̕t)
					}//nq
					:(l::l._)==(l勒_)
					:(::N)>=(1558)
				}//`mc
			}//nq
		}//
		XNvg:{
			:(l::l.喼)==(̕t)
			:(^){
				:(喼::̕t.O𓯖(ËMv))!=(Ȃ)
				:(^){
					b:(̕t,̕t)[[FAĂ悤\nł́A]n߂]]
					b:(̕t,MƐb)[[āc\n(ËMv.)Ɛ[JƂƂ]]
					b:(MƐb,̕t)[[\n(ËMv.){ƂƂ̐ɂ܂]]
					b:(̕t,MƐb)[[ށc\n(ËMv.)Ƃ͒NFDۂĂc\nA܂ł]]
					X`\:(CxgX`,V,,,tF[h)
					i[V:[[(̕t.)Ƃ(ËMv.)Ƃ\niZN(̕t.)(ÓV.)̒\n(ËMv)(̕t.)̖W`œ]]
					i[V:[[ꂩO\Nȏɂ킽\nFD֌Wɂ\n݂ɐ͂g傳]]
					X`\:(CxgX`,,,,tF[h)
					i[V:[[(̕t.)Ƃ(ËMv.){ƂƗFD֌Wɂ\n̖k(ËMv.)LFƂ\n悤ɂȂ]]
					i[V:[[A(ËMv.){Ƃ\nF̎xzł\nʂւƎxzg]]
					i[V:[[XɗQΗ悤\nȂĂ̂ł]]
					X`:(tF[h)
					b:(OƐb,̕t)[[Ȃ΁A܂͉\nU߂Ă͂ł傤H]]
				}//^
				:(U){
					b:(̕t,̕t)[[FAĂ悤\nł́A]n߂]]
					b:(̕t,MƐb)[[āc\nɂƂĒN̖Fł(ËMv.)Ƃ\nƂȂĂ͑傫ȋЂƂȂ]]
					X`\:(CxgX`,V,,,tF[h)
					i[V:[[(̕t.)Ƃ(ËMv.)Ƃ\niZN(̕t.)Vւ̒\n(ËMv)(̕t.)̖W`œ]]
					i[V:[[ꂩO\Nȏɂ킽\nFD֌Wɂ\n݂ɐ͂g傳]]
					X`\:(CxgX`,,,,tF[h)
					i[V:[[(̕t.)Ƃ(ËMv.){ƂƗFD֌Wɂ\n̖k(ËMv.)LFƂ\n悤ɂȂ]]
					i[V:[[A(ËMv.){Ƃ\nF̎xzł\nʂւƎxzg]]
					i[V:[[XɗQΗ悤\nȂĂ̂ł]]
					X`:(tF[h)
					:(::.喼)==(ËMv)
					:(^){
						b:(̕t,MƐb)[[ɉ(̕t.)Ƃ~\n؏͘A̕\n̂܂܎܂˂ĂĂ]]
						b:(̕t,MƐb)[[XȂNUɂ\n͒ǂl߂邱ƂƂȂ낤\nh߂̈ł]]
					}//^
					:(U){
						b:(̕t,MƐb)[[ɉ؏ɑ΂\n(ËMv.)͒̎L΂ĂƂ\n̂܂܎܂˂ĂĂ]]
						b:(̕t,MƐb)[[XȂNUɂ\n͒ǂl߂邱ƂƂȂ낤\nh߂̈ł]]
					}//^
					b:(OƐb,̕t)[[Ȃ΁A͂\nU߂Ă͂ł傤H]]
				}//U
				b:(̕t,MƐb)[[邩c(ËMv.)ɂƂĂ\n̍RւƏo邽߂̌֌ɓ]]
				b:(OƐb,MƐb)[[͂A}邱Ƃ\n̑(ËMv.)̐헪l\ndvƍl܂]]
				b:(OƐb,̕t)[[̉v͕aŖӖڂƂȂ\nq̗cc\nDƂ͗eՂ]]
				b:(OƐb,̕t)[[A(ËMv.)̞\nsĂ܂]]
				b:(̕t,OƐb)[[̋@𓦂\nł߂Ă܂\ncł́AW߂IowI]]
				b:(MƐb,̕t)[[͂͂I]]
				:(l::l)!=(̕t)
				:(^){
					l`:(l::l)
				}//^
				:(U){
					l`:(l::)
				}//U
				喼Ƃ`:(喼::̕t)
				喼Ƃa:(喼::ËMv)
				`:(喼::̕t.{)
				a:(喼::ËMv.{)
				:(喼::喼Ƃ`.O𓯖(喼Ƃa))!=(Ȃ)
				:(^){
					XV:(喼::喼Ƃ`.O𓯖(喼Ƃa))(Ȃ)
				}//
				la:(l::)
				RcҐŋ:(lRc,`,_ړ,̒,,`,̕t,l`,,,,1000,8000,1200,1200,0,6000,0)
			}//
			:(l::l.喼)==(ËMv)
			:(^){
				b:(ËMv,ËMv)[[FAĂ悤\nł́A]n߂]]
				aflύX:(Cxg@)
				b:(,ËMv)[[aI厖ɂ܂I\n(̕t.)̌R\n̉DꂽƂ̂ƁI]]
				b:(ËMv,)[[ȂƁI邪cI]]
				b:(MƐb,ËMv)[[{l̖O}Aǂ{Ȃ}{}H]]
				b:(ËMv,MƐb)[[͍RÛ߂̗v{}\nDꂽ܂܂ɂĂƂ͂ł{܂}I]]
				b:(ËMv,MƐb)[[ɂo悤`I\nowI]]
				:(l::l)!=(ËMv)
				:(^){
					l`:(l::l)
				}//^
				:(U){
					l`:(l::)
				}//U
				la:(l::叫)
				喼Ƃ`:(喼::̕t)
				喼Ƃa:(喼::ËMv)
				`:(喼::ËMv.{)
				a:(喼::̕t.{)
				:(喼::喼Ƃ`.O𓯖(喼Ƃa))!=(Ȃ)
				:(^){
					XV:(喼::喼Ƃ`.O𓯖(喼Ƃa))(Ȃ)
				}//
				:(::`.mC)
				XV:(::`.mC)(10)
				RcҐŋ:(lRc,`,_ړ,̒,,`,ËMv,Í΋v,l`,,,1000,8000,600,600,0,3000,0)
				RcҐŋ:(CxgpPRc,a,_ړ,̒,,a,̕t,,,,,1000,8000,1200,1200,0,6000,0)
				RcҐŋ:(CxgpQRc,`,_ړ,̒,lRc,`,la,,,,,1000,8000,600,600,0,3000,0)
				XV:(::`.mC)()
			}//
		}//XNvg
	}//Cxg
	Cxg:̐킢EړI{
	        :x
		_@:RcړI(̕t,̕t,_ړ,̒)
		:{
			:(l::l.喼)==(̕t)
			:(Cxg::̐킢E])==(ς)
		}//
 		XNvg:{
			l`:(Rc::lRc.Q)
			X`\:(CxgX`,U,,,tF[h)
			i[V:[[ow(̕t.)R\nւƒH蒅\nꋓɂP]]
			i[V:[[̉v͒R邱Ƃł\nꑰŏ̂Ăē̂ł]]
			wiύX:(,]̊,tF[h)
			b:(l`,̕t)[[{l̖O}\n̐͊܂]]
			b:(̕t,l`)[[ށc\nRȂł\nǂݒʂ肾]]
			b:(̕t,l`)[[ɏ̎ł߂I\n(ËMv.)͕K₱̏DԂɂ悤]]
			喼Ƃa:(喼::ËMv)
			a:(喼::ËMv.{)
			la:(l::叫)
			:(::a.mC)
			XV:(::a.mC)(10)
			RcҐŋ:(CxgpPRc,a,_ړ,̒,,a,ËMv,,,,,1000,8000,600,600,0,3000,0)
			RcҐŋ:(CxgpQRc,a,_ړ,̒,CxgpPRc,a,la,,,,,1000,8000,600,600,0,3000,0)
			XV:(::a.mC)()
		}//XNvg
	}//Cxg
	Cxg:̐킢EړI{
		:x
		_@:RcړI(ËMv,ËMv,_ړ,̒)
		:{
			nq:{
				`mc:{//̕t̏ꍇ
					:(l::l.喼)==(̕t)
					:(Cxg::̐킢EړI)==(ς)
				}//`mc
				`mc:{//Â̏ꍇ
					:(l::l.喼)==(ËMv)
					:(Cxg::̐킢E])==(ς)
				}//`mc
			}//nq
		}//
		XNvg:{
			:(l::l.喼)==(̕t)
			:(^){
				l`:(Rc::lRc.Q)
				la:(Rc::lRc.R)
				lb:(Rc::lRc.S)
				wiύX:(,]̊,tF[h)
				b:(叫,̕t)[[\グ܂I\n(ËMv.)RẢ\n͂ɂ܂I]]
				b:(̕t,l`)[[(ËMv.)̕zẃH]]
				b:(l`,̕t)[[͂Ȃ˂(ËMv.)̖{\n̔nɒ̕ʓꂼzw]]
				b:(l`,̕t)[[܂Aԓ_̒|Rɂ\noĂĂ܂]]
				b:(̕t,l`)[[cƁAȂΒ|RU߂邩]]
				b:(la,̕t)[[(ËMv.)̘Agf\nƂ킯ł܂]]
				b:(̕t,l`)[[c\nRA͂j~ɂ邾낤\n𕚕ňԑŐsƍs]]
				b:(̕t,l`)[[AU\n킷ʂ]]
				b:(lb,̕t)[[Ȃ΁A\noĂ͂ł傤H]]
				b:(̕t,l`)[[ށAȂ(ËMv.)̐i\nʂ͌ʂ\n͌]]
				b:(̕t,l`)[[悵AɏɂI\nd|邼I]]
				wi߂:(tF[h)
				i[V:[[(̕t.)R͒|R\n(ËMv.)RVRɍUJn\n(ËMv.)R͋~̂ߕ𑗂荞]]
				b:(la,̕t)[[(ËMv.)̐V肪ڋ߁I]]
				b:(̕t,叫)[[}oI]]
				rdX^[g:(ʁilj)
				b:(la,̕t)[[͂͂I]]
				rdX^[g:(ˌij)
				b:(叫,G叫)[[[I]]
				b:(̕t,叫)[[̂܂ܐ߂邼I\nsI]]
				Rcw:(CxgpPRc,RcU,lRc,)
			}//^
			:(l::l.喼)==(ËMv)
			:(^){
				l`:(Rc::lRc.Q)
				X`\:(CxgX`,ow,,,tF[h)
				i[V:[[(ËMv.)R(ËMv.)̒\n(ËMv.)BƂpƋ\n֌ďow]]
				i[V:[[(ËMv.){\n铌̑˂ɖ{wz\n͓̔nɕzw]]
				i[V:[[ɁA̓񃕏̐w̒Ԃɓ\n|RɗVRu\n͂̂]]
				wiύX:(,,tF[h)
				b:(叫,ËMv)[[\グ܂I\n|R~vI\n(̕t.)̍U󂯂ĂƂ̂ƁI]]
				b:(ËMv,叫)[[|R𗎂Ƃ\nƂ̘Ag₽Ă܂c\nɋ~ɌI]]
				b:(l`,ËMv)[[͂͂I]]
				wi߂:(tF[h)
				i[V:[[(̕t.)R̍U󂯂(ËMv.)R\nˁAn炻ꂼ\n|R̋~ւƋ}s]]
				i[V:[[c]]
				aflύX:(Cxg@)
				rdX^[g:(ˌij)
				b:(G叫,叫)[[[I]]
				b:(叫,ËMv)[[(̕t.)̕łII]]
				b:(ËMv,叫)[[IU܂ꂽcI\nԂ̂I]]
				Rcw:(lRc,RcU,CxgpPRc,)
			}//
        	}//XNvg
	}//Cxg
	Cxg:̐킢E{
		:x
		_@:I(,,)
		:{
			:(Cxg::̐킢EړI)==(ς)
			nq:{
				:(l::l.喼)==(̕t)
				:(l::l.喼)==(ËMv)
			}//nq
		}//
		XNvg:{
			:(l::l.喼)==(̕t)
			:(^){
				:(Rc::lRc.)==()
				:(^){
					l`:(Rc::lRc.Rc)
					b:(叫,l`)[[̑叟ɂ܂I]]
					b:(l`,叫)[[łIF̎ҁI]]
					X`\:(CxgX`,,,,tF[h)
					i[V:[[|Rōsꂽ\n(̕t.)Ƃ(ËMv.)Ƃ̐킢\n(̕t.)Ƃ̏ɏI]]
					i[V:[[|R(ËMv.)RɍUd|\n~ɗ(ËMv.)R{𕚕ɂ\nɌj]]
					i[V:[[ӋCgX\nւƋA҂̂ł]]
					i[V:[[āc]]
					wiύX:(,]̊,tF[h)
					l`:(Rc::lRc.Q)
					b:(叫,̕t)[[\グ܂I\n(ËMv.)̑叫\n(ËMv.)𓢂Ƃ̂ƁI]]
					b:(l`,叫)[[I]]
					b:(̕t,叫)[[cAc]]
					b:(l`,̕t)[[{l̖O}c]]
					i[V:[[(ËMv.)(ËMv.)̒ł\n(̕t.)ɂƂĂ`ɂ]]
					b:(̕t,l`)[[cA퍑̏K\n̂ɂ͖J^I]]
					i[V:[[`A̎\n߂݂(̕t.)ł\n(̕t.)Ƃ̂ߌӂVɂ]]
					i[V:[[A(ËMv.)R\n̒D҂ߓP\n(̕t.)͑RւƊM̂ł]]
					wi߂:(tF[h)
					b:(̕t,叫)[[҂ǂAA҂邼I]]
					`:(l::̕t._)
					:(::`.R)+(12000)
					:(::`.)+(30000)
					:(::`.m)+(6000)
					XV:(::`.R)()
					XV:(::`.)()
					XV:(::`.m)()
					a:(l::ËMv._)
					:(::a.R)-(12000)
					:(::a.)-(30000)
					:(::a.m)-(6000)
					XV:(::a.R)()
					XV:(::a.)()
					XV:(::a.m)()
					Rcw:(lRc,A,,)
					Rcw:(CxgpPRc,A,,)
					Rcw:(CxgpQRc,A,,)
				}//
				:(U){
					b:(叫,̕t)[[Aɂ܂I]]
					b:(̕t,叫)[[c\nPނI]]
					X`\:(CxgX`,s,,,tF[h)
					i[V:[[|Rōsꂽ\n(̕t.)Ƃ(ËMv.)Ƃ̐킢\n(ËMv.)Ƃ̏ɏI]]
					i[V:[[(̕t.)R(ËMv.)RU\nɂ؂Ĕsk]]
					i[V:[[̌\nێ邱ƂłȂȂ\nēPނ̂ł]]
					`:(l::ËMv._)
					:(::`.R)+(12000)
					:(::`.)+(30000)
					:(::`.m)+(6000)
					XV:(::`.R)()
					XV:(::`.)()
					XV:(::`.m)()
					a:(l::̕t._)
					:(::a.R)-(12000)
					:(::a.)-(30000)
					:(::a.m)-(6000)
					XV:(::a.R)()
					XV:(::a.)()
					XV:(::a.m)()
					Rcw:(lRc,A,,)
					Rcw:(CxgpPRc,A,,)
					Rcw:(CxgpQRc,A,,)
				}//
			}//
			:(l::l.喼)==(ËMv)
			:(^){
				:(Rc::lRc.)==()
				:(^){
					aflύX:(Cxg)
					b:(叫,ËMv)[[̑叟ɂ܂I]]
					b:(ËMv,叫)[[悵Â܂܉DԂI]]
					X`\:(CxgX`,,,,tF[h)
					i[V:[[|Rōsꂽ\n(ËMv.)Ƃ(̕t.)Ƃ̐킢\n(ËMv.)Ƃ̏ɏI]]
					i[V:[[(ËMv.)R(̕t.)R̕ɑ\nnɊׂ\n𒵂ˏďނ]]
					i[V:[[(̕t.)R̎mC͒ቺ\nđRւ\nPނ鎖ɐ̂]]
					`:(l::ËMv._)
					:(::`.R)+(12000)
					:(::`.)+(30000)
					:(::`.m)+(6000)
					XV:(::`.R)()
					XV:(::`.)()
					XV:(::`.m)()
					a:(l::̕t._)
					:(::a.R)-(12000)
					:(::a.)-(30000)
					:(::a.m)-(6000)
					XV:(::a.R)()
					XV:(::a.)()
					XV:(::a.m)()
					Rcw:(lRc,A,,)
					Rcw:(CxgpPRc,A,,)
					Rcw:(CxgpQRc,A,,)
				}//
				:(U){
					b:(叫,ËMv)[[䖡Aɂ܂I]]
					b:(ËMv,叫)[[cI\nނI{wւƖ߂邼I]]
					X`\:(CxgX`,,,,tF[h)
					i[V:[[|Rōsꂽ\n(ËMv.)Ƃ(̕t.)Ƃ̐킢\n(̕t.)Ƃ̏ɏIc]]
					i[V:[[|R~̂߂ɋ}s(ËMv.)R\n(̕t.)R̕ɑsk\n{wւƋA҂]]
					i[V:[[āc]]
					wiύX:(,,tF[h)
					aflύX:(Cxg߂)
					b:(叫,ËMv)[[\グ܂I\nقǂ̐ɂ\n(ËMv.)܁AȂƁcI]]
					b:(ËMv,叫)[[Ȃ񂾂ƁIcI]]
					i[V:[[nɕzwĂ(ËMv.)\n(ËMv.)ƓlA|R̋~Ɍ]]
					i[V:[[ɑ\nGɌǗ\n(̕t.)Rɂ蓢Ă܂]]
					b:(ËMv,叫)[[ÂA(̕t.)߁I\nK⒉̋w𓢂I]]
					b:(Í΋v,ËMv)[[҂A{l̖O}I]]
					b:(ËMv,Í΋v)[[{l̖O}I̎~߂I]]
					b:(Í΋v,ËMv)[[f̎ŕ͍\nmC傫ቺĂ܂]]
					b:(Í΋v,ËMv)[[̂܂ܓ{ɔCĉU߂Ă\nQ͑΂c\n͈xԐ𗧂Ēׂł]]
					b:(ËMv,Í΋v)[[cI\nc킩A͈x\nނƂ悤]]
					i[V:[[̎ɂmCjr(ËMv.)R\n͂̕\nFւƋA҂̂ł]]
					`:(l::̕t._)
					:(::`.R)+(12000)
					:(::`.)+(30000)
					:(::`.m)+(6000)
					XV:(::`.R)()
					XV:(::`.)()
					XV:(::`.m)()
					a:(l::ËMv._)
					:(::a.R)-(12000)
					:(::a.)-(30000)
					:(::a.m)-(6000)
					XV:(::a.R)()
					XV:(::a.)()
					XV:(::a.m)()
					Rcw:(lRc,A,,)
					Rcw:(CxgpPRc,A,,)
					Rcw:(CxgpQRc,A,,)
				}//
			}//
		}//XNvg
	}//Cxg
}//`v^[