Changeset 2604


Ignore:
Timestamp:
2011-02-22T10:33:21+01:00 (10 years ago)
Author:
cetlod
Message:

ipslcmip5:Formatted writting of total ocean carbon flux in ocean.output file

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/CMIP5_IPSL/NEMO/TOP_SRC/PISCES/p4zflx.F90

    r2504 r2604  
    198198            WRITE(numout,*) ' Global mean of atmospheric pCO2 (ppm) at it= ', kt, ' date= ', ndastp, ' : ',t_atm_co2_flx 
    199199            WRITE(numout,*)  
    200             WRITE(numout,*) ' Cumulative total Flux of Carbon out of the ocean (PgC) :' , t_oce_co2_flx 
     200            WRITE(numout,9000) ' Cumulative total Flux of Carbon out of the ocean (PgC) :   ' , t_oce_co2_flx 
    201201            WRITE(numout,*)  
    202202         ENDIF 
    203203         ! 
    204204      ENDIF 
     2059000  FORMAT(A60,F17.14) 
    205206 
    206207      IF(ln_ctl)   THEN  ! print mean trends (used for debugging) 
Note: See TracChangeset for help on using the changeset viewer.