Changeset 10047 for branches/NERC/dev_r5518_GO6_under_ice_relax/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_mod.F90
- Timestamp:
- 2018-08-08T17:12:35+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/NERC/dev_r5518_GO6_under_ice_relax/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_mod.F90
r10045 r10047 256 256 REAL(wp), ALLOCATABLE, DIMENSION(:,:) :: f_pi_co2starair_2d 257 257 REAL(wp), ALLOCATABLE, DIMENSION(:,:) :: f_pi_ocndpco2_2d 258 REAL(wp), ALLOCATABLE, DIMENSION(:,:) :: f_pi_pco2a_2d, f_pi_pco2w_2d, f_pi_co2flux_2d 259 REAL(wp), ALLOCATABLE, DIMENSION(:,:) :: f_pi_TDIC_2d 260 REAL(wp), ALLOCATABLE, DIMENSION(:,:) :: f_pi_ph_2d, f_pi_omcal_2d, f_pi_omarg_2d 261 REAL(wp), ALLOCATABLE, DIMENSION(:,:) :: f_pi_h2co3_2d, f_pi_hco3_2d, f_pi_co3_2d 258 262 # endif 259 263 # endif
Note: See TracChangeset
for help on using the changeset viewer.