NASA file parse

Objective: clear all close all clc count=1; k=1; l=1; fid=fopen(\'thermo30.dat.txt\',\'r\'); for j=1:5 fgetl(fid); end b=input(\'Enter the name of the species\',\'s\'); for i=1:length(b) if(b(i)==\'C\') m(l)=12; l=l+1; elseif(b(i)==\'H\') m(l)=1; l=l+1; elseif(b(i)==\'O\') m(l)=16; l=l+1; elseif(b(i)==\'N\') m(l)=14; l=l+1; elseif(b(i)~=\'…