parsing nasa thermodynamic data

Objective: clear allclose allclc %INPUTS R=8.31; %Reading of thermodynamic data file f1 = fopen(\'therm.txt\',\'r\') Header_Thermo=fgetl(f1) thermo=fgetl(f1) %skiping three lines for i=1:3skip=fgetl(f1);end %temperatute temp=linspace(200,3500,500); %Reading for i=1:300 skip=fgets(f1);Species = sscanf(skip,\'%c\')…