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/suphel.f90

    r5274 r5284  
    44SUBROUTINE suphel
    55
    6   USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO                   &
     6USE yoethf_mod_h
     7    USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO                   &
    78          , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA                  &
    89          , R_ecc, R_peri, R_incl                                      &
    … …  
    1920
    2021
    21   include "YOETHF.h"
    2222  ! IM cf. JLD
    2323  LOGICAL firstcall
Note: See TracChangeset for help on using the changeset viewer.