- Timestamp:
- 2015-04-03T13:28:22+02:00 (9 years ago)
- Location:
- branches/2015/dev_r5171_CNRS_LIM3_seaicebgc/NEMOGCM
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2015/dev_r5171_CNRS_LIM3_seaicebgc/NEMOGCM/CONFIG/ORCA2_LIM_PISCES/EXP00/namelist_pisces_cfg
r4147 r5195 62 62 !,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, 63 63 / 64 !''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 65 &nampisice ! Prescribed sea ice tracers 66 !,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, 67 / -
branches/2015/dev_r5171_CNRS_LIM3_seaicebgc/NEMOGCM/CONFIG/ORCA2_OFF_PISCES/EXP00/namelist_pisces_cfg
r4147 r5195 64 64 !,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, 65 65 / 66 !''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 67 &nampisice ! Prescribed sea ice tracers 68 !,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,, 69 / -
branches/2015/dev_r5171_CNRS_LIM3_seaicebgc/NEMOGCM/NEMO/TOP_SRC/PISCES/trcice_pisces.F90
r5194 r5195 48 48 !! * -1 => the ice-ocean tracer concentration ratio follows the 49 49 !! ice-ocean salinity ratio 50 !! * -2 => tracer concentration in sea ice is prescribed and 51 !! trc_ice_prescr is used 50 !! * -2 => no ice-ocean tracer concentration is used 51 !! instead, the tracer concentration in sea ice 52 !! is prescribed to trc_ice_prescr 52 53 !! 53 !! cn_trc_o specifies which prescribed tracer concentration 54 !! should be used 55 !! 'GL' use global ocean values making distinction for Baltic Sea only 56 !! 'AA' use Arctic/Antarctic contrasted values, + Baltic 54 !! cn_trc_o specifies which disinctions are made for prescribed tracer concentration 55 !! * 'GL' use global ocean values making distinction for Baltic Sea only 56 !! * 'AA' use Arctic/Antarctic contrasted values, + Baltic 57 57 !! 58 58 !!---------------------------------------------------------------------- … … 223 223 trc_ice_prescr(jpnh4) = sn_tri_nh4%trc_prescr 224 224 cn_trc_o (jpnh4) = sn_tri_nh4%ctrc_o 225 226 ! Dummy write227 WRITE(numout,*) ' trc_ice_ratio :', trc_ice_ratio228 WRITE(numout,*) ' trc_ice_prescr:', trc_ice_prescr229 WRITE(numout,*) ' cn_trc_o :', cn_trc_o230 ! End dummy write231 225 232 226 !-------------------------------------------- … … 379 373 END DO 380 374 381 ! dummy write382 DO jn = 1, jptra383 WRITE(numout,*) jn, ' zratio : ', zratio(jn,:)384 END DO385 ! end dummy write386 387 375 !------------------------------- 388 376 ! Sea ice tracer concentrations -
branches/2015/dev_r5171_CNRS_LIM3_seaicebgc/NEMOGCM/NEMO/TOP_SRC/TRP/trcsbc.F90
r5193 r5195 134 134 tra(ji,jj,1,jn) = MAX( tra(ji,jj,1,jn) + zdtra, 0.) ! avoid integral ocean uptake if freezing (for iron) 135 135 136 ! IF ( ztfx .NE. 0.0 ) THEN137 IF ( ( ji .EQ. 3 ) .AND. ( jj .EQ. 2 ) .AND. ( jn .EQ. 2 ) ) THEN138 WRITE(numout,*) ji, jj, jn139 WRITE(numout,*) ' trn : ', trn(ji,jj,1,jn)140 WRITE(numout,*) ' trb : ', trb(ji,jj,1,jn)141 WRITE(numout,*) ' tra : ', tra(ji,jj,1,jn)142 WRITE(numout,*) ' trc_o : ', trc_o(ji,jj,jn)143 WRITE(numout,*) ' trc_i : ', trc_i(ji,jj,jn)144 WRITE(numout,*) ' fmmflx : ', fmmflx(ji,jj)145 WRITE(numout,*) ' zswitch: ', zswitch146 WRITE(numout,*) ' zcd : ', zcd147 WRITE(numout,*) ' zftra : ', zftra148 WRITE(numout,*) ' ztfx : ', ztfx149 WRITE(numout,*) ' r1_rau0 : ', r1_rau0150 WRITE(numout,*) ' zsfx : ', zsfx(ji,jj)151 WRITE(numout,*) ' zse3t : ', zse3t152 WRITE(numout,*) ' ztra : ', ztra153 WRITE(numout,*) ' zdtra : ', zdtra154 WRITE(numout,*) ' Old tendency : ', zsfx(ji,jj) * r1_rau0 * trn(ji,jj,1,jn) * zse3t155 ENDIF156 157 136 END DO 158 137 END DO
Note: See TracChangeset
for help on using the changeset viewer.