*$ CREATE SBUSFL.ADD
*COPY SBUSFL
*
*=== sbusfl ===========================================================*
*
*----------------------------------------------------------------------*
*                                                                      *
*     Copyright (C) 1992-2005      by    Alfredo Ferrari & Paola Sala  *
*     All Rights Reserved.                                             *
*                                                                      *
*                                                                      *
*     Created on 28 january 1992   by    Alfredo Ferrari & Paola Sala  *
*                                                   Infn - Milan       *
*                                                                      *
*     Last change on 28-jan-92     by    Alfredo Ferrari               *
*                                                                      *
*     Included in the following routines (prelinmvax only):            *
*                                                                      *
*                    SBCOMP                                            *
*                    BREFRA                                            *
*                                                                      *
*----------------------------------------------------------------------*
*
      COMMON / SBUSFL / R0HLA , R0HLB , R0SKA , R0SKB , R0CEA , R0CEB ,
     &                  R1CEA , R1CEB , R1SKA , R1SKB , R1HLA , R1HLB ,
     &                  SQRH0A, SQRH0B, SQRS0A, SQRS0B, SQRC0A, SQRC0B,
     &                  SQRC1A, SQRC1B, SQRS1A, SQRS1B, SQRH1A, SQRH1B
      SAVE / SBUSFL /