New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 13369 for utils/tools/SIREN/src/phycst.f90 – NEMO

Ignore:
Timestamp:
2020-07-31T10:50:52+02:00 (4 years ago)
Author:
jpaul
Message:

update: cf changelog inside documentation

File:
1 edited

Legend:

Unmodified
Added
Removed
  • utils/tools/SIREN/src/phycst.f90

    r12080 r13369  
    2727   PUBLIC :: dp_eps     !< epsilon value 
    2828   PUBLIC :: dp_rearth  !< earth radius [m] 
    29    PUBLIC :: dp_deg2rad !< degree to radian ratio  
    30    PUBLIC :: dp_rad2deg !< radian to degree ratio  
    31    PUBLIC :: dp_delta   !<   
    32    PUBLIC :: dp_omega   !< earth rotation parameter [s-1]  
     29   PUBLIC :: dp_deg2rad !< degree to radian ratio 
     30   PUBLIC :: dp_rad2deg !< radian to degree ratio 
     31   PUBLIC :: dp_delta   !< 
     32   PUBLIC :: dp_omega   !< earth rotation parameter [s-1] 
    3333   PUBLIC :: dp_day     !< day                                [s] 
    3434   PUBLIC :: dp_siyea   !< sideral year                       [s] 
     
    4545   REAL(dp), PARAMETER :: dp_rad2deg = 180.0/dp_pi 
    4646 
    47    REAL(dp), PARAMETER :: dp_day = 24.*60.*60.      
     47   REAL(dp), PARAMETER :: dp_day = 24.*60.*60. 
    4848   REAL(dp), PARAMETER :: dp_siyea = 365.25_dp * dp_day * & 
    4949      &  2._dp * dp_pi / 6.283076_dp 
Note: See TracChangeset for help on using the changeset viewer.