Changeset 2949 for trunk/LMDZ.VENUS/libf

Timestamp:

Apr 27, 2023, 9:56:03 AM (20 months ago)

Author:

streel

Message:

Venus PCM
Fix of r-2925 : indice g024 was used for reaction g023

NS

File:

• trunk/LMDZ.VENUS/libf/phyvenus/photochemistry_venus.F90 (modified) (1 diff)

trunk/LMDZ.VENUS/libf/phyvenus/photochemistry_venus.F90

@@ -3835 +3835 @@
 
       nb_reaction_4 = nb_reaction_4 + 1
-      v_4(:,nb_reaction_4) = g024(:)
+      v_4(:,nb_reaction_4) = g023(:)
 
 !---  g024: s + ocs -> s2 +  co