このディレクトリの索引

# 出典 :: twitter_by_@yantene_20150911 # 受験番号、 # 先頭二桁が入学年度(2016年度)、 # 次の一桁が受験先学年種別(博士前期)、 # 次の一桁が試験種別(学内入試)、 # 次の一桁が受験先系(3系)、 # 最後三桁が連番、といったところかな? 'といったところかな?'. '受験番号、 先頭二桁が入学年度(2016年度)、 次の一桁が受験先学年種別(博士前期)、 次の一桁が試験種別(学内入試)、 次の一桁が受験先系(3系)、 最後三桁が連番、といったところかな?'(_受験番号,_年度,_受験先学年種別,_試験種別,_受験先系,_連番) :- '受験番号、'(_受験番号,_年度,_受験先学年種別,_試験種別,_受験先系,_連番). '受験番号、'(_受験番号,_年度,_受験先学年種別,_試験種別,_受験先系,_連番) :- 先頭二桁が入学年度(_受験番号,_年度), 次の一桁が受験先学年種別(_受験番号,_受験先学年種別), 次の一桁が試験種別(_受験番号,_試験種別), 次の一桁が受験先系(_受験番号,_受験先系), 最後三桁が連番(_受験番号,_連番), 'といったところかな?'. 先頭二桁が入学年度(_受験番号,_年度) :- 整数の西暦年を得る(_受験番号,_整数の西暦年), atom_number(_年度数字列,_整数の西暦年), atom_concat(_年度数字列,年度,_年度). 整数の西暦年を得る(_受験番号,_整数の西暦年) :- sub_atom(_受験番号,0,2,_,_年度_1), atom_number(_年度_1,_整数の西暦年の下2桁), _整数の西暦年 is _整数の西暦年の下2桁 + 2000. 次の一桁が受験先学年種別(_受験番号,_受験先学年種別) :- sub_atom(_受験番号,2,1,_,_受験先学年種別コード), 受験先学年種別コード(_受験先学年種別,_受験先学年種別コード). 受験先学年種別コード(修士過程,'1'). 受験先学年種別コード(博士過程前期,'2'). 受験先学年種別コード(博士過程後期,'3'). 次の一桁が試験種別(_受験番号,_試験種別) :- sub_atom(_受験番号,3,1,_,_試験種別コード), 試験種別コード(_試験種別,_試験種別コード). 試験種別コード(学内入試,'1'). 試験種別コード(学外入試,'2'). 次の一桁が受験先系(_受験番号,_受験先系) :- sub_atom(_受験番号,4,1,_,_受験先系コード), 受験先系コード('1系','1'). 受験先系コード('2系','2'). 受験先系コード('3系','3'). 最後の三桁が連番(_受験番号,_連番) :- sub_atom(_受験番号,5,3,_,_連番).