1 |
module conf_dat2d_m |
module conf_dat2d_m |
2 |
|
|
|
! This module is clean: no C preprocessor directive, no include line. |
|
3 |
! From conf_dat2d.F, version 1.2 2006/01/27 15:14:22 |
! From conf_dat2d.F, version 1.2 2006/01/27 15:14:22 |
4 |
|
|
5 |
IMPLICIT NONE |
IMPLICIT NONE |
27 |
! If required, the longitudes and latitudes are finally replaced |
! If required, the longitudes and latitudes are finally replaced |
28 |
! by their mid-values. |
! by their mid-values. |
29 |
|
|
30 |
use numer_rec, only: assert_eq |
use nr_util, only: assert_eq, pi |
|
use comconst, only: pi |
|
31 |
|
|
32 |
REAL, intent(in):: xd(:) |
REAL, intent(in):: xd(:) |
33 |
! (longitudes, in degrees or radians, in increasing order, from 0° |
! (longitudes, in degrees or radians, in increasing order, from 0° |