Ignore:
Timestamp:
Apr 17, 2025, 9:45:14 AM (2 months ago)
Author:
emillour
Message:

Mars PCM:
Turn "callkeys.h" into module "callkeys_mod.F90"
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/hdo_surfex_mod.F

    r3008 r3726  
    1919      use microphys_h, only: molco2, molh2o, molhdo
    2020      use write_output_mod, only: write_output
     21      use callkeys_mod, only: hdofrac
    2122
    2223      implicit none
    … …  
    2526c               for HDO, based of the fluxes for H2O
    2627c           L. Rossi.; M. Vals 2019
    27 c------------------------------------------------------------------
    28       include "callkeys.h"
    2928c------------------------------------------------------------------
    3029c     Arguments:
    … …  
    164163c    &                       ' ',alpha_c)
    165164
    166        return
    167165      end subroutine hdo_surfex
    168166c------------------------------------------------------------------
Note: See TracChangeset for help on using the changeset viewer.