diff options
Diffstat (limited to 'GradeBook_lib.tcl')
| -rwxr-xr-x | GradeBook_lib.tcl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index e9807db..702a2df 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -39,6 +39,7 @@ proc get_default_grading_scheme {} { # pair of letter grade and lower boundary for this grade # should be sorted in descended order! set grading_scheme [ list \ + A+ 100 \ A 0.94 \ A- 0.90 \ B+ 0.87 \ @@ -50,7 +51,7 @@ proc get_default_grading_scheme {} { D+ 0.67 \ D 0.64 \ D- 0.60 \ - F 0.00 \ + F -100 \ ] return $grading_scheme } |