Changeset 5087 for LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_cloud_optics_prop_ini.F90

Timestamp:

Jul 20, 2024, 12:00:23 PM (6 months ago)

Author:

abarral

Message:

remove fixed-form ^{\s+& remaining in .f90,.F90}

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_cloud_optics_prop_ini.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_cloud_optics_prop_ini.F90

@@ -44 +44 @@
 
   SUBROUTINE cloud_optics_prop_ini(klon, prt_level_in, lunout_in, flag_aerosol_in, &
-       & ok_cdnc_in, bl95_b0_in, &
-       & bl95_b1_in, latitude_deg_in, rpi_in, rg_in, rd_in, zepsec_in, novlp_in, &
-       & iflag_ice_thermo_in, ok_new_lscp_in)
+   ok_cdnc_in, bl95_b0_in, &
+   bl95_b1_in, latitude_deg_in, rpi_in, rg_in, rd_in, zepsec_in, novlp_in, &
+   iflag_ice_thermo_in, ok_new_lscp_in)
 
     USE ioipsl_getin_p_mod, ONLY : getin_p