Update thresholds, rates. Closes #220

Author: HughParsonage

DESCRIPTION

@@ -1,8 +1,8 @@
 Package: grattan
 Type: Package
 Title: Australian Tax Policy Analysis
-Version: 2024.1.0
-Date: 2024-02-23
+Version: 2025.5.0
+Date: 2025-06-12
 Authors@R: c(person("Hugh", "Parsonage", role = c("aut", "cre"), email = "hugh.parsonage@gmail.com"),
               person("Tim", "Cameron", role = "aut"),
               person("Brendan", "Coates", role = "aut"),

NEWS.md

@@ -1,3 +1,7 @@
+## 2025.5.0
+
+* Updated income tax thresholds
+
 ## 2024.1.0
 
 * Update for new TREASURY LAWS AMENDMENT (COST OF LIVING TAX CUTS) thresholds

grattan.Rproj

@@ -1,4 +1,5 @@
 Version: 1.0
+ProjectId: b970b806-fe55-47a2-9f6a-9f791934a905
 
 RestoreWorkspace: No
 SaveWorkspace: No

src/2024.c

@@ -5,8 +5,8 @@
 System System2024 = {
   .yr = 2024,
   .nb = 4,
-  .BRACKETS = {0, 18200, 45000, 200000, INT_MAX, INT_MAX, INT_MAX, INT_MAX},
-  .RATES = {0, 0.19, 0.300, 0.45, 0.45, 0.45, 0.45, 0.45},
+  .BRACKETS = {0, 18200, 45000, 120000, 180000, INT_MAX, INT_MAX, INT_MAX},
+  .RATES = {0, 0.19, 0.325, 0.37, 0.45, 0.45, 0.45, 0.45},
   .M = {
     .lwr_single = 26000,
     .upr_single = 32500,

src/2025.c

@@ -5,7 +5,7 @@
 System System2025 = {
   .yr = 2025,
   .nb = 5,
-  .BRACKETS = {0, 18200, 45000, 135000, 200000, INT_MAX, INT_MAX, INT_MAX},
+  .BRACKETS = {0, 18200, 45000, 135000, 190000, INT_MAX, INT_MAX, INT_MAX},
   .RATES = {0, 0.16, 0.300, 0.37, 0.45, 0.45, 0.45, 0.45},
   .M = {
     .lwr_single = 26000,

src/Cincome_tax.c

@@ -113,7 +113,7 @@ Person pp(int x, int y, int r, unsigned int age, bool is_married, unsigned int n
   return P;
 }
 
-static unsigned int sapto_bitwise(unsigned char x) {
+unsigned int sapto_bitwise(unsigned char x) {
   switch(x) {
   case 'A':
     return SAPTO_A;