Changeset 1928


Ignore:
Timestamp:
May 29, 2018, 12:59:30 AM (6 years ago)
Author:
jvatant
Message:

Forget prints in r1927 !
--JVO

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r1927 r1928  
    323323             kedd(l) = 1.e8
    324324        ENDIF
    325         print *, l, kedd(l)
    326325     ENDDO
    327326     
    … …  
    330329        temp1   = ( log10(press_c(l)/press_c(klev-15)) ) / ( log10(press_c(klev+1)/press_c(klev-15)) )
    331330        kedd(l) = 10.**( 3.0 + log10(kedd(klev+1)/1.e3) * temp1 )
    332         print *, l, kedd(l)
    333331     ENDDO
    334332     
Note: See TracChangeset for help on using the changeset viewer.