Changeset 948


Ignore:
Timestamp:
07/12/19 11:58:52 (5 years ago)
Author:
jisesh
Message:

devel: fixed module load commands in nudging module

Location:
codes/icosagcm/devel/src
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/devel/src/dissip/nudging_mod.f90

    r947 r948  
    147147    USE transfert_mod 
    148148    USE time_mod 
    149     USE pression_mod 
    150149    USE vertical_remap_mod 
     150    USE compute_pression_mod, ONLY : pression_mid 
    151151    REAL(rstd), INTENT(IN):: tt 
    152152    TYPE(t_field),POINTER :: f_ps(:) 

  • codes/icosagcm/devel/src/vertical/vertical_remap.f90

    r947 r948  
    110110  SUBROUTINE vertical_remap_extdata(field_in,f_target_pressure,field_out) 
    111111  USE icosa 
    112   USE pression_mod 
    113112  USE omp_para 
    114113  USE disvert_mod, ONLY : presnivs 
Note: See TracChangeset for help on using the changeset viewer.