Changeset 1305 for LMDZ4/trunk/libf

Timestamp:

Jan 29, 2010, 3:33:00 PM (15 years ago)

Author:

Laurent Fairhead

Message:

Too many characters on line and at the wrong place

---

Ligne trop longue au mauvais endroit

ACo

File:

• LMDZ4/trunk/libf/phylmd/newmicro.F (modified) (1 diff)

LMDZ4/trunk/libf/phylmd/newmicro.F

@@ -170 +170 @@
                                 !
                   cdnc_pi(i,k) = 10.**(bl95_b0+bl95_b1*
-     &               log(MAX(mass_solu_aero_pi(i,k),1.e-4))/log(10.))*1.e6 !-m-3
+     &               log(MAX(mass_solu_aero_pi(i,k),1.e-4))/log(10.))
+     &               *1.e6 !-m-3
                   cdnc_pi(i,k)=MIN(1000.e6,MAX(20.e6,cdnc_pi(i,k)))
                ENDDO