Ignore:
Timestamp:
Jul 30, 2018, 4:07:55 PM (6 years ago)
Author:
jvatant
Message:

Minor correction : remove a useless but unitialized print that disturb picky compilers
--JVO

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.TITAN/libf/phytitan/calchim.F90

    r1958 r1979  
    211211          press_c(l) = playmoy(l)/100.                      ! mbar
    212212          nb(l)      = 1.e-4*press_c(l) / (kbol*temp_c(l))  ! cm-3
    213           PRINT*, l, press_c(l), nb(l), temp_c(l), phi_c(l)
     213          PRINT*, l, press_c(l), nb(l), temp_c(l)
    214214       ENDDO
    215215     ELSE
Note: See TracChangeset for help on using the changeset viewer.