Changeset 1224


Ignore:
Timestamp:
Aug 7, 2009, 5:22:10 PM (15 years ago)
Author:
jghattas
Message:

Correction : On lit toujours uniquement un fichier pour les sulfates.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/LMDZ4-dev/libf/phylmd/aeropt_5wv.F90

    r1221 r1224  
    467467
    468468  IF (flag_aerosol .EQ. 1) THEN
    469      nb_aer = 2
     469     nb_aer = 1
    470470     ALLOCATE (aerosol_name(nb_aer))
    471471     aerosol_name(1) = id_ASSO4M
    472      aerosol_name(2) = id_CSSO4M
    473472  ELSEIF (flag_aerosol .EQ. 2) THEN
    474473     nb_aer = 2
Note: See TracChangeset for help on using the changeset viewer.