rttovInterfaces_mod sourceΒΆ

 1module rttovInterfaces_mod
 2  ! MODULE rttovInterfaces_mod (prefix='' category='9. Global interfaces')
 3  !
 4  !:Purpose: To *include* all of the needed files containing the interfaces
 5  !           for the rttov library subroutines. This allows all other 
 6  !           files in MIDAS to be of the *f90* type (instead of *ftn90*),
 7  !           thus avoiding a pass through the pre-processor.
 8  !
 9implicit none
10public
11
12#include "rttov_coeffname.interface"
13#include "rttov_user_options_checkinput.interface"
14#include "rttov_alloc_prof.interface"
15#include "rttov_parallel_direct.interface"
16#include "rttov_alloc_rad.interface"
17#include "rttov_alloc_transmission.interface"
18#include "rttov_alloc_direct.interface"
19#include "rttov_alloc_tl.interface"
20#include "rttov_alloc_ad.interface"
21#include "rttov_print_profile.interface"
22#include "rttov_get_emis.interface"
23#include "rttov_setup_emis_atlas.interface"
24#include "rttov_read_coefs.interface"
25#include "rttov_dealloc_coefs.interface"
26#include "rttov_nullify_coef.interface"
27#include "rttov_parallel_tl.interface"
28#include "rttov_parallel_ad.interface"
29#include "rttov_direct.interface"
30
31#include "rttov_scatt.interface"
32#include "rttov_scatt_tl.interface"
33#include "rttov_scatt_ad.interface"
34#include "rttov_alloc_scatt_prof.interface"
35#include "rttov_read_scattcoeffs.interface"
36#include "rttov_dealloc_scattcoeffs.interface"
37#include "rttov_scatt_setupindex.interface"
38
39end module rttovInterfaces_mod