$joukenA $joukenB $joukenC があるとする。
list (jA,jB,jC)（ｒｙ
　　　　　　　を読み込む
$joukenAとjAを比較して同じ、joukenBとjBを比較して同じ、joukenCとjCを比較して同じだったらTRUE
&joukenAが空白ならjoukenA以外を比較して同じならTRUEとやりたいんだ