<content> FITTING TO EMISSION DATA </content>

09ba4279-0bde-4476-aec1-0caceb179010 121 Reg Curry 4 5 false false false 0 3 decimal

&[DATE] &[TIME] - &[FILENAME]

CO₂ FORCING SATURATION STUDY

Data2 WORLD EMISSION DATA VS DATE.xlsx Sheet 2 A2:C175 importData.XLSX :

Data2 rows 174.00

Data2 1850.00 1.97 108^* 2.84 109^* 1851.00 1.99 108^* 3.02 109^* 1852.00 2.08 108^* 3.07 109^* 1853.00 2.17 108^* 3.12 109^* 1854.00 2.55 108^* 3.17 109^* 1855.00 2.60 108^* 3.14 109^* 63 mat

Date Data2 1 col :

Emission Data2 2 col 109^/ :

DATA Date Emission augment :

x Date :

FIT TO EMISSION DATA

<content> FITTING TO EMISSION DATA </content>

SMATH FIT USING al_nelqsolve

Date 165 el 2014

X Date :

Y Emission :

X max 2023

to X min eval : 1850

t u F.exp a b c 13 mat u 1 el u 2 el u 3 el 13 mat : c a e b t to - to / *^* + vectorize 21 line :

u.exp 101010 - 31 mat u φ X u F.exp Y - : al_nleqsolve : 1.4923 36.1473 2.1976 - 31 mat

u.exp 1.4923 36.1473 2.1976 - 31 mat

2014 u.exp F.exp 34.5745

TRYING TO CREATE A LINEAR FIT WHERE THE DATA LEVELS OFF BETWEEN 2014 AND 2023

t.o 2014 :

j 1100 range :

tt j el t.o j + :

tt max 2114.00

DATA2014 DATA 165 DATA rows 12 submatrix :

XX DATA2014 1 col :

YY DATA2014 2 col :

IF I USE XX IN ulin, I GET AN ERROR THAT ROWS & COLUMNS DON'T MATCH

t u fit u 1 el u 2 el t t.o - t.o / * + vectorize :

ulin 1121 mat u φ X u fit Y - : al_nleqsolve : 26.4236 416.6774 21 mat

ulin 26.4236 416.6774 21 mat

FIT2 j el ulin 1 el ulin 2 el tt j el t.o - t.o / * + :

FIT2 max 47.1126

FIT2 min 26.6305

FIT2 tt FIT2 augment :

SELECT EVERY nth CASE POINT TO PLOT

nselect 1 Data2 rows 3 range :

Xnew X nselect el :

Ynew Y nselect el :

Ynew Xnew Ynew augment :

Plot Ynew t u.exp F.exp FIT2 31 sys :

XYPlot'XAxis'Min 1850 setprop 1

XYPlot'XAxis'Tick 50 setprop 1

XYPlot'XAxis'Max 2050 setprop 1

XYPlot'YAxis'Min 10 - setprop 1

XYPlot'YAxis'Tick 50 setprop 1

XYPlot'YAxis'Max 100 setprop 1 ≡

Plot

TO GET CUMULATIVE EMISSIONS WE MUST SOLVE THE FOLLOWING ODE

t y t diff t Q λ t y * - ≡

Where Q(t) is the driving function = yearly emissions and λ = decay of CO₂ in the atmosphere.

SOLUTION TO THE ODE TO GET CUMULATIVE EMISSIONS

<content> ODE SOLUTION </content>

τ 300 :

λ 1 τ / :

enddate 2200 :

Y1 z 1850 enddate range z 2014 ≤ Y z el e λ z * -^s u.exp F.exp e λ s *^* s 1850 z int * eval : Y z el e λ z * -^2014 u.exp F.exp e λ s *^* s 2014 z int * Y 2014 el + eval : if for Y 21 line eval :

Y Y 1850 Y rows 11 submatrix :

Date 1850 enddate range :

Date min 1850

Date max 2200

Y rows 351

Date rows 351

Y Date Y 7.8 / augment :

CO2'XAxis'Min 1850 setprop 1

CO2'XAxis'Tick 50 setprop 1

CO2'XAxis'Max 2250 setprop 1

CO2'YAxis'Min 50 - setprop 1

CO2'YAxis'Tick 100 setprop 1

CO2'YAxis'Max 1000 setprop 1

Y 1 1 sys <content> END OF WORKSHEET </content>