| subroutine PARAM_CLS | ( | REAL, dimension(:), intent(in) | PTA, | 
        
          |  |  | REAL, dimension(:), intent(in) | PTS, | 
        
          |  |  | REAL, dimension(:), intent(in) | PQA, | 
        
          |  |  | REAL, dimension(:), intent(in) | PPA, | 
        
          |  |  | REAL, dimension(:), intent(in) | PRHOA, | 
        
          |  |  | REAL, dimension(:), intent(in) | PZONA, | 
        
          |  |  | REAL, dimension(:), intent(in) | PMERA, | 
        
          |  |  | REAL, dimension(:), intent(in) | PH, | 
        
          |  |  | REAL, dimension(:), intent(in) | PHW, | 
        
          |  |  | REAL, dimension(:), intent(in) | PSFTH, | 
        
          |  |  | REAL, dimension(:), intent(in) | PSFTQ, | 
        
          |  |  | REAL, dimension(:), intent(in) | PSFZON, | 
        
          |  |  | REAL, dimension(:), intent(in) | PSFMER, | 
        
          |  |  | REAL, dimension(:), intent(out) | PT2M, | 
        
          |  |  | REAL, dimension(:), intent(out) | PQ2M, | 
        
          |  |  | REAL, dimension(:), intent(out) | PHU2M, | 
        
          |  |  | REAL, dimension(:), intent(out) | PZON10M, | 
        
          |  |  | REAL, dimension(:), intent(out) | PMER10M | 
        
          |  | ) |  |  |