Changeset 5267 for LMDZ6/trunk/libf/misc


Ignore:
Timestamp:
Oct 23, 2024, 5:34:46 PM (2 months ago)
Author:
abarral
Message:

Remove CPP_IOIPSL cpp keys uses

Location:
LMDZ6/trunk/libf/misc
Files:
3 deleted
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/misc/strings_mod.F90

    r5003 r5267  
    5353!==============================================================================================================================
    5454SUBROUTINE getin_s(nam, val, def)
    55   USE ioipsl_getincom, ONLY: getin
     55  USE ioipsl, ONLY: getin
    5656  IMPLICIT NONE
    5757  CHARACTER(LEN=*), INTENT(IN)    :: nam
    … …  
    6363!==============================================================================================================================
    6464SUBROUTINE getin_i(nam, val, def)
    65   USE ioipsl_getincom, ONLY: getin
     65  USE ioipsl, ONLY: getin
    6666  IMPLICIT NONE
    6767  CHARACTER(LEN=*), INTENT(IN)    :: nam
    … …  
    7373!==============================================================================================================================
    7474SUBROUTINE getin_r(nam, val, def)
    75   USE ioipsl_getincom, ONLY: getin
     75  USE ioipsl, ONLY: getin
    7676  IMPLICIT NONE
    7777  CHARACTER(LEN=*), INTENT(IN)    :: nam
    … …  
    8383!==============================================================================================================================
    8484SUBROUTINE getin_l(nam, val, def)
    85   USE ioipsl_getincom, ONLY: getin
     85  USE ioipsl, ONLY: getin
    8686  IMPLICIT NONE
    8787  CHARACTER(LEN=*), INTENT(IN)    :: nam
Note: See TracChangeset for help on using the changeset viewer.