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 3105 for branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM – NEMO

Ignore:
Timestamp:
2011-11-15T12:33:20+01:00 (13 years ago)
Author:
poddo
Message:

Rename mfs bulk routine, namelist and doc files

Location:
branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM
Files:
1 added
1 deleted
8 edited

Legend:

Unmodified
Added
Removed

  • branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM/CONFIG/GYRE/EXP00/namelist

    r3104 r3105  
    110110!!   namsbc_ana      analytical         formulation 
    111111!!   namsbc_flx      flux               formulation 
    112 !!   namsbc_clio     CLIO bulk formulea formulation 
    113 !!   namsbc_core     CORE bulk formulea formulation 
     112!!   namsbc_clio     CLIO bulk formulae formulation 
     113!!   namsbc_core     CORE bulk formulae formulation 
     114!!   namsbc_mfs      MFS  bulk formulae formulation 
    114115!!   namsbc_cpl      CouPLed            formulation                     ("key_coupled") 
    115116!!   namsbc_cpl_co2  coupled ocean/biogeo/atmosphere model              ("key_cpl_carbon_cycle") 
    … …  
    130131   ln_blk_clio = .false.   !  CLIO bulk formulation                     (T => fill namsbc_clio)  
    131132   ln_blk_core = .false.   !  CORE bulk formulation                     (T => fill namsbc_core)  
    132    ln_blk_ecmwf= .false.   !  MFS bulk formulation                      (T => fill namsbc_ecmwf) 
     133   ln_blk_mfs  = .false.   !  MFS bulk formulation                      (T => fill namsbc_mfs ) 
    133134   ln_cpl      = .false.   !  Coupled formulation                       (T => fill namsbc_cpl ) 
    134135   ln_apr_dyn  = .false.   !  Patm gradient added in ocean & ice Eqs.   (T => fill namsbc_apr ) 
    … …  
    169170/       
    170171!----------------------------------------------------------------------- 
    171 &namsbc_clio   !   namsbc_clio  CLIO bulk formulea 
     172&namsbc_clio   !   namsbc_clio  CLIO bulk formulae 
    172173!----------------------------------------------------------------------- 
    173174!              !  file name  ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 
    … …  
    184185/ 
    185186!----------------------------------------------------------------------- 
    186 &namsbc_core   !   namsbc_core  CORE bulk formulea 
     187&namsbc_core   !   namsbc_core  CORE bulk formulae 
    187188!----------------------------------------------------------------------- 
    188189!              !  file name  ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 
    … …  
    204205/ 
    205206!----------------------------------------------------------------------- 
    206 &namsbc_ecmwf   !   namsbc_ecmwf  MFS bulk formulea 
     207&namsbc_mfs   !   namsbc_mfs  MFS bulk formulae 
    207208!----------------------------------------------------------------------- 
    208209!              !  file name  ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 

  • branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM/CONFIG/ORCA2_LIM/EXP00/namelist

    r3104 r3105  
    110110!!   namsbc_ana      analytical         formulation 
    111111!!   namsbc_flx      flux               formulation 
    112 !!   namsbc_clio     CLIO bulk formulea formulation 
    113 !!   namsbc_core     CORE bulk formulea formulation 
     112!!   namsbc_clio     CLIO bulk formulae formulation 
     113!!   namsbc_core     CORE bulk formulae formulation 
     114!!   namsbc_mfs      MFS  bulk formulae formulation 
    114115!!   namsbc_cpl      CouPLed            formulation                     ("key_coupled") 
    115116!!   namsbc_cpl_co2  coupled ocean/biogeo/atmosphere model              ("key_cpl_carbon_cycle") 
    … …  
    130131   ln_blk_clio = .false.   !  CLIO bulk formulation                     (T => fill namsbc_clio)  
    131132   ln_blk_core = .true.    !  CORE bulk formulation                     (T => fill namsbc_core)  
    132    ln_blk_ecmwf= .false.   !  MFS bulk formulation                      (T => fill namsbc_ecmwf) 
     133   ln_blk_mfs  = .false.   !  MFS bulk formulation                      (T => fill namsbc_mfs ) 
    133134   ln_cpl      = .false.   !  Coupled formulation                       (T => fill namsbc_cpl ) 
    134135   ln_apr_dyn  = .false.   !  Patm gradient added in ocean & ice Eqs.   (T => fill namsbc_apr ) 
    … …  
    169170/       
    170171!----------------------------------------------------------------------- 
    171 &namsbc_clio   !   namsbc_clio  CLIO bulk formulea 
     172&namsbc_clio   !   namsbc_clio  CLIO bulk formulae 
    172173!----------------------------------------------------------------------- 
    173174!              !  file name  ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 
    … …  
    184185/ 
    185186!----------------------------------------------------------------------- 
    186 &namsbc_core   !   namsbc_core  CORE bulk formulea 
     187&namsbc_core   !   namsbc_core  CORE bulk formulae 
    187188!----------------------------------------------------------------------- 
    188189!              !  file name                    ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 
    … …  
    204205/ 
    205206!----------------------------------------------------------------------- 
    206 &namsbc_ecmwf   !   namsbc_ecmwf  MFS bulk formulea 
     207&namsbc_mfs   !   namsbc_mfs  MFS bulk formulae 
    207208!----------------------------------------------------------------------- 
    208209!              !  file name  ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 

  • branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM/CONFIG/ORCA2_OFF_PISCES/EXP00/namelist

    r3104 r3105  
    110110!!   namsbc_ana      analytical         formulation 
    111111!!   namsbc_flx      flux               formulation 
    112 !!   namsbc_clio     CLIO bulk formulea formulation 
    113 !!   namsbc_core     CORE bulk formulea formulation 
     112!!   namsbc_clio     CLIO bulk formulae formulation 
     113!!   namsbc_core     CORE bulk formulae formulation 
     114!!   namsbc_mfs      MFS  bulk formulae formulation 
    114115!!   namsbc_cpl      CouPLed            formulation                     ("key_coupled") 
    115116!!   namsbc_cpl_co2  coupled ocean/biogeo/atmosphere model              ("key_cpl_carbon_cycle") 
    … …  
    130131   ln_blk_clio = .false.   !  CLIO bulk formulation                     (T => fill namsbc_clio)  
    131132   ln_blk_core = .true.    !  CORE bulk formulation                     (T => fill namsbc_core)  
    132    ln_blk_ecmwf= .false.   !  MFS bulk formulation                      (T => fill namsbc_ecmwf) 
     133   ln_blk_mfs  = .false.   !  MFS bulk formulation                      (T => fill namsbc_mfs ) 
    133134   ln_cpl      = .false.   !  Coupled formulation                       (T => fill namsbc_cpl ) 
    134135   ln_apr_dyn  = .false.   !  Patm gradient added in ocean & ice Eqs.   (T => fill namsbc_apr ) 
    … …  
    169170/       
    170171!----------------------------------------------------------------------- 
    171 &namsbc_clio   !   namsbc_clio  CLIO bulk formulea 
     172&namsbc_clio   !   namsbc_clio  CLIO bulk formulae 
    172173!----------------------------------------------------------------------- 
    173174!              !  file name  ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 
    … …  
    184185/ 
    185186!----------------------------------------------------------------------- 
    186 &namsbc_core   !   namsbc_core  CORE bulk formulea 
     187&namsbc_core   !   namsbc_core  CORE bulk formulae 
    187188!----------------------------------------------------------------------- 
    188189!              !  file name                    ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 
    … …  
    204205/ 
    205206!----------------------------------------------------------------------- 
    206 &namsbc_ecmwf   !   namsbc_ecmwf  MFS bulk formulea 
     207&namsbc_mfs   !   namsbc_mfs  MFS bulk formulae 
    207208!----------------------------------------------------------------------- 
    208209!              !  file name  ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 

  • branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM/CONFIG/POMME/EXP00/namelist

    r3104 r3105  
    110110!!   namsbc_ana      analytical         formulation 
    111111!!   namsbc_flx      flux               formulation 
    112 !!   namsbc_clio     CLIO bulk formulea formulation 
    113 !!   namsbc_core     CORE bulk formulea formulation 
     112!!   namsbc_clio     CLIO bulk formulae formulation 
     113!!   namsbc_core     CORE bulk formulae formulation 
     114!!   namsbc_mfs      MFS  bulk formulae formulation 
    114115!!   namsbc_cpl      CouPLed            formulation                     ("key_coupled") 
    115116!!   namsbc_cpl_co2  coupled ocean/biogeo/atmosphere model              ("key_cpl_carbon_cycle") 
    … …  
    130131   ln_blk_clio = .false.   !  CLIO bulk formulation                     (T => fill namsbc_clio)  
    131132   ln_blk_core = .true.    !  CORE bulk formulation                     (T => fill namsbc_core)  
    132    ln_blk_ecmwf= .false.   !  MFS bulk formulation                      (T => fill namsbc_ecmwf) 
     133   ln_blk_mfs  = .false.   !  MFS bulk formulation                      (T => fill namsbc_mfs ) 
    133134   ln_cpl      = .false.   !  Coupled formulation                       (T => fill namsbc_cpl ) 
    134135   ln_apr_dyn  = .false.   !  Patm gradient added in ocean & ice Eqs.   (T => fill namsbc_apr ) 
    … …  
    169170/       
    170171!----------------------------------------------------------------------- 
    171 &namsbc_clio   !   namsbc_clio  CLIO bulk formulea 
     172&namsbc_clio   !   namsbc_clio  CLIO bulk formulae 
    172173!----------------------------------------------------------------------- 
    173174!              !  file name  ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 
    … …  
    184185/ 
    185186!----------------------------------------------------------------------- 
    186 &namsbc_core   !   namsbc_core  CORE bulk formulea 
     187&namsbc_core   !   namsbc_core  CORE bulk formulae 
    187188!----------------------------------------------------------------------- 
    188189!              !   file name      ! frequency (hours) ! variable   ! time interp.   !  clim   ! 'yearly'/ ! weights  ! rotation ! 
    … …  
    204205/ 
    205206!----------------------------------------------------------------------- 
    206 &namsbc_ecmwf   !   namsbc_ecmwf  MFS bulk formulea 
     207&namsbc_mfs   !   namsbc_mfs  MFS bulk formulae 
    207208!----------------------------------------------------------------------- 
    208209!              !  file name  ! frequency (hours) ! variable  ! time interp. !  clim  ! 'yearly'/ ! weights  ! rotation ! 

  • branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM/NEMO/OPA_SRC/SBC/sbc_oce.F90

    r3104 r3105  
    3333   LOGICAL , PUBLIC ::   ln_blk_clio = .FALSE.   !: CLIO bulk formulation 
    3434   LOGICAL , PUBLIC ::   ln_blk_core = .FALSE.   !: CORE bulk formulation 
    35    LOGICAL , PUBLIC ::   ln_blk_ecmwf= .FALSE.   !: MFS  bulk formulation 
     35   LOGICAL , PUBLIC ::   ln_blk_mfs  = .FALSE.   !: MFS  bulk formulation 
    3636   LOGICAL , PUBLIC ::   ln_cpl      = .FALSE.   !: coupled   formulation (overwritten by key_sbc_coupled ) 
    3737   LOGICAL , PUBLIC ::   ln_dm2dc    = .FALSE.   !: Daily mean to Diurnal Cycle short wave (qsr) 

  • branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM/NEMO/OPA_SRC/SBC/sbcblk_core.F90

    r3104 r3105  
    4444   PUBLIC   sbc_blk_core         ! routine called in sbcmod module 
    4545   PUBLIC   blk_ice_core         ! routine called in sbc_ice_lim module 
    46    PUBLIC   turb_core_2z         ! routine calles in sbcblk_ecmwf module 
     46   PUBLIC   turb_core_2z         ! routine calles in sbcblk_mfs module 
    4747 
    4848   INTEGER , PARAMETER ::   jpfld   = 9           ! maximum number of files to read  

  • branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

    r3104 r3105  
    2929   USE sbcblk_clio      ! surface boundary condition: bulk formulation : CLIO 
    3030   USE sbcblk_core      ! surface boundary condition: bulk formulation : CORE 
    31    USE sbcblk_ecmwf     ! surface boundary condition: bulk formulation : MFS 
     31   USE sbcblk_mfs       ! surface boundary condition: bulk formulation : MFS 
    3232   USE sbcice_if        ! surface boundary condition: ice-if sea-ice model 
    3333   USE sbcice_lim       ! surface boundary condition: LIM 3.0 sea-ice model 
    … …  
    8080      !! 
    8181      NAMELIST/namsbc/ nn_fsbc   , ln_ana , ln_flx  , ln_blk_clio, ln_blk_core, ln_cpl,   & 
    82          &             ln_blk_ecmwf, ln_apr_dyn, nn_ice , ln_dm2dc, ln_rnf, ln_ssr     , nn_fwb, ln_cdgw 
     82         &             ln_blk_mfs, ln_apr_dyn, nn_ice , ln_dm2dc, ln_rnf, ln_ssr     , nn_fwb, ln_cdgw 
    8383      !!---------------------------------------------------------------------- 
    8484 
    … …  
    110110         WRITE(numout,*) '              CLIO bulk  formulation                     ln_blk_clio = ', ln_blk_clio 
    111111         WRITE(numout,*) '              CORE bulk  formulation                     ln_blk_core = ', ln_blk_core 
    112          WRITE(numout,*) '              MFS  bulk  formulation                     ln_blk_ecmwf= ', ln_blk_ecmwf 
     112         WRITE(numout,*) '              MFS  bulk  formulation                     ln_blk_mfs  = ', ln_blk_mfs 
    113113         WRITE(numout,*) '              coupled    formulation (T if key_sbc_cpl)  ln_cpl      = ', ln_cpl 
    114114         WRITE(numout,*) '           Misc. options of sbc : ' 
    … …  
    158158         &   CALL ctl_warn( 'diurnal cycle for qsr: the sampling of the diurnal cycle is too small...' ) 
    159159 
    160        !drag coefficient read from wave model definable only with ecmwf bulk formulae and core  
    161        IF(ln_cdgw .AND. .NOT.(ln_blk_ecmwf .OR. ln_blk_core) )              & 
    162           &   CALL ctl_stop( 'drag coefficient read from wave model definable only with ecmwf bulk formulae and core') 
     160       !drag coefficient read from wave model definable only with mfs bulk formulae and core  
     161       IF(ln_cdgw .AND. .NOT.(ln_blk_mfs .OR. ln_blk_core) )              & 
     162          &   CALL ctl_stop( 'drag coefficient read from wave model definable only with mfs bulk formulae and core') 
    163163       
    164164      !                          ! Choice of the Surface Boudary Condition (set nsbc) 
    … …  
    168168      IF( ln_blk_clio     ) THEN   ;   nsbc =  3   ; icpt = icpt + 1   ;   ENDIF       ! CLIO bulk       formulation 
    169169      IF( ln_blk_core     ) THEN   ;   nsbc =  4   ; icpt = icpt + 1   ;   ENDIF       ! CORE bulk       formulation 
    170       IF( ln_blk_ecmwf    ) THEN   ;   nsbc =  6   ; icpt = icpt + 1   ;   ENDIF       ! MFS  bulk       formulation 
     170      IF( ln_blk_mfs      ) THEN   ;   nsbc =  6   ; icpt = icpt + 1   ;   ENDIF       ! MFS  bulk       formulation 
    171171      IF( ln_cpl          ) THEN   ;   nsbc =  5   ; icpt = icpt + 1   ;   ENDIF       ! Coupled         formulation 
    172172      IF( cp_cfg == 'gyre') THEN   ;   nsbc =  0                       ;   ENDIF       ! GYRE analytical formulation 
    … …  
    248248      CASE(  4 )   ;   CALL sbc_blk_core( kt )                    ! bulk formulation : CORE for the ocean 
    249249      CASE(  5 )   ;   CALL sbc_cpl_rcv ( kt, nn_fsbc, nn_ice )   ! coupled formulation 
    250       CASE(  6 )   ;   CALL sbc_blk_ecmwf( kt )                   ! bulk formulation : MFS for the ocean 
     250      CASE(  6 )   ;   CALL sbc_blk_mfs ( kt )                    ! bulk formulation : MFS for the ocean 
    251251      CASE( -1 )                                 
    252252                       CALL sbc_ana     ( kt )                    ! ESOPA, test ALL the formulations 

  • branches/2011/dev_LOCEAN_CMCC_INGV_MERCATOR_2011/NEMOGCM/NEMO/OPA_SRC/SBC/sbcwave.F90

    r3104 r3105  
    2020   PRIVATE 
    2121 
    22    PUBLIC   sbc_wave    ! routine called in sbc_blk_core or sbc_blk_ecmwf 
     22   PUBLIC   sbc_wave    ! routine called in sbc_blk_core or sbc_blk_mfs 
    2323    
    2424   TYPE(FLD), ALLOCATABLE, DIMENSION(:)  :: sf_wave     ! structure of input fields (file informations, fields read) 
Note: See TracChangeset for help on using the changeset viewer.