Changeset 5106 for LMDZ6/branches/Amaury_dev/libf/dyn3d_common/nxgrarot.f90

Timestamp:

Jul 23, 2024, 10:21:18 PM (2 months ago)

Author:

abarral

Message:

Turn coefils.h into lmdz_coefils.f90
Put filtreg.F90 inside lmdz_filtreg.F90
Turn mod_filtreg_p.F90 into lmdz_filtreg_p.F90
Delete obsolete parafilt.h*
(lint) remove spaces between routine name and args

File:

• LMDZ6/branches/Amaury_dev/libf/dyn3d_common/nxgrarot.f90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/dyn3d_common/nxgrarot.f90

@@ -2 +2 @@
 ! $Header$
 
-SUBROUTINE nxgrarot (klevel,xcov, ycov, lr, grx, gry )
+SUBROUTINE nxgrarot(klevel,xcov, ycov, lr, grx, gry )
   !   ***********************************************************
   !
@@ -16 +16 @@
   !
   !
+  USE lmdz_filtreg, ONLY: filtreg
   IMPLICIT NONE
   !