Ignore:
Timestamp:
2020-04-15T15:49:42+02:00 (5 months ago)
Author:
gsamson
Message:

ABL code cleaning and small bugfixes; modify shared and ORCA2_ICE_ABL cfgs files accordingly (ticket #2419)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2020/dev_r12563_ASINTER-06_ABL_improvement/src/ABL/abl.F90

    r12588 r12749  
    3939   REAL(wp), PUBLIC, ALLOCATABLE, DIMENSION(:,:)       ::   msk_abl 
    4040   REAL(wp), PUBLIC, ALLOCATABLE, DIMENSION(:,:)       ::   rest_eq 
    41     
    42    REAL(wp), PUBLIC, ALLOCATABLE, DIMENSION(:,:,:)     ::    cft_abl 
    43    REAL(wp), PUBLIC, ALLOCATABLE, DIMENSION(:,:  )     ::   taux_abl 
    44    REAL(wp), PUBLIC, ALLOCATABLE, DIMENSION(:,:  )     ::   tauy_abl   
    4541   ! 
    4642   INTEGER , PUBLIC :: nt_n, nt_a       !: now / after indices (equal 1 or 2) 
     
    6864         &      mxld_abl(1:jpi,1:jpj,1:jpka            ), &          
    6965         &      mxlm_abl(1:jpi,1:jpj,1:jpka            ), &  
    70          &      cft_abl (1:jpi,1:jpj,1:jpka            ), &  
    7166         &      fft_abl (1:jpi,1:jpj                   ), & 
    7267         &      pblh    (1:jpi,1:jpj                   ), &          
    73          &      taux_abl(1:jpi,1:jpj                   ), &    
    74          &      tauy_abl(1:jpi,1:jpj                   ), &         
    7568         &      msk_abl (1:jpi,1:jpj                   ), & 
    7669         &      rest_eq (1:jpi,1:jpj                   ), &          
Note: See TracChangeset for help on using the changeset viewer.