Ignore:
Timestamp:
03/08/18 12:48:37 (6 years ago)
Author:
dubos
Message:

devel/unstructured : piecewise-constant vertical remapping

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/devel/src/kernels_unst/caldyn_wflux.k90

    r624 r686  
    77         convm(l,ij) = convm(l,ij) + convm(l+1,ij) 
    88      END DO 
    9       l=1 
    10       dmass_col(ij) = convm(l,ij) 
     9      dmass_col(ij) = convm(1,ij) 
    1110      DO l = 2,llm 
    1211         ! Compute vertical mass flux (l=1,llm+1 set to zero at init) 
Note: See TracChangeset for help on using the changeset viewer.