Changeset 1764 for trunk/LMDZ.TITAN/libf

Timestamp:

Aug 7, 2017, 4:38:48 PM (7 years ago)

Author:

jvatant

Message:

Fixed unitialized radius and qext in initracer

-> These arrays were printed and even tested in callsedim without being initialized !
-> Please stop handling uninitialized values !!!

Also updated README for modif from r1725

JVO

File:

• trunk/LMDZ.TITAN/libf/phytitan/initracer.F (modified) (1 diff)

trunk/LMDZ.TITAN/libf/phytitan/initracer.F

@@ -54 +54 @@
        alpha_lift(:)=0.
        alpha_devil(:)=0.
+       
+       ! Added by JVO 2017 : these arrays are handled later
+       ! -> initialization is the least we can do, please !!!
+       radius(:)=0.
+       qext(:)=0.
 
 ! Initialization: get tracer names from the dynamics and check if we are