Changeset 4912 for LMDZ6


Ignore:
Timestamp:
Apr 19, 2024, 3:32:15 PM (8 months ago)
Author:
lebasn
Message:

Cosmetic changes (comments, space for visibility)

Location:
LMDZ6/trunk/libf/phylmd
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/StratAer/nucleation_tstep_mod.F90

    r4829 r4912  
    9393
    9494  ! dry volume of nucleated particle (at reference temperature)
     95  !  dens_aer_dry (density of dry aerosol []kg/m3)
     96  !  H2SO4mol: mass of an H2SO4 molecule [kg]
     97  !  Vnew [m3]
    9598  Vnew=mH2SO4mol*ntot*x/dens_aer_dry
    9699

  • LMDZ6/trunk/libf/phylmd/minmaxqfi.F90

    r2311 r4912  
    2525     ENDDO
    2626     IF (jbad.GT.0) THEN
    27         WRITE(*,*)comment, "k = ", k, "jbad > 0"
     27        WRITE(*,*)comment, "  k = ", k, "jbad > 0"
    2828        if (prt_level >= 1) then
    2929           DO i = 1, jbad
Note: See TracChangeset for help on using the changeset viewer.