Case Study 9.3: Left or Right? 
------------------------------------------------------------------
Variables: 

      FN         Site Identifier
      ID         Artifact Identifier  
      L,W,T      Length, Width, Thickness (mm)
      MD         Maximum Dimension: max(L,W,T)

      FS         Flake Shape:  1, 2, ... , 7 
      FT         Flake Type:   2.2, 5.2 (right) 
                               2.3, 5.3 (left) 
                               1, 2.1, ... , 9 (other) 
                             
      PC         Platform Character:  1, 2, ... , 6  
      PL,PW,PA   Platform Length, Width, Angle (mm or degrees)

      TQ         Technique:     1, 2 
      RM         Raw Material:  1, 2, ... , 99 
      
      FA         Flake or Angular Fragment:  1, 2, 3 
      CN         Flake Condition:            1, 2, ... , 6  

      H          Hinge               1 = yes, 0 = no
      X          Cortex              1 = yes, 0 = no 
      R          Ridge               1 = yes, 0 = no 
      E          Hinge Elimination   1 = yes, 0 = no 
      B          Dorsal Battering    1 = yes, 0 = no 
      A          Thermal Alteration  1 = yes, 0 = no 
      
------------------------------------------------------------------
SAS NOTES:

Use the following code to read the file c93.dat:

options ps=56 ls=78 formdlim=' ' ;
filename in 'c93.dat' ;

data a1 ;
        infile in ;
        if _N_ = 1 then fn = 0 ; retain fn ;
        input catnum $ @ ;
        if(catnum = 'echo') then
                do ;
                        fn = fn + 1 ;
                        k = 0 ;
                        input fname $ ;
                        retain fn k  ;
                end ;
        else
                do ;
                        k = k + 1 ;
                        input l w t mdx fs ft pc pl pw pa tq rm
                              fa cn h x r e b a comment $  ;
                        retain fname fn k ;
                        output ;
                end ;
endsas;