少しサボったので11章まで。 List.lengthを使わない2つのリストの長さが等しいかのチェックはなるほどと思いました。 let rec equal_length l1 l2 = match (l1, l2) with | ([], []) -> true | ([], _) -> false | (_, []) -> false | (f1::r1, f2::r2) -> e…