# fog index
cat $1|
awk 'BEGIN { r=ds9=ds5=dsJ=all=0; } \
{     
   r=length($1);
   if (r>1 || $2!="" ) 
    { 
      if (r>12) ds13++; 
       else
        if (r>8) ds9++ ;
        else   
         if (r<5) ds5++ ;
           else dsJ++;
      all++;
    }; 
} 
END \
{ 
  

  printf "Fog index- dlouha nad 8 ku vsem: \t %f(\%)\n",ds9/all;
  printf "Fog index- dlouha nad 8 ku kratkym pod 5: %f\n",ds9/ds5;
  printf "Fog index- dlouha nad 12 ku vsem: \t %f (\%)\n",ds13/all;
  printf "Fog index- dlouha nad 12 ku kratkym pod 5: %f\n",ds13/ds5;
  printf "Fog index- kratka pod 5 ku vsem:\t %f (\%)\n",ds5/all;


}'

