open System
 
type subject = {point: int}
type student = {subjects: subject list}
type classroom = {students: student list}
 
[<EntryPoint>]
let main argv =
    let data = {students = [
        {subjects = [{point = 10}; {point = 20}]};
        {subjects = [{point = 20}; {point = 30}]};
        {subjects = [{point = 30}; {point = 40}]};
        {subjects = [{point = 40}; {point = 50}]};
        ]}
    // クラス合計
 
    // 生徒ごとの合計
 
 
    0

b3BlbiBTeXN0ZW0KCnR5cGUgc3ViamVjdCA9IHtwb2ludDogaW50fQp0eXBlIHN0dWRlbnQgPSB7c3ViamVjdHM6IHN1YmplY3QgbGlzdH0KdHlwZSBjbGFzc3Jvb20gPSB7c3R1ZGVudHM6IHN0dWRlbnQgbGlzdH0KCls8RW50cnlQb2ludD5dCmxldCBtYWluIGFyZ3YgPQogICAgbGV0IGRhdGEgPSB7c3R1ZGVudHMgPSBbCiAgICAgICAge3N1YmplY3RzID0gW3twb2ludCA9IDEwfTsge3BvaW50ID0gMjB9XX07CiAgICAgICAge3N1YmplY3RzID0gW3twb2ludCA9IDIwfTsge3BvaW50ID0gMzB9XX07CiAgICAgICAge3N1YmplY3RzID0gW3twb2ludCA9IDMwfTsge3BvaW50ID0gNDB9XX07CiAgICAgICAge3N1YmplY3RzID0gW3twb2ludCA9IDQwfTsge3BvaW50ID0gNTB9XX07CiAgICAgICAgXX0KICAgIC8vIOOCr+ODqeOCueWQiOioiAogICAgCiAgICAvLyDnlJ/lvpLjgZTjgajjga7lkIjoqIgKICAgIAogICAgCiAgICAw