| subroutine advyp  | 
          ( | 
          logical  | 
          LIMIT,  | 
        
        
           | 
           | 
          real  | 
          DTY,  | 
        
        
           | 
           | 
          real, dimension ( iip1,jjm, llm )  | 
          PBARV,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm)  | 
          SM,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          S0,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          SSX,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          SY,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          SZ,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          SSXX,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          SSXY,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          SSXZ,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          SYY,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          SYZ,  | 
        
        
           | 
           | 
          real, dimension(iip1,jjp1,llm,ntra)  | 
          SZZ,  | 
        
        
           | 
           | 
          integer  | 
          ntra  | 
        
        
           | 
          ) | 
           |  |