Changeset 23547f3 in flexpart.git for src/cmapf_mod.f90

Timestamp:

Nov 14, 2019, 4:07:32 PM (4 years ago)

Author:

Ignacio Pisso <ip@…>

Branches:

master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug

Children:

577bd04

Parents:

f612b17

Message:

remove tabs from files of the form src/*.f90

File:

• src/cmapf_mod.f90 (modified) (1 diff)

src/cmapf_mod.f90

@@ -232 +232 @@
   !efact = exp(ymerc)
   !cgszll = 2. * strcmp(7) * exp (strcmp(1) * ymerc)
-  !c                     / (efact + 1./efact)
+  !c             / (efact + 1./efact)
   endif
   cgszll = strcmp(7) * cos(radpdg * xlat) * exp(strcmp(1) *ymerc)