Changeset 1106 for trunk/LMDZ.MARS/libf/phymars/inifis.F

Timestamp:

Nov 18, 2013, 11:43:48 AM (11 years ago)

Author:

tnavarro

Message:

option freedust with ice microphysics & masse naming in start files

File:

• trunk/LMDZ.MARS/libf/phymars/inifis.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/inifis.F

@@ -511 +511 @@
          call getin("microphys",microphys)
          write(*,*)" microphys = ",microphys
-         if (freedust.and.microphys) then
-           print*,'freedust can not be used with microphys !'
-           print*,'(although that could be improved...)'
-           stop
-         endif
 
 ! microphysical parameter contact