00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00028 #ifndef disort_h
00029 #define disort_h
00030
00031 #include "agenda_class.h"
00032 #include "matpackIV.h"
00033 #include "mystring.h"
00034 #include "optproperties.h"
00035
00036
00037 void dtauc_ssalbCalc(
00038 VectorView dtauc,
00039 VectorView ssalb,
00040 const Agenda& opt_prop_part_agenda,
00041 const Agenda& abs_scalar_gas_agenda,
00042 const Agenda& spt_calc_agenda,
00043 ConstTensor4View pnd_field,
00044 ConstTensor3View t_field,
00045 ConstTensor3View z_field,
00046 ConstVectorView p_grid,
00047 ConstTensor4View vmr_field,
00048 const Index& f_index
00049 );
00050
00051 void phase_functionCalc(
00052 MatrixView phase_function,
00053
00054 const ArrayOfSingleScatteringData& scat_data_mono,
00055 ConstTensor4View pnd_field
00056 );
00057
00058 void pmomCalc(
00059 MatrixView pmom,
00060
00061 ConstMatrixView phase_function,
00062 ConstVectorView scat_angle_grid,
00063 const Index n_legendre
00064 );
00065
00066 Numeric planck2(
00067 const Numeric& f,
00068 const Numeric& t );
00069
00070 #endif
00071