function wynik=gaz(pierw)
%% funkcja zwraca 1 gdy pierwiastek jest w stanie gazowym w warunkach
%% standardowych, w innych wypadkach zwraca 0
stan = pierw.StanSkup;
if (stan =='gaz' | stan =='GAZ' | stan =='Gaz' | stan =='G' | stan =='g')
    wynik =1;
else
    wynik = 0;
end
