Changeset 8540 for branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/routing_native_flow.f90

Timestamp:

2024-04-24T18:46:43+02:00 (8 weeks ago)

Author:

josefine.ghattas

Message:

As in the trunk [8539] : Missing declaration in commit [8536]. Previous changeset didn't compile at obelix.

Location:

branches/ORCHIDEE_2_2/ORCHIDEE

Files:

• . (modified) (1 prop)
• src_sechiba/routing_native_flow.f90 (modified) (1 diff)

branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/routing_native_flow.f90

@@ -380 +380 @@
   SUBROUTINE compute_coastline(contfrac, coastline)
   USE mod_orchidee_para
-  USE grid
+  USE grid, not_used => contfrac
   IMPLICIT NONE
     REAL(r_std),INTENT(IN)     :: contfrac(nbpt)    ! INPUT   : fraction of continent (unitless)