nasa file parasing

Objective: clear allclose all clc % going through first few lines and opening the file f1=fopen(\'thermo.dat\',\'r\')tline=fgetl(f1);tline=fgetl(f1);a=strsplit(tline,\' \'); % assigning values for elements and constantselement=[\'H\',\'N\',\'C\',\'O\',\'A\'];at_wt=[1.0078 14.0067 12.0107 15.9999 39.948]R=8.314; % reading global temp…