Ignore:
Timestamp:
Jul 23, 2024, 8:22:55 AM (2 months ago)
Author:
abarral
Message:

Handle DEBUG_IO in lmdz_cppkeys_wrapper.F90
Transform some files .F -> .[fF]90
[ne compile pas à cause de writefield_u non défini - en attente de réponse Laurent]

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/phylmd/Dust/neutral.F

    r5082 r5101  
    5252                f1 = (1. + phi_inv) / 2.
    5353                f2 = (1. + phi_inv_sq)/2.
    54 c following to avoid numerical overruns. recall tan(90deg)=infinity
     54c following to avoid numerical overruns. reCALL tan(90deg)=infinity
    5555                dum1 = min (1.e24, phi_inv)
    5656                f3 = atan(dum1)
Note: See TracChangeset for help on using the changeset viewer.