Ignore:
Timestamp:
Apr 7, 2010, 5:07:29 PM (15 years ago)
Author:
Laurent Fairhead
Message:

Use generic rather than specific names for intrinsic procedures.
Modifications in r1334 (on Vprecip) were not propagated to physiq.F leading to a non
running program

Utilisations des noms génériques pour les procédures intrinsèques
Les modifications sur la déclaration de Vprecip dans la révision r1334 n'ont pas été
"remontées" à physiq.F d'où problème à l'exécution (en particulier sous g95)

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/trunk/libf/dyn3d/inter_barxy_m.F90

    r1323 r1340  
    179179
    180180    DO idat = 1, idatmax
    181        xxd(idat) = AMOD( xxd(idat) - xim0, 360. )
     181       xxd(idat) = MOD( xxd(idat) - xim0, 360. )
    182182       fdd(idat) = fdat (idat)
    183183    ENDDO
Note: See TracChangeset for help on using the changeset viewer.