Ignore:
Timestamp:
Oct 28, 2024, 2:12:55 PM (6 hours ago)
Author:
abarral
Message:

Turn alpale.h alpale.f90 YOETHF.h into modules

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/Dust/phys_output_write_spl_mod.F90

    r5282 r5284  
    8989    ! defined and initialised mainly in phytracr_spl_mod.F90 (SPLA tracers, subroutine phytracr_spl_out_init)
    9090
    91     USE dimphy, ONLY: klon, klev, klevp1
     91USE alpale_mod
     92        USE dimphy, ONLY: klon, klev, klevp1
    9293    USE ocean_slab_mod, ONLY: nslay
    9394    USE control_mod, ONLY: day_step, iphysiq
    … …  
    411412
    412413!   INCLUDE "temps.h"
    413     INCLUDE "alpale.h"
    414414    INCLUDE "compbl.h"
    415 
    416 
    417415
    418416    ! Input
Note: See TracChangeset for help on using the changeset viewer.