include file: TYPWVSD 1
c       local diagnostic arrays passed through argument list               TYPWVSD.2      
c THIS set for full grid - pass down to WAMODEL                            TYPWVSD.3      
c                                                                          TYPWVSD.4      
       real sinp (len_sd)                                                  TYPWVSD.5      
       real snl (len_sd)                                                   TYPWVSD.6      
       real sds (len_sd)                                                   TYPWVSD.7      
       real sbf (len_sd)                                                   TYPWVSD.8      
       real stl (len_sd)                                                   TYPWVSD.9      
c                                                                          TYPWVSD.10