Ignore:
Timestamp:
Jul 24, 2024, 1:17:08 PM (4 months ago)
Author:
abarral
Message:

Rename modules in misc from *_mod > lmdz_*
Put cbrt.f90, ch*.f90, pch*.f90 in new lmdz_libmath_pch.f90

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/phylmd/coare_cp_mod.F90

    r5103 r5113  
    11module coare_cp_mod
    2   implicit none
    3   private
     2  IMPLICIT NONE
     3  PRIVATE
    44  public psit_30, psiuo, coare_cp
    55
    … …  
    77
    88  real function psit_30(zet)
    9     implicit none
     9    IMPLICIT NONE
    1010    real, intent(in) :: zet
    1111
    … …  
    2727
    2828  real function psiuo(zet)
    29     implicit none
     29    IMPLICIT NONE
    3030    real, intent(in) :: zet
    3131
Note: See TracChangeset for help on using the changeset viewer.