| 119 | [[BR]][[BR]] |
| 120 | |
| 121 | Pour la version IPSLCM5A avec un CO2 atmosphérique moyen ( calculé offline ), '''il ne faut pas activer la clé key_cpl_carbon_cycle''' ( l'océan s'attend à recevoir dans ce cas une pco2 "spatialisée" ) (CE) |
| 122 | * PISCES est modifié pour diagnostiquer le flux total de carbone océanique cumulé sur la durée du run |
| 123 | {{{ |
| 124 | t_oce_co2_flx = t_oce_co2_flx + SUM( oce_co2(:,:) * tmask_i(:,:) ) ! Cumulative Total Flux of Carbon |
| 125 | IF( kt == nitend ) THEN |
| 126 | ! |
| 127 | IF( lk_mpp ) CALL mpp_sum( t_oce_co2_flx ) ! sum over the global domain |
| 128 | t_oce_co2_flx = (-1.) * t_oce_co2_flx * 12. / 1.e15 ! Conversion in PgC ; negative for out of the ocean |
| 129 | ! |
| 130 | ENDIF |
| 131 | }}} |
| 132 | * 2 runs tests d'une année pour vérifier que rien n'est modifié : |
| 133 | * version standard de IPSCM5A : |
| 134 | {{{ |
| 135 | /scratch/cont003/p48ethe/IPSLCM5A/STD/modipsl/modeles/NEMO/TOP_SRC/PISCES/p4zflx.F90 |
| 136 | /scratch/cont003/p48ethe/IPSLCM5A/STD/modipsl/config/IPSLCM5A/historical |
| 137 | /dmnfs10/cont003/p48ethe/IGCM_OUT/IPSLCM5A/DEVT/historical/FLXSTD |
| 138 | }}} |
| 139 | * version modifiée ( diagnostique des flux de carbone ) de IPSCM5A : |
| 140 | {{{ |
| 141 | /scratch/cont003/p48ethe/IPSLCM5A/DEV/modipsl/modeles/NEMO/TOP_SRC/PISCES/p4zflx.F90 |
| 142 | /scratch/cont003/p48ethe/IPSLCM5A/DEV/modipsl/config/IPSLCM5A/historical |
| 143 | /dmnfs10/cont003/p48ethe/IGCM_OUT/IPSLCM5A/DEVT/historical/FLXDEV |
| 144 | }}} |
| 145 | * Comparaison des solver.stat |
| 146 | {{{ |
| 147 | cd /dmnfs10/cont003/p48ethe/IGCM_OUT/IPSLCM5A/DEVT/historical/ |
| 148 | sdiff -s FLXSTD/OCE/Debug/FLXSTD_18501201_18501231_solver.stat FLXDEV/OCE/Debug/FLXDEV_18501201_18501231_solver.stat |
| 149 | }}} |
| 150 | |
| 151 | On récupère la valeur du flux total de carbone océanique dans le fichier ocean.output : |
| 152 | {{{ |
| 153 | Cumulative total Flux of Carbon out of the ocean (PgC) : -4.884764275789542D-02 |
| 154 | }}} |