Ignore:
Timestamp:
Jul 26, 2024, 5:56:37 PM (8 weeks ago)
Author:
abarral
Message:

Replace academic.h, alpale.h, comdissip.h, comdissipn.h, comdissnew.h by modules
Remove unused clesph0.h

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/dyn3d_common/traceurpole.f90

    r5116 r5134  
    33SUBROUTINE traceurpole(q, masse)
    44  USE lmdz_description, ONLY: descript
     5  USE lmdz_comdissip, ONLY: coefdis, tetavel, tetatemp, gamdissip, niterdis
     6
    57  IMPLICIT NONE
    68
    7   include "dimensions.h"
    8   include "paramet.h"
    9   include "comdissip.h"
    10   include "comgeom2.h"
     9  INCLUDE "dimensions.h"
     10  INCLUDE "paramet.h"
     11  INCLUDE "comgeom2.h"
    1112
    1213
Note: See TracChangeset for help on using the changeset viewer.