1 function [yn,pos]=existf(d,n)

     2 % function yn=existf(d,n)

     3 % checks for existance of variable (n) in data field (d)

     4 an=fieldnames(d);

     5 pos=strcmp(an,n);

     6 yn=sum(pos);

     7 

     8