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 10763 for NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC – NEMO

Ignore:
Timestamp:
2019-03-15T13:10:04+01:00 (5 years ago)
Author:
jcastill
Message:

Remove svn keywords properly

Location:
NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC
Files:
27 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/albedo.F90

    r10762 r10763  
    4343   !!---------------------------------------------------------------------- 
    4444   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    45    !! $Id: albedo.F90 7813 2017-03-20 16:17:45Z clem $ 
     45   !! $Id$ 
    4646   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    4747   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/cpl_oasis3.F90

    r10762 r10763  
    8686   !!---------------------------------------------------------------------- 
    8787   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    88    !! $Id: cpl_oasis3.F90 7851 2017-03-30 14:03:21Z cetlod $ 
     88   !! $Id$ 
    8989   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    9090   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/cyclone.F90

    r10762 r10763  
    4141   !!---------------------------------------------------------------------- 
    4242   !! NEMO/OPA 3.3 , LOCEAN-IPSL (2010)  
    43    !! $Id: cyclone.F90 7646 2017-02-06 09:25:03Z timgraham $  
     43   !! $Id$ 
    4444   !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) 
    4545   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/fldread.F90

    r10762 r10763  
    125125   !!---------------------------------------------------------------------- 
    126126   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    127    !! $Id: fldread.F90 7646 2017-02-06 09:25:03Z timgraham $ 
     127   !! $Id$ 
    128128   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    129129   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/geo2ocean.F90

    r10762 r10763  
    4747   !!---------------------------------------------------------------------- 
    4848   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    49    !! $Id: geo2ocean.F90 7753 2017-03-03 11:46:59Z mocavero $  
     49   !! $Id$ 
    5050   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    5151   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbc_ice.F90

    r10762 r10763  
    122122   !!---------------------------------------------------------------------- 
    123123   !! NEMO/OPA 4.0 , NEMO Consortium (2011) 
    124    !! $Id: sbc_ice.F90 6416 2016-04-01 12:22:17Z clem $  
     124   !! $Id$ 
    125125   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    126126   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbc_oce.F90

    r10762 r10763  
    139139   !!---------------------------------------------------------------------- 
    140140   !! NEMO/OPA 4.0 , NEMO Consortium (2011) 
    141    !! $Id: sbc_oce.F90 7788 2017-03-11 09:40:59Z cetlod $ 
     141   !! $Id$ 
    142142   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    143143   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcapr.F90

    r10762 r10763  
    4141   !!---------------------------------------------------------------------- 
    4242   !! NEMO/OPA 4.0 , NEMO Consortium (2011)  
    43    !! $Id: sbcapr.F90 6140 2015-12-21 11:35:23Z timgraham $ 
     43   !! $Id$ 
    4444   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    4545   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcblk.F90

    r10762 r10763  
    126126   !!---------------------------------------------------------------------- 
    127127   !! NEMO/OPA 3.7 , NEMO-consortium (2014) 
    128    !! $Id: sbcblk.F90 6416 2016-04-01 12:22:17Z clem $ 
     128   !! $Id$ 
    129129   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    130130   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

    r10762 r10763  
    192192   !!---------------------------------------------------------------------- 
    193193   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    194    !! $Id: sbccpl.F90 8329 2017-07-13 14:14:54Z rblod $ 
     194   !! $Id$ 
    195195   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    196196   !!---------------------------------------------------------------------- 
    … …  
    210210      ALLOCATE( a_i(jpi,jpj,1) , STAT=ierr(2) )  ! used in sbcice_if.F90 (done here as there is no sbc_ice_if_init) 
    211211#endif 
    212       !ALLOCATE( xcplmask(jpi,jpj,nn_cplmodel) , STAT=ierr(3) )    
    213       ! Hardwire three models as nn_cplmodel has not been read in from the namelist yet.    
    214       ALLOCATE( xcplmask(jpi,jpj,0:3) , STAT=ierr(3) ) 
     212      ALLOCATE( xcplmask(jpi,jpj,0:nn_cplmodel) , STAT=ierr(3) ) 
    215213      ! 
    216214      IF( .NOT. ln_apr_dyn ) ALLOCATE( ssh_ib(jpi,jpj), ssh_ibb(jpi,jpj), apr(jpi, jpj), STAT=ierr(4) )  
    … …  
    320318 
    321319      !                                   ! allocate sbccpl arrays 
    322       !IF( sbc_cpl_alloc() /= 0 )   CALL ctl_stop( 'STOP', 'sbc_cpl_alloc : unable to allocate arrays' ) 
     320      IF( sbc_cpl_alloc() /= 0 )   CALL ctl_stop( 'STOP', 'sbc_cpl_alloc : unable to allocate arrays' ) 
    323321      
    324322      ! ================================ ! 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcdcy.F90

    r10762 r10763  
    3232   !!---------------------------------------------------------------------- 
    3333   !! NEMO/OPA 3.3 , NEMO-consortium (2010)  
    34    !! $Id: sbcdcy.F90 6140 2015-12-21 11:35:23Z timgraham $  
     34   !! $Id$ 
    3535   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    3636   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcflx.F90

    r10762 r10763  
    4141   !!---------------------------------------------------------------------- 
    4242   !! NEMO/OPA 3.3 , NEMO-consortium (2010)  
    43    !! $Id: sbcflx.F90 6140 2015-12-21 11:35:23Z timgraham $ 
     43   !! $Id$ 
    4444   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    4545   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcfwb.F90

    r10762 r10763  
    4343   !!---------------------------------------------------------------------- 
    4444   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    45    !! $Id: sbcfwb.F90 6140 2015-12-21 11:35:23Z timgraham $ 
     45   !! $Id$ 
    4646   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    4747   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90

    r10762 r10763  
    9292   !!---------------------------------------------------------------------- 
    9393   !! NEMO/OPA 3.7 , NEMO-consortium (2015)  
    94    !! $Id: sbcice_cice.F90 7646 2017-02-06 09:25:03Z timgraham $ 
     94   !! $Id$ 
    9595   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    9696   !!---------------------------------------------------------------------- 
    … …  
    286286      CALL wrk_dealloc( jpi,jpj, ztmp1, ztmp2 ) 
    287287      ! 
    288       ! In coupled mode get extra fields from CICE for passing back to atmosphere  
    289       IF ( ksbc == jp_purecpl ) CALL cice_sbc_hadgam(nit000)  
    290       ! 
    291288      IF( nn_timing == 1 )  CALL timing_stop('cice_sbc_init') 
    292289      ! 
    … …  
    711708      IF( nn_timing == 1 )  CALL timing_start('cice_sbc_hadgam') 
    712709      ! 
     710      IF( kt == nit000 )  THEN 
     711         IF(lwp) WRITE(numout,*)'cice_sbc_hadgam' 
     712         IF( sbc_cpl_alloc() /= 0 )   CALL ctl_stop( 'STOP', 'sbc_cpl_alloc : unable to allocate arrays' ) 
     713      ENDIF 
     714 
    713715      !                                         ! =========================== ! 
    714716      !                                         !   Prepare Coupling fields   ! 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_if.F90

    r10762 r10763  
    3636   !!---------------------------------------------------------------------- 
    3737   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    38    !! $Id: sbcice_if.F90 7646 2017-02-06 09:25:03Z timgraham $ 
     38   !! $Id$ 
    3939   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    4040   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_lim.F90

    r10762 r10763  
    7979   !!---------------------------------------------------------------------- 
    8080   !! NEMO/OPA 4.0 , UCL NEMO Consortium (2011) 
    81    !! $Id: sbcice_lim.F90 7777 2017-03-09 14:19:04Z clem $ 
     81   !! $Id$ 
    8282   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    8383   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_lim_2.F90

    r10762 r10763  
    6565   !!---------------------------------------------------------------------- 
    6666   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    67    !! $Id: sbcice_lim_2.F90 7646 2017-02-06 09:25:03Z timgraham $ 
     67   !! $Id$ 
    6868   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    6969   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcisf.F90

    r10762 r10763  
    7272   !!---------------------------------------------------------------------- 
    7373   !! NEMO/OPA 3.7 , LOCEAN-IPSL (2015) 
    74    !! $Id: sbcisf.F90 8329 2017-07-13 14:14:54Z rblod $ 
     74   !! $Id$ 
    7575   !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) 
    7676   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

    r10762 r10763  
    6868   !!---------------------------------------------------------------------- 
    6969   !! NEMO/OPA 4.0 , NEMO-consortium (2016)  
    70    !! $Id: sbcmod.F90 7822 2017-03-22 13:31:08Z clem $ 
     70   !! $Id$ 
    7171   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    7272   !!---------------------------------------------------------------------- 
    … …  
    290290      !                             !* OASIS initialization 
    291291      ! 
    292       IF( lk_oasis ) THEN  
    293          IF( sbc_cpl_alloc() /= 0 )   CALL ctl_stop( 'STOP', 'sbc_cpl_alloc : unable to allocate arrays' )   
    294          CALL sbc_cpl_init( nn_ice )   ! Must be done before: (1) first time step  
    295                                        !                      (2) the use of nn_fsbc  
    296       ENDIF 
     292      IF( lk_oasis )   CALL sbc_cpl_init( nn_ice )   ! Must be done before: (1) first time step 
     293      !                                              !                      (2) the use of nn_fsbc 
    297294      !     nn_fsbc initialization if OPA-SAS coupling via OASIS 
    298295      !     SAS time-step has to be declared in OASIS (mandatory) -> nn_fsbc has to be modified accordingly 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcrnf.F90

    r10762 r10763  
    7171   !!---------------------------------------------------------------------- 
    7272   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    73    !! $Id: sbcrnf.F90 7968 2017-04-26 07:02:56Z clem $ 
     73   !! $Id$ 
    7474   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    7575   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcssm.F90

    r10762 r10763  
    3333   !!---------------------------------------------------------------------- 
    3434   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    35    !! $Id: sbcssm.F90 7753 2017-03-03 11:46:59Z mocavero $ 
     35   !! $Id$ 
    3636   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    3737   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcssr.F90

    r10762 r10763  
    4949   !!---------------------------------------------------------------------- 
    5050   !! NEMO/OPA 4.0 , NEMO Consortium (2011) 
    51    !! $Id: sbcssr.F90 7753 2017-03-03 11:46:59Z mocavero $ 
     51   !! $Id$ 
    5252   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    5353   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbctide.F90

    r10762 r10763  
    3333   !!---------------------------------------------------------------------- 
    3434   !! NEMO/OPA 3.5 , NEMO Consortium (2013) 
    35    !! $Id: sbctide.F90 7646 2017-02-06 09:25:03Z timgraham $ 
     35   !! $Id$ 
    3636   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    3737   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/sbcwave.F90

    r10762 r10763  
    6868   !!---------------------------------------------------------------------- 
    6969   !! NEMO/OPA 3.7 , NEMO Consortium (2014)  
    70    !! $Id: sbcwave.F90 7864 2017-03-31 15:40:41Z emanuelaclementi $ 
     70   !! $Id$ 
    7171   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    7272   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/tide_mod.F90

    r10762 r10763  
    3535   !!---------------------------------------------------------------------- 
    3636   !! NEMO/OPA 3.3 , LOCEAN-IPSL (2010)  
    37    !! $Id: tide_mod.F90 5215 2015-04-15 16:11:56Z nicolasmartin $  
     37   !! $Id$ 
    3838   !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) 
    3939   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/tideini.F90

    r10762 r10763  
    3636   !!---------------------------------------------------------------------- 
    3737   !! NEMO/OPA 3.5 , NEMO Consortium (2013) 
    38    !! $Id: tideini.F90 7646 2017-02-06 09:25:03Z timgraham $ 
     38   !! $Id$ 
    3939   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    4040   !!---------------------------------------------------------------------- 

  • NEMO/branches/UKMO/r8395_coupling_sequence/NEMOGCM/NEMO/OPA_SRC/SBC/updtide.F90

    r10762 r10763  
    2222   !!---------------------------------------------------------------------- 
    2323   !! NEMO/OPA 3.3 , NEMO Consortium (2010) 
    24    !! $Id: updtide.F90 7646 2017-02-06 09:25:03Z timgraham $ 
     24   !! $Id$ 
    2525   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    2626   !!---------------------------------------------------------------------- 
Note: See TracChangeset for help on using the changeset viewer.