Ignore:
Timestamp:
06/13/19 16:45:41 (5 years ago)
Author:
adurocher
Message:

trunk : Fixed GCC warnings

Fixed iso c bindings
fixed warnings with -Wall -Wno-aliasing -Wno-unused -Wno-unused-dummy-argument -Wno-maybe-uninitialized -Wno-tabs warnings
Removed all unused variables (-Wunused-variable)
vector%dot_product is now dot_product_3d to avoid compilation warning "dot_product shadows intrinsic" with GCC

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/trunk/src/dcmip/dcmip_initial_conditions_test_1_2_3_v5.f90

    r548 r899  
    140140      real(rstd) :: ptop                                                        ! Model top in p 
    141141      real(rstd) :: sin_tmp, cos_tmp, sin_tmp2, cos_tmp2                        ! Calculate great circle distances 
    142       real(rstd) :: d1, d2, r, r2, d3, d4                                       ! For tracer calculations  
     142      real(rstd) :: d1, d2, r, r2                                       ! For tracer calculations  
    143143      real(rstd) :: s, bs                                                       ! Shape function, and parameter 
    144144      real(rstd) :: lonp                                                        ! Translational longitude, depends on time 
Note: See TracChangeset for help on using the changeset viewer.