New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 15548 for NEMO/branches/2021/ticket2632_r14588_theta_sbcblk/tests/C1D_ASICS/MY_SRC/usrdef_nam.F90 – NEMO

Ignore:
Timestamp:
2021-11-28T18:59:49+01:00 (3 years ago)
Author:
gsamson
Message:

update branch to the head of the trunk (r15547); ticket #2632

Location:
NEMO/branches/2021/ticket2632_r14588_theta_sbcblk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/2021/ticket2632_r14588_theta_sbcblk

    • Property svn:externals

      •  

        old new  
        99 
        1010# SETTE 
        11 ^/utils/CI/sette@14244        sette 
         11^/utils/CI/sette@HEAD        sette 
         12 

  • NEMO/branches/2021/ticket2632_r14588_theta_sbcblk/tests/C1D_ASICS/MY_SRC/usrdef_nam.F90

    r14433 r15548  
    7171      kk_cfg = 0 
    7272 
    73       ! Global Domain size:  C1D domain is 3 x 3 grid-points x 75 or vertical levels 
    74       kpi = 3 
    75       kpj = 3 
     73      ! Global Domain size:  C1D domain is 1 x 1 grid-points x 75 or vertical levels 
     74      kpi = 1 
     75      kpj = 1 
    7676      kpk = 75 
    7777      !                             ! Set the lateral boundary condition of the global domain 
    78       ldIperio = .TRUE.    ;   ldJperio = .true.   ! C1D configuration : 3x3 basin with cyclic Est-West and Norht-South condition 
     78      ldIperio =  .TRUE.   ;   ldJperio = .TRUE.   ! C1D configuration : 1x1 basin with cyclic Est-West and Norht-South condition 
    7979      ldNFold  = .FALSE.   ;   cdNFtype = '-' 
    8080      ! 
    … …  
    8989         WRITE(numout,*) '         z-partial-step coordinate flag        ln_zps = ', ln_zps 
    9090         WRITE(numout,*) '         s-coordinate flag                     ln_sco = ', ln_sco 
    91          WRITE(numout,*) '      C1D domain = 3 x 3 x75 grid-points                ' 
     91         WRITE(numout,*) '      C1D domain = 1 x 1 x 75 grid-points                ' 
    9292         WRITE(numout,*) '         resulting global domain size :        jpiglo = ', kpi 
    9393         WRITE(numout,*) '                                               jpjglo = ', kpj 
    9494         WRITE(numout,*) '                                               jpkglo = ', kpk 
    95       WRITE(numout,*) '   ' 
     95         WRITE(numout,*) '   ' 
    9696      ENDIF 
    9797      ! 
Note: See TracChangeset for help on using the changeset viewer.