da_interpolation.f90

1 module da_interpolation
2 
3    use da_control, only : trace_use, trace_use_frequent, missing_r, &
4       anal_type_verify, v_interp_h, v_interp_p,ims,ime,jms,jme,kms,kme, &
5       kts,kte, trace_use_dull
6    use da_define_structures, only : infa_type
7    use da_tools, only : da_togrid
8    use da_tracing, only : da_trace_entry, da_trace_exit
9 
10    implicit none
11 
12 contains
13 
14 #include "da_to_zk.inc"
15 #include "da_to_zk_new.inc"
16 
17 #include "da_interp_lin_2d_partial.inc"
18 #include "da_interp_lin_2d.inc"
19 #include "da_interp_lin_2d_adj_partial.inc"
20 #include "da_interp_lin_2d_adj.inc"
21 #include "da_interp_lin_3d.inc"
22 #include "da_interp_lin_3d_adj.inc"
23 
24 end module da_interpolation
25