From e7770a40e95a1139c0361d605cc124d311719194 Mon Sep 17 00:00:00 2001 From: sit23 Date: Fri, 13 Sep 2024 12:19:02 +0100 Subject: [PATCH] Updated socrates versions functionality to allow users to set GFDL_SOC_DIR, which then contains folders of different Socrates versions. Have updated docs to explain changes, but default behaviour of setting a single Socrates version should still work. --- docs/source/modules/socrates.rst | 1 + .../socrates/socrates_version_paths/1703 | 586 ++++++++--------- .../socrates/socrates_version_paths/2207 | 592 +++++++++--------- src/extra/python/isca/__init__.py | 8 + src/extra/python/isca/codebase.py | 17 +- 5 files changed, 610 insertions(+), 594 deletions(-) diff --git a/docs/source/modules/socrates.rst b/docs/source/modules/socrates.rst index 258b92505..5eff1671f 100644 --- a/docs/source/modules/socrates.rst +++ b/docs/source/modules/socrates.rst @@ -10,6 +10,7 @@ SOCRATES (Suite Of Community RAdiative Transfer codes based on Edwards and Sling * The code used to integrate Socrates into Isca is contained within the folder ``src/atmos_params/socrates/interface``. * The Socrates source code itself is **NOT** packed within this Isca repository, and **NEW** users will need to download it from the `Met Office Science Repository `_. Users can then either choose to put the Socrates code within the directory ``src/atmos_params/socrates/src/trunk``, or can set the bash environment variable ``GFDL_SOC`` equal to the location of the source code for Socrates. Detailed instructions on how to do this are included in the `README.md `_ for the Socrates test-case: ``exp/test_cases/socrates_test/README.md``. +* Some users of Isca may wish to compile Isca separately with several different versions of Socrates (If you only want a single version then you can ignore this). To do this, you will need to create a folder containing all of your Socrates versions and set the ``GFDL_SOC_DIR`` environment variable to that location. Within the ``GFDL_SOC_DIR`` folder should be folders containing each of your Socrates versions. Then when you create the ``SocratesCodeBase`` object in your experiment script, you can use the option ``socrates_version=YOUR_VERSIONS_FOLDER_NAME_HERE``. For example, if my ``GFDL_SOC_DIR`` folder has folders within it called ``1703`` and ``2207``, which are my different versions, then I can choose version ``1703`` by setting ``socrates_version=1703`` when I create a ``SocratesCodeBase`` object in my experiment script. Then, when Isca compiles, it will build seperate executables for the different Socrates versions. * The basis of ``socrates_interface`` was coded by Mark Hammond (Univ. of Oxford) and James Manners (Met Office) and modified by Stephen Thomson (Univ. of Exeter) [Thomson_and_Vallis2019]_. Features added include seasonality in the radiation based on Isca's ``astronomy`` package, and the ability to use a ``radiation timestep != atmospheric timestep``. * Socrates radiation scheme requires ``mass mixing ratios`` for all quantities (e.g. CO2, water vapor etc). This contrasts with RRTM, which wants ``volume mixing ratios``. diff --git a/src/extra/model/socrates/socrates_version_paths/1703 b/src/extra/model/socrates/socrates_version_paths/1703 index 067d163e1..1ca67610f 100644 --- a/src/extra/model/socrates/socrates_version_paths/1703 +++ b/src/extra/model/socrates/socrates_version_paths/1703 @@ -1,293 +1,293 @@ -atmos_param/socrates/src/trunk/src/aux/cdf_struc.finc -atmos_param/socrates/src/trunk/src/aux/cdl_struc.finc -atmos_param/socrates/src/trunk/src/aux/dec_disort.finc -atmos_param/socrates/src/trunk/src/aux/call_disort.finc -atmos_param/socrates/src/trunk/src/general/batch_error_main.finc -atmos_param/socrates/src/trunk/src/general/aerosol_component.finc -atmos_param/socrates/src/trunk/src/radiance_core/gauss_angle.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_mix_direct.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_dirn_weights.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_brdf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/triple_solar_source.F90 -atmos_param/socrates/src/trunk/src/radiance_core/eval_uplm.F90 -atmos_param/socrates/src/trunk/src/radiance_core/shell_sort.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rad_pcf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/check_phf_term.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_n_source_coeff.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_surf_rad.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_random_overlap.F90 -atmos_param/socrates/src/trunk/src/radiance_core/scale_absorb.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calculate_density.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_flux_ipa.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_ice_cloud.F90 -atmos_param/socrates/src/trunk/src/radiance_core/diff_planck_source_tbl.F90 -atmos_param/socrates/src/trunk/src/radiance_core/eig_sys.F90 -atmos_param/socrates/src/trunk/src/radiance_core/adjust_ir_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_rad_layer.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_dimen.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mcica_column.F90 -atmos_param/socrates/src/trunk/src/radiance_core/interp1d.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_uplm_zero.F90 -atmos_param/socrates/src/trunk/src/radiance_core/spline_fit.F90 -atmos_param/socrates/src/trunk/src/radiance_core/gaussian_weight_pcf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/gas_list_pcf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/trans_source_coeff.F90 -atmos_param/socrates/src/trunk/src/radiance_core/band_solver.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mcica_sample.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_mix_direct_hogan.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_uplm_sol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/sph_matrix_solver.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_spectrum.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_triple_app_scat.F90 -atmos_param/socrates/src/trunk/src/radiance_core/grey_opt_prop.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_gauss_weight_90.F90 -atmos_param/socrates/src/trunk/src/radiance_core/sum_k.F90 -atmos_param/socrates/src/trunk/src/radiance_core/ses_rescale_contm.F90 -atmos_param/socrates/src/trunk/src/radiance_core/spline_evaluate.F90 -atmos_param/socrates/src/trunk/src/radiance_core/cg_kappa_ms.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_bound.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_random_overlap_resort_rebin.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_gas_flux.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_cloud_pointer.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_cloud_geometry.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rescale_phase_fnc.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_radiance_sph.F90 -atmos_param/socrates/src/trunk/src/radiance_core/inter_k.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_one_gas.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_top_rad.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_n_cloud_parameter.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_level_weights.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_k_eqv_scl.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_matrix_pentadiagonal.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mix_app_scat.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_out.F90 -atmos_param/socrates/src/trunk/src/radiance_core/sol_scat_cos.F90 -atmos_param/socrates/src/trunk/src/radiance_core/copy_clr_full.F90 -atmos_param/socrates/src/trunk/src/radiance_core/eigenvalue_tri.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_homogen_direct.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rescale_continuum.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mixed_solar_source.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_aer.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_inhom_corr_cairns.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rebin_esft_terms.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mix_column.F90 -atmos_param/socrates/src/trunk/src/radiance_core/prsc_gather_spline.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_cg_coeff.F90 -atmos_param/socrates/src/trunk/src/radiance_core/inter_pt_lookup.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_ukca_aerosol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/scale_wenyi.F90 -atmos_param/socrates/src/trunk/src/radiance_core/triple_column.F90 -atmos_param/socrates/src/trunk/src/radiance_core/single_scattering_all.F90 -atmos_param/socrates/src/trunk/src/radiance_core/inter_pt.F90 -atmos_param/socrates/src/trunk/src/radiance_core/overlap_coupled.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_cld.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solar_coefficient_basic.F90 -atmos_param/socrates/src/trunk/src/radiance_core/build_sph_matrix.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_k_eqv.F90 -atmos_param/socrates/src/trunk/src/radiance_core/augment_tiled_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/column_solver.F90 -atmos_param/socrates/src/trunk/src/radiance_core/augment_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_control.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_basic.F90 -atmos_param/socrates/src/trunk/src/radiance_core/sph_solver.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_no_scat.F90 -atmos_param/socrates/src/trunk/src/radiance_core/copy_clr_sol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solar_source.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_water_cloud.F90 -atmos_param/socrates/src/trunk/src/radiance_core/legendre_weight.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_without_gas.F90 -atmos_param/socrates/src/trunk/src/radiance_core/diff_albedo_basis.F90 -atmos_param/socrates/src/trunk/src/radiance_core/increment_rad_cf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/single_scat_sol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_aerosol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_ses.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_ss_prop.F90 -atmos_param/socrates/src/trunk/src/radiance_core/prsc_opt_prop.F90 -atmos_param/socrates/src/trunk/src/radiance_core/layer_part_integ.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_fast_lw.F90 -atmos_param/socrates/src/trunk/src/radiance_core/gas_optical_properties.F90 -atmos_param/socrates/src/trunk/src/radiance_core/single_scattering.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_ir_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/hemi_sph_integ.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_cloud.F90 -atmos_param/socrates/src/trunk/src/radiance_core/read_spectrum.F90 -atmos_param/socrates/src/trunk/src/radiance_core/inter_t_lookup.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_triple.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_stream.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_triple_hogan.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_radiance_tseq.F90 -atmos_param/socrates/src/trunk/src/radiance_core/cloud_maxcs_split.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_atm.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_region.F90 -atmos_param/socrates/src/trunk/src/radiance_core/quicksort.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rescale_tau_omega.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_radiance_ipa.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_region_fast_lw.F90 -atmos_param/socrates/src/trunk/src/radiance_core/diff_planck_source_poly.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_truncation.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/aggregate_cloud.F90 -atmos_param/socrates/src/trunk/src/radiance_core/radiance_calc.F90 -atmos_param/socrates/src/trunk/src/radiance_core/ir_source.F90 -atmos_param/socrates/src/trunk/src/aux/qsat_wat.F90 -atmos_param/socrates/src/trunk/src/aux/qsat_gill.F90 -atmos_param/socrates/src/trunk/src/aux/write_cdf.f90 -atmos_param/socrates/src/trunk/src/aux/read_cdf.f90 -atmos_param/socrates/src/trunk/src/aux/aerosol_representation_pcf.f90 -atmos_param/socrates/src/trunk/src/aux/aerosol_profile_pcf.f90 -atmos_param/socrates/src/trunk/src/aux/write_samson.f90 -atmos_param/socrates/src/trunk/src/aux/filter_function.f90 -atmos_param/socrates/src/trunk/src/aux/qsat_alg_pcf.f90 -atmos_param/socrates/src/trunk/src/aux/method_merge_pcf.f90 -atmos_param/socrates/src/trunk/src/aux/rand_gauss.f90 -atmos_param/socrates/src/trunk/src/general/make_block_2_1.f90 -atmos_param/socrates/src/trunk/src/general/make_block_11.f90 -atmos_param/socrates/src/trunk/src/general/make_block_12.f90 -atmos_param/socrates/src/trunk/src/general/sum_unity.f90 -atmos_param/socrates/src/trunk/src/general/trapezoid_90.f90 -atmos_param/socrates/src/trunk/src/general/get_free_unit.F90 -atmos_param/socrates/src/trunk/src/general/rayleigh_scatter.f90 -atmos_param/socrates/src/trunk/src/general/make_block_18.f90 -atmos_param/socrates/src/trunk/src/general/remove_negative_gas_90.f90 -atmos_param/socrates/src/trunk/src/general/make_block_17.f90 -atmos_param/socrates/src/trunk/src/general/make_block_1.f90 -atmos_param/socrates/src/trunk/src/general/make_block_19.f90 -atmos_param/socrates/src/trunk/src/general/make_block_0.f90 -atmos_param/socrates/src/trunk/src/general/make_block_10.f90 -atmos_param/socrates/src/trunk/src/general/make_block_14.f90 -atmos_param/socrates/src/trunk/src/general/read_solar_spectrum.f90 -atmos_param/socrates/src/trunk/src/general/remove_negative_cont_90.f90 -atmos_param/socrates/src/trunk/src/general/make_block_3_1.f90 -atmos_param/socrates/src/trunk/src/general/set_interactive.f90 -atmos_param/socrates/src/trunk/src/general/make_block_8.f90 -atmos_param/socrates/src/trunk/src/general/make_block_3.f90 -atmos_param/socrates/src/trunk/src/general/make_block_15.f90 -atmos_param/socrates/src/trunk/src/general/make_block_9.f90 -atmos_param/socrates/src/trunk/src/general/read_instrument_response_90.f90 -atmos_param/socrates/src/trunk/src/general/make_block_4.f90 -atmos_param/socrates/src/trunk/src/general/map_heap_func.f90 -atmos_param/socrates/src/trunk/src/general/make_block_6.f90 -atmos_param/socrates/src/trunk/src/general/out_spectrum.f90 -atmos_param/socrates/src/trunk/src/general/make_block_2.f90 -atmos_param/socrates/src/trunk/src/general/rayleigh_jeans_tail.f90 -atmos_param/socrates/src/trunk/src/general/solar_intensity.f90 -atmos_param/socrates/src/trunk/src/general/make_block_5.f90 -atmos_param/socrates/src/trunk/src/general/rayleigh_scatter_h2he.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_field_cdf_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_refract.f90 -atmos_param/socrates/src/trunk/src/modules_gen/scatter_pp_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_std_io_icf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_cdl_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/refract_re_ccf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_inst_flt.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_pp_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/weighting_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/error_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/file_type_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_data_in_icf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_cdf_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/unit_list_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/realtypefx_rd.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_solarspec.f90 -atmos_param/socrates/src/trunk/src/modules_gen/interp_mode_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_fixed_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_field_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/input_head_pcf.f90 -atmos_param/socrates/src/trunk/src/radiation_control/close_cloud_gen.F90 -atmos_param/socrates/src/trunk/src/radiation_control/mcica_order.F90 -atmos_param/socrates/src/trunk/src/radiation_control/rand_no_mcica.F90 -atmos_param/socrates/src/trunk/src/radiation_control/set_moist_aerosol_properties.F90 -atmos_param/socrates/src/trunk/src/radiation_control/mcica_mod.F90 -atmos_param/socrates/src/trunk/src/radiation_control/cld_generator_mod.F90 -atmos_param/socrates/src/trunk/src/radiation_control/open_cloud_gen.F90 -atmos_param/socrates/src/trunk/src/modules_core/errormessagelength_mod.F90 -atmos_param/socrates/src/trunk/src/modules_core/dimensions_spec_ucf.F90 -atmos_param/socrates/src/trunk/src/modules_core/rad_ccf.F90 -atmos_param/socrates/src/trunk/src/modules_core/yomhook.F90 -atmos_param/socrates/src/trunk/src/modules_core/parkind1.F90 -atmos_param/socrates/src/trunk/src/modules_core/file_manager.F90 -atmos_param/socrates/src/trunk/src/modules_core/missing_data_mod.F90 -atmos_param/socrates/src/trunk/src/modules_core/vectlib_mod.F90 -atmos_param/socrates/src/trunk/src/modules_core/ereport_mod.F90 -atmos_param/socrates/src/trunk/src/modules_core/realtype_rd.f90 -atmos_param/socrates/src/trunk/src/modules_core/filenamelength_mod.F90 -atmos_param/socrates/src/trunk/src/aux/output_vert_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_opt_cdf.f -atmos_param/socrates/src/trunk/src/aux/assign_input_ss_cdl.f -atmos_param/socrates/src/trunk/src/aux/split_cdl_line.f -atmos_param/socrates/src/trunk/src/aux/input_cloud_cdf.f -atmos_param/socrates/src/trunk/src/aux/assign_viewing_geom_cdl.f -atmos_param/socrates/src/trunk/src/aux/read_samson_p_field.f -atmos_param/socrates/src/trunk/src/aux/output_opt_profile_cdl.f -atmos_param/socrates/src/trunk/src/aux/input_cloud_cdl.f -atmos_param/socrates/src/trunk/src/aux/output_radiance_cdl.f -atmos_param/socrates/src/trunk/src/aux/fnc_density.f -atmos_param/socrates/src/trunk/src/aux/calc_volume_fraction.f -atmos_param/socrates/src/trunk/src/aux/calc_cdl_stride.f -atmos_param/socrates/src/trunk/src/aux/interp.f -atmos_param/socrates/src/trunk/src/aux/merge_pressure.f -atmos_param/socrates/src/trunk/src/aux/angular_control_cdf.f -atmos_param/socrates/src/trunk/src/aux/extinction_profile.f -atmos_param/socrates/src/trunk/src/aux/read_genln2_flux.f -atmos_param/socrates/src/trunk/src/aux/write_cdl.f -atmos_param/socrates/src/trunk/src/aux/find_var_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_vert_cdf.f -atmos_param/socrates/src/trunk/src/aux/input_aerosol_cdf.f -atmos_param/socrates/src/trunk/src/aux/assign_input_novert_cdl.f -atmos_param/socrates/src/trunk/src/aux/find_dimen_cdl.f -atmos_param/socrates/src/trunk/src/aux/output_flux_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_opt_cdl.f -atmos_param/socrates/src/trunk/src/aux/output_horiz_cdl.f -atmos_param/socrates/src/trunk/src/aux/seaalbedo_driver.f -atmos_param/socrates/src/trunk/src/aux/assign_viewing_geom_cdf.f -atmos_param/socrates/src/trunk/src/aux/angular_control.f -atmos_param/socrates/src/trunk/src/aux/output_vert_cdf.f -atmos_param/socrates/src/trunk/src/aux/output_view_cdl.f -atmos_param/socrates/src/trunk/src/aux/read_raw_profile.f -atmos_param/socrates/src/trunk/src/aux/qsat_gg_ice.f -atmos_param/socrates/src/trunk/src/aux/output_flux_cdf.f -atmos_param/socrates/src/trunk/src/aux/assign_surface_char_cdf.f -atmos_param/socrates/src/trunk/src/aux/name_length.f -atmos_param/socrates/src/trunk/src/aux/sort_raw_profile.f -atmos_param/socrates/src/trunk/src/aux/read_averaged_scatter.f -atmos_param/socrates/src/trunk/src/aux/write_cdl_field.f -atmos_param/socrates/src/trunk/src/aux/planck_ss_source.f -atmos_param/socrates/src/trunk/src/aux/output_photolysis_cdf.f -atmos_param/socrates/src/trunk/src/aux/output_radiance_cdf.f -atmos_param/socrates/src/trunk/src/aux/interpolate_p.f -atmos_param/socrates/src/trunk/src/aux/write_profile.f -atmos_param/socrates/src/trunk/src/aux/assign_surface_char_cdl.f -atmos_param/socrates/src/trunk/src/aux/planck_cumul.f -atmos_param/socrates/src/trunk/src/aux/input_aerosol_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_novert_cdf.f -atmos_param/socrates/src/trunk/src/aux/output_surf_cdl.f -atmos_param/socrates/src/trunk/src/aux/mono_rad_ss.f -atmos_param/socrates/src/trunk/src/aux/assign_horiz_cdl.f -atmos_param/socrates/src/trunk/src/aux/qsat.f -atmos_param/socrates/src/trunk/src/aux/set_state.f -atmos_param/socrates/src/trunk/src/aux/l_find_component.f -atmos_param/socrates/src/trunk/src/aux/qsat_gg.f -atmos_param/socrates/src/trunk/src/aux/read_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_vert_cdl.f -atmos_param/socrates/src/trunk/src/aux/output_photolysis_cdl.f -atmos_param/socrates/src/trunk/src/general/non_blank.f -atmos_param/socrates/src/trunk/src/general/remove_blank.f -atmos_param/socrates/src/trunk/src/general/simpsons_rule.f -atmos_param/socrates/src/trunk/src/general/point_bracket.f -atmos_param/socrates/src/trunk/src/general/trapezoid.f -atmos_param/socrates/src/trunk/src/general/planck.f -atmos_param/socrates/src/trunk/src/general/read_line.f -atmos_param/socrates/src/trunk/src/general/make_block_6_1.f -atmos_param/socrates/src/trunk/src/general/calc_thermal_coeff.f -atmos_param/socrates/src/trunk/src/general/open_file_out.f -atmos_param/socrates/src/trunk/src/general/back_substitute.f -atmos_param/socrates/src/trunk/src/general/open_file_in.f -atmos_param/socrates/src/trunk/src/general/integrate_spline.f -atmos_param/socrates/src/trunk/src/general/rayleigh_scatter_air.f -atmos_param/socrates/src/trunk/src/general/lock_code.f -atmos_param/socrates/src/trunk/src/general/make_block_6_2.f -atmos_param/socrates/src/trunk/src/general/inner_bracket.f -atmos_param/socrates/src/trunk/src/general/svd_decompose.f -atmos_param/socrates/src/trunk/src/general/calc_planck_tbl.f -atmos_param/socrates/src/trunk/src/general/read_word.f \ No newline at end of file +atmos_param/socrates/src/1703/src/aux/cdf_struc.finc +atmos_param/socrates/src/1703/src/aux/cdl_struc.finc +atmos_param/socrates/src/1703/src/aux/dec_disort.finc +atmos_param/socrates/src/1703/src/aux/call_disort.finc +atmos_param/socrates/src/1703/src/general/batch_error_main.finc +atmos_param/socrates/src/1703/src/general/aerosol_component.finc +atmos_param/socrates/src/1703/src/radiance_core/gauss_angle.F90 +atmos_param/socrates/src/1703/src/radiance_core/solver_mix_direct.F90 +atmos_param/socrates/src/1703/src/radiance_core/set_dirn_weights.F90 +atmos_param/socrates/src/1703/src/radiance_core/calc_brdf.F90 +atmos_param/socrates/src/1703/src/radiance_core/triple_solar_source.F90 +atmos_param/socrates/src/1703/src/radiance_core/eval_uplm.F90 +atmos_param/socrates/src/1703/src/radiance_core/shell_sort.F90 +atmos_param/socrates/src/1703/src/radiance_core/rad_pcf.F90 +atmos_param/socrates/src/1703/src/radiance_core/check_phf_term.F90 +atmos_param/socrates/src/1703/src/radiance_core/set_n_source_coeff.F90 +atmos_param/socrates/src/1703/src/radiance_core/calc_surf_rad.F90 +atmos_param/socrates/src/1703/src/radiance_core/solve_band_random_overlap.F90 +atmos_param/socrates/src/1703/src/radiance_core/scale_absorb.F90 +atmos_param/socrates/src/1703/src/radiance_core/calculate_density.F90 +atmos_param/socrates/src/1703/src/radiance_core/calc_flux_ipa.F90 +atmos_param/socrates/src/1703/src/radiance_core/opt_prop_ice_cloud.F90 +atmos_param/socrates/src/1703/src/radiance_core/diff_planck_source_tbl.F90 +atmos_param/socrates/src/1703/src/radiance_core/eig_sys.F90 +atmos_param/socrates/src/1703/src/radiance_core/adjust_ir_radiance.F90 +atmos_param/socrates/src/1703/src/radiance_core/set_rad_layer.F90 +atmos_param/socrates/src/1703/src/radiance_core/def_dimen.F90 +atmos_param/socrates/src/1703/src/radiance_core/mcica_column.F90 +atmos_param/socrates/src/1703/src/radiance_core/interp1d.F90 +atmos_param/socrates/src/1703/src/radiance_core/calc_uplm_zero.F90 +atmos_param/socrates/src/1703/src/radiance_core/spline_fit.F90 +atmos_param/socrates/src/1703/src/radiance_core/gaussian_weight_pcf.F90 +atmos_param/socrates/src/1703/src/radiance_core/gas_list_pcf.F90 +atmos_param/socrates/src/1703/src/radiance_core/trans_source_coeff.F90 +atmos_param/socrates/src/1703/src/radiance_core/band_solver.F90 +atmos_param/socrates/src/1703/src/radiance_core/mcica_sample.F90 +atmos_param/socrates/src/1703/src/radiance_core/solver_mix_direct_hogan.F90 +atmos_param/socrates/src/1703/src/radiance_core/calc_uplm_sol.F90 +atmos_param/socrates/src/1703/src/radiance_core/sph_matrix_solver.F90 +atmos_param/socrates/src/1703/src/radiance_core/def_spectrum.F90 +atmos_param/socrates/src/1703/src/radiance_core/solver_triple_app_scat.F90 +atmos_param/socrates/src/1703/src/radiance_core/grey_opt_prop.F90 +atmos_param/socrates/src/1703/src/radiance_core/calc_gauss_weight_90.F90 +atmos_param/socrates/src/1703/src/radiance_core/sum_k.F90 +atmos_param/socrates/src/1703/src/radiance_core/ses_rescale_contm.F90 +atmos_param/socrates/src/1703/src/radiance_core/spline_evaluate.F90 +atmos_param/socrates/src/1703/src/radiance_core/cg_kappa_ms.F90 +atmos_param/socrates/src/1703/src/radiance_core/def_bound.F90 +atmos_param/socrates/src/1703/src/radiance_core/solve_band_random_overlap_resort_rebin.F90 +atmos_param/socrates/src/1703/src/radiance_core/monochromatic_gas_flux.F90 +atmos_param/socrates/src/1703/src/radiance_core/set_cloud_pointer.F90 +atmos_param/socrates/src/1703/src/radiance_core/set_cloud_geometry.F90 +atmos_param/socrates/src/1703/src/radiance_core/rescale_phase_fnc.F90 +atmos_param/socrates/src/1703/src/radiance_core/monochromatic_radiance_sph.F90 +atmos_param/socrates/src/1703/src/radiance_core/inter_k.F90 +atmos_param/socrates/src/1703/src/radiance_core/solve_band_one_gas.F90 +atmos_param/socrates/src/1703/src/radiance_core/calc_top_rad.F90 +atmos_param/socrates/src/1703/src/radiance_core/set_n_cloud_parameter.F90 +atmos_param/socrates/src/1703/src/radiance_core/set_level_weights.F90 +atmos_param/socrates/src/1703/src/radiance_core/solve_band_k_eqv_scl.F90 +atmos_param/socrates/src/1703/src/radiance_core/set_matrix_pentadiagonal.F90 +atmos_param/socrates/src/1703/src/radiance_core/mix_app_scat.F90 +atmos_param/socrates/src/1703/src/radiance_core/def_out.F90 +atmos_param/socrates/src/1703/src/radiance_core/sol_scat_cos.F90 +atmos_param/socrates/src/1703/src/radiance_core/copy_clr_full.F90 +atmos_param/socrates/src/1703/src/radiance_core/eigenvalue_tri.F90 +atmos_param/socrates/src/1703/src/radiance_core/solver_homogen_direct.F90 +atmos_param/socrates/src/1703/src/radiance_core/rescale_continuum.F90 +atmos_param/socrates/src/1703/src/radiance_core/mixed_solar_source.F90 +atmos_param/socrates/src/1703/src/radiance_core/def_aer.F90 +atmos_param/socrates/src/1703/src/radiance_core/opt_prop_inhom_corr_cairns.F90 +atmos_param/socrates/src/1703/src/radiance_core/rebin_esft_terms.F90 +atmos_param/socrates/src/1703/src/radiance_core/mix_column.F90 +atmos_param/socrates/src/1703/src/radiance_core/prsc_gather_spline.F90 +atmos_param/socrates/src/1703/src/radiance_core/calc_cg_coeff.F90 +atmos_param/socrates/src/1703/src/radiance_core/inter_pt_lookup.F90 +atmos_param/socrates/src/1703/src/radiance_core/opt_prop_ukca_aerosol.F90 +atmos_param/socrates/src/1703/src/radiance_core/scale_wenyi.F90 +atmos_param/socrates/src/1703/src/radiance_core/triple_column.F90 +atmos_param/socrates/src/1703/src/radiance_core/single_scattering_all.F90 +atmos_param/socrates/src/1703/src/radiance_core/inter_pt.F90 +atmos_param/socrates/src/1703/src/radiance_core/overlap_coupled.F90 +atmos_param/socrates/src/1703/src/radiance_core/def_cld.F90 +atmos_param/socrates/src/1703/src/radiance_core/solar_coefficient_basic.F90 +atmos_param/socrates/src/1703/src/radiance_core/build_sph_matrix.F90 +atmos_param/socrates/src/1703/src/radiance_core/solve_band_k_eqv.F90 +atmos_param/socrates/src/1703/src/radiance_core/augment_tiled_radiance.F90 +atmos_param/socrates/src/1703/src/radiance_core/column_solver.F90 +atmos_param/socrates/src/1703/src/radiance_core/augment_radiance.F90 +atmos_param/socrates/src/1703/src/radiance_core/def_control.F90 +atmos_param/socrates/src/1703/src/radiance_core/two_coeff_basic.F90 +atmos_param/socrates/src/1703/src/radiance_core/sph_solver.F90 +atmos_param/socrates/src/1703/src/radiance_core/solver_no_scat.F90 +atmos_param/socrates/src/1703/src/radiance_core/copy_clr_sol.F90 +atmos_param/socrates/src/1703/src/radiance_core/solar_source.F90 +atmos_param/socrates/src/1703/src/radiance_core/opt_prop_water_cloud.F90 +atmos_param/socrates/src/1703/src/radiance_core/legendre_weight.F90 +atmos_param/socrates/src/1703/src/radiance_core/solve_band_without_gas.F90 +atmos_param/socrates/src/1703/src/radiance_core/diff_albedo_basis.F90 +atmos_param/socrates/src/1703/src/radiance_core/increment_rad_cf.F90 +atmos_param/socrates/src/1703/src/radiance_core/single_scat_sol.F90 +atmos_param/socrates/src/1703/src/radiance_core/opt_prop_aerosol.F90 +atmos_param/socrates/src/1703/src/radiance_core/solve_band_ses.F90 +atmos_param/socrates/src/1703/src/radiance_core/def_ss_prop.F90 +atmos_param/socrates/src/1703/src/radiance_core/prsc_opt_prop.F90 +atmos_param/socrates/src/1703/src/radiance_core/layer_part_integ.F90 +atmos_param/socrates/src/1703/src/radiance_core/two_coeff_fast_lw.F90 +atmos_param/socrates/src/1703/src/radiance_core/gas_optical_properties.F90 +atmos_param/socrates/src/1703/src/radiance_core/single_scattering.F90 +atmos_param/socrates/src/1703/src/radiance_core/monochromatic_ir_radiance.F90 +atmos_param/socrates/src/1703/src/radiance_core/hemi_sph_integ.F90 +atmos_param/socrates/src/1703/src/radiance_core/two_coeff_cloud.F90 +atmos_param/socrates/src/1703/src/radiance_core/read_spectrum.F90 +atmos_param/socrates/src/1703/src/radiance_core/inter_t_lookup.F90 +atmos_param/socrates/src/1703/src/radiance_core/solver_triple.F90 +atmos_param/socrates/src/1703/src/radiance_core/two_stream.F90 +atmos_param/socrates/src/1703/src/radiance_core/solver_triple_hogan.F90 +atmos_param/socrates/src/1703/src/radiance_core/monochromatic_radiance_tseq.F90 +atmos_param/socrates/src/1703/src/radiance_core/cloud_maxcs_split.F90 +atmos_param/socrates/src/1703/src/radiance_core/def_atm.F90 +atmos_param/socrates/src/1703/src/radiance_core/two_coeff.F90 +atmos_param/socrates/src/1703/src/radiance_core/two_coeff_region.F90 +atmos_param/socrates/src/1703/src/radiance_core/quicksort.F90 +atmos_param/socrates/src/1703/src/radiance_core/rescale_tau_omega.F90 +atmos_param/socrates/src/1703/src/radiance_core/calc_radiance_ipa.F90 +atmos_param/socrates/src/1703/src/radiance_core/two_coeff_region_fast_lw.F90 +atmos_param/socrates/src/1703/src/radiance_core/diff_planck_source_poly.F90 +atmos_param/socrates/src/1703/src/radiance_core/set_truncation.F90 +atmos_param/socrates/src/1703/src/radiance_core/monochromatic_radiance.F90 +atmos_param/socrates/src/1703/src/radiance_core/aggregate_cloud.F90 +atmos_param/socrates/src/1703/src/radiance_core/radiance_calc.F90 +atmos_param/socrates/src/1703/src/radiance_core/ir_source.F90 +atmos_param/socrates/src/1703/src/aux/qsat_wat.F90 +atmos_param/socrates/src/1703/src/aux/qsat_gill.F90 +atmos_param/socrates/src/1703/src/aux/write_cdf.f90 +atmos_param/socrates/src/1703/src/aux/read_cdf.f90 +atmos_param/socrates/src/1703/src/aux/aerosol_representation_pcf.f90 +atmos_param/socrates/src/1703/src/aux/aerosol_profile_pcf.f90 +atmos_param/socrates/src/1703/src/aux/write_samson.f90 +atmos_param/socrates/src/1703/src/aux/filter_function.f90 +atmos_param/socrates/src/1703/src/aux/qsat_alg_pcf.f90 +atmos_param/socrates/src/1703/src/aux/method_merge_pcf.f90 +atmos_param/socrates/src/1703/src/aux/rand_gauss.f90 +atmos_param/socrates/src/1703/src/general/make_block_2_1.f90 +atmos_param/socrates/src/1703/src/general/make_block_11.f90 +atmos_param/socrates/src/1703/src/general/make_block_12.f90 +atmos_param/socrates/src/1703/src/general/sum_unity.f90 +atmos_param/socrates/src/1703/src/general/trapezoid_90.f90 +atmos_param/socrates/src/1703/src/general/get_free_unit.F90 +atmos_param/socrates/src/1703/src/general/rayleigh_scatter.f90 +atmos_param/socrates/src/1703/src/general/make_block_18.f90 +atmos_param/socrates/src/1703/src/general/remove_negative_gas_90.f90 +atmos_param/socrates/src/1703/src/general/make_block_17.f90 +atmos_param/socrates/src/1703/src/general/make_block_1.f90 +atmos_param/socrates/src/1703/src/general/make_block_19.f90 +atmos_param/socrates/src/1703/src/general/make_block_0.f90 +atmos_param/socrates/src/1703/src/general/make_block_10.f90 +atmos_param/socrates/src/1703/src/general/make_block_14.f90 +atmos_param/socrates/src/1703/src/general/read_solar_spectrum.f90 +atmos_param/socrates/src/1703/src/general/remove_negative_cont_90.f90 +atmos_param/socrates/src/1703/src/general/make_block_3_1.f90 +atmos_param/socrates/src/1703/src/general/set_interactive.f90 +atmos_param/socrates/src/1703/src/general/make_block_8.f90 +atmos_param/socrates/src/1703/src/general/make_block_3.f90 +atmos_param/socrates/src/1703/src/general/make_block_15.f90 +atmos_param/socrates/src/1703/src/general/make_block_9.f90 +atmos_param/socrates/src/1703/src/general/read_instrument_response_90.f90 +atmos_param/socrates/src/1703/src/general/make_block_4.f90 +atmos_param/socrates/src/1703/src/general/map_heap_func.f90 +atmos_param/socrates/src/1703/src/general/make_block_6.f90 +atmos_param/socrates/src/1703/src/general/out_spectrum.f90 +atmos_param/socrates/src/1703/src/general/make_block_2.f90 +atmos_param/socrates/src/1703/src/general/rayleigh_jeans_tail.f90 +atmos_param/socrates/src/1703/src/general/solar_intensity.f90 +atmos_param/socrates/src/1703/src/general/make_block_5.f90 +atmos_param/socrates/src/1703/src/general/rayleigh_scatter_h2he.f90 +atmos_param/socrates/src/1703/src/modules_gen/dimensions_field_cdf_ucf.f90 +atmos_param/socrates/src/1703/src/modules_gen/def_refract.f90 +atmos_param/socrates/src/1703/src/modules_gen/scatter_pp_pcf.f90 +atmos_param/socrates/src/1703/src/modules_gen/def_std_io_icf.f90 +atmos_param/socrates/src/1703/src/modules_gen/dimensions_cdl_ucf.f90 +atmos_param/socrates/src/1703/src/modules_gen/refract_re_ccf.f90 +atmos_param/socrates/src/1703/src/modules_gen/def_inst_flt.f90 +atmos_param/socrates/src/1703/src/modules_gen/dimensions_pp_ucf.f90 +atmos_param/socrates/src/1703/src/modules_gen/weighting_pcf.f90 +atmos_param/socrates/src/1703/src/modules_gen/error_pcf.f90 +atmos_param/socrates/src/1703/src/modules_gen/file_type_pcf.f90 +atmos_param/socrates/src/1703/src/modules_gen/def_data_in_icf.f90 +atmos_param/socrates/src/1703/src/modules_gen/dimensions_cdf_ucf.f90 +atmos_param/socrates/src/1703/src/modules_gen/unit_list_pcf.f90 +atmos_param/socrates/src/1703/src/modules_gen/realtypefx_rd.f90 +atmos_param/socrates/src/1703/src/modules_gen/def_solarspec.f90 +atmos_param/socrates/src/1703/src/modules_gen/interp_mode_pcf.f90 +atmos_param/socrates/src/1703/src/modules_gen/dimensions_fixed_pcf.f90 +atmos_param/socrates/src/1703/src/modules_gen/dimensions_field_ucf.f90 +atmos_param/socrates/src/1703/src/modules_gen/input_head_pcf.f90 +atmos_param/socrates/src/1703/src/radiation_control/close_cloud_gen.F90 +atmos_param/socrates/src/1703/src/radiation_control/mcica_order.F90 +atmos_param/socrates/src/1703/src/radiation_control/rand_no_mcica.F90 +atmos_param/socrates/src/1703/src/radiation_control/set_moist_aerosol_properties.F90 +atmos_param/socrates/src/1703/src/radiation_control/mcica_mod.F90 +atmos_param/socrates/src/1703/src/radiation_control/cld_generator_mod.F90 +atmos_param/socrates/src/1703/src/radiation_control/open_cloud_gen.F90 +atmos_param/socrates/src/1703/src/modules_core/errormessagelength_mod.F90 +atmos_param/socrates/src/1703/src/modules_core/dimensions_spec_ucf.F90 +atmos_param/socrates/src/1703/src/modules_core/rad_ccf.F90 +atmos_param/socrates/src/1703/src/modules_core/yomhook.F90 +atmos_param/socrates/src/1703/src/modules_core/parkind1.F90 +atmos_param/socrates/src/1703/src/modules_core/file_manager.F90 +atmos_param/socrates/src/1703/src/modules_core/missing_data_mod.F90 +atmos_param/socrates/src/1703/src/modules_core/vectlib_mod.F90 +atmos_param/socrates/src/1703/src/modules_core/ereport_mod.F90 +atmos_param/socrates/src/1703/src/modules_core/realtype_rd.f90 +atmos_param/socrates/src/1703/src/modules_core/filenamelength_mod.F90 +atmos_param/socrates/src/1703/src/aux/output_vert_cdl.f +atmos_param/socrates/src/1703/src/aux/assign_input_opt_cdf.f +atmos_param/socrates/src/1703/src/aux/assign_input_ss_cdl.f +atmos_param/socrates/src/1703/src/aux/split_cdl_line.f +atmos_param/socrates/src/1703/src/aux/input_cloud_cdf.f +atmos_param/socrates/src/1703/src/aux/assign_viewing_geom_cdl.f +atmos_param/socrates/src/1703/src/aux/read_samson_p_field.f +atmos_param/socrates/src/1703/src/aux/output_opt_profile_cdl.f +atmos_param/socrates/src/1703/src/aux/input_cloud_cdl.f +atmos_param/socrates/src/1703/src/aux/output_radiance_cdl.f +atmos_param/socrates/src/1703/src/aux/fnc_density.f +atmos_param/socrates/src/1703/src/aux/calc_volume_fraction.f +atmos_param/socrates/src/1703/src/aux/calc_cdl_stride.f +atmos_param/socrates/src/1703/src/aux/interp.f +atmos_param/socrates/src/1703/src/aux/merge_pressure.f +atmos_param/socrates/src/1703/src/aux/angular_control_cdf.f +atmos_param/socrates/src/1703/src/aux/extinction_profile.f +atmos_param/socrates/src/1703/src/aux/read_genln2_flux.f +atmos_param/socrates/src/1703/src/aux/write_cdl.f +atmos_param/socrates/src/1703/src/aux/find_var_cdl.f +atmos_param/socrates/src/1703/src/aux/assign_input_vert_cdf.f +atmos_param/socrates/src/1703/src/aux/input_aerosol_cdf.f +atmos_param/socrates/src/1703/src/aux/assign_input_novert_cdl.f +atmos_param/socrates/src/1703/src/aux/find_dimen_cdl.f +atmos_param/socrates/src/1703/src/aux/output_flux_cdl.f +atmos_param/socrates/src/1703/src/aux/assign_input_opt_cdl.f +atmos_param/socrates/src/1703/src/aux/output_horiz_cdl.f +atmos_param/socrates/src/1703/src/aux/seaalbedo_driver.f +atmos_param/socrates/src/1703/src/aux/assign_viewing_geom_cdf.f +atmos_param/socrates/src/1703/src/aux/angular_control.f +atmos_param/socrates/src/1703/src/aux/output_vert_cdf.f +atmos_param/socrates/src/1703/src/aux/output_view_cdl.f +atmos_param/socrates/src/1703/src/aux/read_raw_profile.f +atmos_param/socrates/src/1703/src/aux/qsat_gg_ice.f +atmos_param/socrates/src/1703/src/aux/output_flux_cdf.f +atmos_param/socrates/src/1703/src/aux/assign_surface_char_cdf.f +atmos_param/socrates/src/1703/src/aux/name_length.f +atmos_param/socrates/src/1703/src/aux/sort_raw_profile.f +atmos_param/socrates/src/1703/src/aux/read_averaged_scatter.f +atmos_param/socrates/src/1703/src/aux/write_cdl_field.f +atmos_param/socrates/src/1703/src/aux/planck_ss_source.f +atmos_param/socrates/src/1703/src/aux/output_photolysis_cdf.f +atmos_param/socrates/src/1703/src/aux/output_radiance_cdf.f +atmos_param/socrates/src/1703/src/aux/interpolate_p.f +atmos_param/socrates/src/1703/src/aux/write_profile.f +atmos_param/socrates/src/1703/src/aux/assign_surface_char_cdl.f +atmos_param/socrates/src/1703/src/aux/planck_cumul.f +atmos_param/socrates/src/1703/src/aux/input_aerosol_cdl.f +atmos_param/socrates/src/1703/src/aux/assign_input_novert_cdf.f +atmos_param/socrates/src/1703/src/aux/output_surf_cdl.f +atmos_param/socrates/src/1703/src/aux/mono_rad_ss.f +atmos_param/socrates/src/1703/src/aux/assign_horiz_cdl.f +atmos_param/socrates/src/1703/src/aux/qsat.f +atmos_param/socrates/src/1703/src/aux/set_state.f +atmos_param/socrates/src/1703/src/aux/l_find_component.f +atmos_param/socrates/src/1703/src/aux/qsat_gg.f +atmos_param/socrates/src/1703/src/aux/read_cdl.f +atmos_param/socrates/src/1703/src/aux/assign_input_vert_cdl.f +atmos_param/socrates/src/1703/src/aux/output_photolysis_cdl.f +atmos_param/socrates/src/1703/src/general/non_blank.f +atmos_param/socrates/src/1703/src/general/remove_blank.f +atmos_param/socrates/src/1703/src/general/simpsons_rule.f +atmos_param/socrates/src/1703/src/general/point_bracket.f +atmos_param/socrates/src/1703/src/general/trapezoid.f +atmos_param/socrates/src/1703/src/general/planck.f +atmos_param/socrates/src/1703/src/general/read_line.f +atmos_param/socrates/src/1703/src/general/make_block_6_1.f +atmos_param/socrates/src/1703/src/general/calc_thermal_coeff.f +atmos_param/socrates/src/1703/src/general/open_file_out.f +atmos_param/socrates/src/1703/src/general/back_substitute.f +atmos_param/socrates/src/1703/src/general/open_file_in.f +atmos_param/socrates/src/1703/src/general/integrate_spline.f +atmos_param/socrates/src/1703/src/general/rayleigh_scatter_air.f +atmos_param/socrates/src/1703/src/general/lock_code.f +atmos_param/socrates/src/1703/src/general/make_block_6_2.f +atmos_param/socrates/src/1703/src/general/inner_bracket.f +atmos_param/socrates/src/1703/src/general/svd_decompose.f +atmos_param/socrates/src/1703/src/general/calc_planck_tbl.f +atmos_param/socrates/src/1703/src/general/read_word.f \ No newline at end of file diff --git a/src/extra/model/socrates/socrates_version_paths/2207 b/src/extra/model/socrates/socrates_version_paths/2207 index 1c2f68854..c0f3db254 100644 --- a/src/extra/model/socrates/socrates_version_paths/2207 +++ b/src/extra/model/socrates/socrates_version_paths/2207 @@ -1,296 +1,296 @@ -atmos_param/socrates/src/trunk/src/aux/cdf_struc.finc -atmos_param/socrates/src/trunk/src/aux/cdl_struc.finc -atmos_param/socrates/src/trunk/src/aux/dec_disort.finc -atmos_param/socrates/src/trunk/src/aux/call_disort.finc -atmos_param/socrates/src/trunk/src/general/batch_error_main.finc -atmos_param/socrates/src/trunk/src/general/aerosol_component.finc -atmos_param/socrates/src/trunk/src/radiance_core/gauss_angle.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_mix_direct.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_dirn_weights.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_brdf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/triple_solar_source.F90 -atmos_param/socrates/src/trunk/src/radiance_core/eval_uplm.F90 -atmos_param/socrates/src/trunk/src/radiance_core/shell_sort.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rad_pcf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/check_phf_term.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_n_source_coeff.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_surf_rad.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_random_overlap.F90 -atmos_param/socrates/src/trunk/src/radiance_core/scale_absorb.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_flux_ipa.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_ice_cloud.F90 -atmos_param/socrates/src/trunk/src/radiance_core/diff_planck_source_mod.F90 -atmos_param/socrates/src/trunk/src/radiance_core/eig_sys.F90 -atmos_param/socrates/src/trunk/src/radiance_core/adjust_ir_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_rad_layer.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_dimen.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mcica_column.F90 -atmos_param/socrates/src/trunk/src/radiance_core/interp1d.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_uplm_zero.F90 -atmos_param/socrates/src/trunk/src/radiance_core/spline_fit.F90 -atmos_param/socrates/src/trunk/src/radiance_core/gaussian_weight_pcf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/gas_list_pcf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/trans_source_coeff.F90 -atmos_param/socrates/src/trunk/src/radiance_core/band_solver.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mcica_sample.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_mix_direct_hogan.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_uplm_sol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/sph_matrix_solver.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_spectrum.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_triple_app_scat.F90 -atmos_param/socrates/src/trunk/src/radiance_core/grey_opt_prop.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_gauss_weight_90.F90 -atmos_param/socrates/src/trunk/src/radiance_core/sum_k.F90 -atmos_param/socrates/src/trunk/src/radiance_core/ses_rescale_contm.F90 -atmos_param/socrates/src/trunk/src/radiance_core/spline_evaluate.F90 -atmos_param/socrates/src/trunk/src/radiance_core/cg_kappa_ms.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_bound.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_random_overlap_resort_rebin.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_gas_flux.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_cloud_pointer.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_cloud_geometry.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rescale_phase_fnc.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_radiance_sph.F90 -atmos_param/socrates/src/trunk/src/radiance_core/inter_k.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_one_gas.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_top_rad.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_n_cloud_parameter.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_level_weights.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_k_eqv_scl.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_matrix_pentadiagonal.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mix_app_scat.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_out.F90 -atmos_param/socrates/src/trunk/src/radiance_core/sol_scat_cos.F90 -atmos_param/socrates/src/trunk/src/radiance_core/copy_clr_full.F90 -atmos_param/socrates/src/trunk/src/radiance_core/eigenvalue_tri.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_homogen_direct.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rescale_continuum.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mixed_solar_source.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_aer.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_inhom_corr_cairns.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rebin_esft_terms.F90 -atmos_param/socrates/src/trunk/src/radiance_core/mix_column.F90 -atmos_param/socrates/src/trunk/src/radiance_core/prsc_gather_spline.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_cg_coeff.F90 -atmos_param/socrates/src/trunk/src/radiance_core/inter_pt_lookup.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_ukca_aerosol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/scale_wenyi.F90 -atmos_param/socrates/src/trunk/src/radiance_core/triple_column.F90 -atmos_param/socrates/src/trunk/src/radiance_core/single_scattering_all.F90 -atmos_param/socrates/src/trunk/src/radiance_core/inter_pt.F90 -atmos_param/socrates/src/trunk/src/radiance_core/overlap_coupled.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_cld.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solar_coefficient_basic.F90 -atmos_param/socrates/src/trunk/src/radiance_core/build_sph_matrix.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_k_eqv.F90 -atmos_param/socrates/src/trunk/src/radiance_core/augment_tiled_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/column_solver.F90 -atmos_param/socrates/src/trunk/src/radiance_core/augment_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_control.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_basic.F90 -atmos_param/socrates/src/trunk/src/radiance_core/sph_solver.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_no_scat.F90 -atmos_param/socrates/src/trunk/src/radiance_core/copy_clr_sol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solar_source.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_water_cloud.F90 -atmos_param/socrates/src/trunk/src/radiance_core/legendre_weight.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_without_gas.F90 -atmos_param/socrates/src/trunk/src/radiance_core/diff_albedo_basis.F90 -atmos_param/socrates/src/trunk/src/radiance_core/increment_rad_cf.F90 -atmos_param/socrates/src/trunk/src/radiance_core/single_scat_sol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/opt_prop_aerosol.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solve_band_ses.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_ss_prop.F90 -atmos_param/socrates/src/trunk/src/radiance_core/prsc_opt_prop.F90 -atmos_param/socrates/src/trunk/src/radiance_core/layer_part_integ.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_fast_lw.F90 -atmos_param/socrates/src/trunk/src/radiance_core/gas_optical_properties.F90 -atmos_param/socrates/src/trunk/src/radiance_core/single_scattering.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_ir_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/hemi_sph_integ.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_cloud.F90 -atmos_param/socrates/src/trunk/src/radiance_core/read_spectrum.F90 -atmos_param/socrates/src/trunk/src/radiance_core/inter_t_lookup.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_triple.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_stream.F90 -atmos_param/socrates/src/trunk/src/radiance_core/solver_triple_hogan.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_radiance_tseq.F90 -atmos_param/socrates/src/trunk/src/radiance_core/cloud_maxcs_split.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_atm.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_region.F90 -atmos_param/socrates/src/trunk/src/radiance_core/quicksort.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rescale_tau_omega.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_radiance_ipa.F90 -atmos_param/socrates/src/trunk/src/radiance_core/two_coeff_region_fast_lw.F90 -atmos_param/socrates/src/trunk/src/radiance_core/set_truncation.F90 -atmos_param/socrates/src/trunk/src/radiance_core/monochromatic_radiance.F90 -atmos_param/socrates/src/trunk/src/radiance_core/aggregate_cloud.F90 -atmos_param/socrates/src/trunk/src/radiance_core/radiance_calc.F90 -atmos_param/socrates/src/trunk/src/radiance_core/ir_source.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_planck.F90 -atmos_param/socrates/src/trunk/src/radiance_core/def_spherical_geometry.F90 -atmos_param/socrates/src/trunk/src/radiance_core/spherical_trans_coeff.F90 -atmos_param/socrates/src/trunk/src/radiance_core/spherical_solar_source.F90 -atmos_param/socrates/src/trunk/src/radiance_core/diffusivity_factor.F90 -atmos_param/socrates/src/trunk/src/radiance_core/planck_flux_band_mod.F90 -atmos_param/socrates/src/trunk/src/radiance_core/spherical_path.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_actinic_flux_mod.F90 -atmos_param/socrates/src/trunk/src/nlte/interpolate_p_mod.F90 -atmos_param/socrates/src/trunk/src/radiance_core/rescale_tau_csr.F90 -atmos_param/socrates/src/trunk/src/radiance_core/calc_contrib_func.F90 -atmos_param/socrates/src/trunk/src/radiance_core/circumsolar_fraction.F90 -atmos_param/socrates/src/trunk/src/radiance_core/legendre_mod.F90 -atmos_param/socrates/src/trunk/src/aux/qsat_wat.F90 -atmos_param/socrates/src/trunk/src/aux/qsat_gill.F90 -atmos_param/socrates/src/trunk/src/aux/write_cdf.f90 -atmos_param/socrates/src/trunk/src/aux/read_cdf.f90 -atmos_param/socrates/src/trunk/src/aux/aerosol_representation_pcf.f90 -atmos_param/socrates/src/trunk/src/aux/aerosol_profile_pcf.f90 -atmos_param/socrates/src/trunk/src/aux/write_samson.f90 -atmos_param/socrates/src/trunk/src/aux/filter_function.f90 -atmos_param/socrates/src/trunk/src/aux/qsat_alg_pcf.f90 -atmos_param/socrates/src/trunk/src/aux/method_merge_pcf.f90 -atmos_param/socrates/src/trunk/src/aux/rand_gauss.f90 -atmos_param/socrates/src/trunk/src/general/make_block_2_1.f90 -atmos_param/socrates/src/trunk/src/general/make_block_11.f90 -atmos_param/socrates/src/trunk/src/general/make_block_12.f90 -atmos_param/socrates/src/trunk/src/general/sum_unity.f90 -atmos_param/socrates/src/trunk/src/general/trapezoid_90.f90 -atmos_param/socrates/src/trunk/src/general/get_free_unit.F90 -atmos_param/socrates/src/trunk/src/general/rayleigh_scatter.f90 -atmos_param/socrates/src/trunk/src/general/make_block_18.f90 -atmos_param/socrates/src/trunk/src/general/remove_negative_gas_90.f90 -atmos_param/socrates/src/trunk/src/general/make_block_17.f90 -atmos_param/socrates/src/trunk/src/general/make_block_1.f90 -atmos_param/socrates/src/trunk/src/general/make_block_19.f90 -atmos_param/socrates/src/trunk/src/general/make_block_0.f90 -atmos_param/socrates/src/trunk/src/general/make_block_10.f90 -atmos_param/socrates/src/trunk/src/general/make_block_14.f90 -atmos_param/socrates/src/trunk/src/general/read_solar_spectrum.f90 -atmos_param/socrates/src/trunk/src/general/remove_negative_cont_90.f90 -atmos_param/socrates/src/trunk/src/general/make_block_3_1.f90 -atmos_param/socrates/src/trunk/src/general/set_interactive.f90 -atmos_param/socrates/src/trunk/src/general/make_block_8.f90 -atmos_param/socrates/src/trunk/src/general/make_block_3.f90 -atmos_param/socrates/src/trunk/src/general/make_block_15.f90 -atmos_param/socrates/src/trunk/src/general/make_block_9.f90 -atmos_param/socrates/src/trunk/src/general/read_instrument_response_90.f90 -atmos_param/socrates/src/trunk/src/general/make_block_4.f90 -atmos_param/socrates/src/trunk/src/general/map_heap_func.f90 -atmos_param/socrates/src/trunk/src/general/make_block_6.f90 -atmos_param/socrates/src/trunk/src/general/out_spectrum.f90 -atmos_param/socrates/src/trunk/src/general/make_block_2.f90 -atmos_param/socrates/src/trunk/src/general/rayleigh_jeans_tail.f90 -atmos_param/socrates/src/trunk/src/general/solar_intensity.f90 -atmos_param/socrates/src/trunk/src/general/make_block_5.f90 -atmos_param/socrates/src/trunk/src/general/rayleigh_scatter_h2he.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_field_cdf_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_refract.f90 -atmos_param/socrates/src/trunk/src/modules_gen/scatter_pp_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_std_io_icf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_cdl_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/refract_re_ccf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_inst_flt.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_pp_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/weighting_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/error_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/file_type_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_data_in_icf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_cdf_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/unit_list_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/realtypefx_rd.f90 -atmos_param/socrates/src/trunk/src/modules_gen/def_solarspec.f90 -atmos_param/socrates/src/trunk/src/modules_gen/interp_mode_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_fixed_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/dimensions_field_ucf.f90 -atmos_param/socrates/src/trunk/src/modules_gen/input_head_pcf.f90 -atmos_param/socrates/src/trunk/src/modules_core/errormessagelength_mod.F90 -atmos_param/socrates/src/trunk/src/modules_core/dimensions_spec_ucf.F90 -atmos_param/socrates/src/trunk/src/modules_core/rad_ccf.F90 -atmos_param/socrates/src/trunk/src/modules_core/yomhook.F90 -atmos_param/socrates/src/trunk/src/modules_core/parkind1.F90 -atmos_param/socrates/src/trunk/src/modules_core/file_manager.F90 -atmos_param/socrates/src/trunk/src/modules_core/missing_data_mod.F90 -atmos_param/socrates/src/trunk/src/modules_core/vectlib_mod.F90 -atmos_param/socrates/src/trunk/src/modules_core/ereport_mod.F90 -atmos_param/socrates/src/trunk/src/modules_core/realtype_rd.f90 -atmos_param/socrates/src/trunk/src/modules_core/filenamelength_mod.F90 -atmos_param/socrates/src/trunk/src/aux/output_vert_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_opt_cdf.f -atmos_param/socrates/src/trunk/src/aux/assign_input_ss_cdl.f -atmos_param/socrates/src/trunk/src/aux/split_cdl_line.f -atmos_param/socrates/src/trunk/src/aux/input_cloud_cdf.f -atmos_param/socrates/src/trunk/src/aux/assign_viewing_geom_cdl.f -atmos_param/socrates/src/trunk/src/aux/read_samson_p_field.f -atmos_param/socrates/src/trunk/src/aux/output_opt_profile_cdl.f -atmos_param/socrates/src/trunk/src/aux/input_cloud_cdl.f -atmos_param/socrates/src/trunk/src/aux/output_radiance_cdl.f -atmos_param/socrates/src/trunk/src/aux/fnc_density.f -atmos_param/socrates/src/trunk/src/aux/calc_volume_fraction.f -atmos_param/socrates/src/trunk/src/aux/calc_cdl_stride.f -atmos_param/socrates/src/trunk/src/aux/interp.f -atmos_param/socrates/src/trunk/src/aux/merge_pressure.f -atmos_param/socrates/src/trunk/src/aux/angular_control_cdf.f -atmos_param/socrates/src/trunk/src/aux/extinction_profile.f -atmos_param/socrates/src/trunk/src/aux/read_genln2_flux.f -atmos_param/socrates/src/trunk/src/aux/write_cdl.f -atmos_param/socrates/src/trunk/src/aux/find_var_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_vert_cdf.f -atmos_param/socrates/src/trunk/src/aux/input_aerosol_cdf.f -atmos_param/socrates/src/trunk/src/aux/assign_input_novert_cdl.f -atmos_param/socrates/src/trunk/src/aux/find_dimen_cdl.f -atmos_param/socrates/src/trunk/src/aux/output_flux_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_opt_cdl.f -atmos_param/socrates/src/trunk/src/aux/output_horiz_cdl.f -atmos_param/socrates/src/trunk/src/aux/seaalbedo_driver.f -atmos_param/socrates/src/trunk/src/aux/assign_viewing_geom_cdf.f -atmos_param/socrates/src/trunk/src/aux/angular_control.f -atmos_param/socrates/src/trunk/src/aux/output_vert_cdf.f -atmos_param/socrates/src/trunk/src/aux/output_view_cdl.f -atmos_param/socrates/src/trunk/src/aux/read_raw_profile.f -atmos_param/socrates/src/trunk/src/aux/qsat_gg_ice.f -atmos_param/socrates/src/trunk/src/aux/output_flux_cdf.f -atmos_param/socrates/src/trunk/src/aux/assign_surface_char_cdf.f -atmos_param/socrates/src/trunk/src/aux/name_length.f -atmos_param/socrates/src/trunk/src/aux/sort_raw_profile.f -atmos_param/socrates/src/trunk/src/aux/read_averaged_scatter.f -atmos_param/socrates/src/trunk/src/aux/write_cdl_field.f -atmos_param/socrates/src/trunk/src/aux/planck_ss_source.f -atmos_param/socrates/src/trunk/src/aux/output_photolysis_cdf.f -atmos_param/socrates/src/trunk/src/aux/output_radiance_cdf.f -atmos_param/socrates/src/trunk/src/aux/write_profile.f -atmos_param/socrates/src/trunk/src/aux/assign_surface_char_cdl.f -atmos_param/socrates/src/trunk/src/aux/planck_cumul.f -atmos_param/socrates/src/trunk/src/aux/input_aerosol_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_novert_cdf.f -atmos_param/socrates/src/trunk/src/aux/output_surf_cdl.f -atmos_param/socrates/src/trunk/src/aux/mono_rad_ss.f -atmos_param/socrates/src/trunk/src/aux/assign_horiz_cdl.f -atmos_param/socrates/src/trunk/src/aux/qsat.f -atmos_param/socrates/src/trunk/src/aux/set_state.f -atmos_param/socrates/src/trunk/src/aux/l_find_component.f -atmos_param/socrates/src/trunk/src/aux/qsat_gg.f -atmos_param/socrates/src/trunk/src/aux/read_cdl.f -atmos_param/socrates/src/trunk/src/aux/assign_input_vert_cdl.f -atmos_param/socrates/src/trunk/src/aux/output_photolysis_cdl.f -atmos_param/socrates/src/trunk/src/general/non_blank.f -atmos_param/socrates/src/trunk/src/general/remove_blank.f -atmos_param/socrates/src/trunk/src/general/simpsons_rule.f -atmos_param/socrates/src/trunk/src/general/point_bracket.f -atmos_param/socrates/src/trunk/src/general/trapezoid.f -atmos_param/socrates/src/trunk/src/general/planck.f -atmos_param/socrates/src/trunk/src/general/read_line.f -atmos_param/socrates/src/trunk/src/general/make_block_6_1.f -atmos_param/socrates/src/trunk/src/general/calc_thermal_coeff.f -atmos_param/socrates/src/trunk/src/general/open_file_out.f -atmos_param/socrates/src/trunk/src/general/back_substitute.f -atmos_param/socrates/src/trunk/src/general/open_file_in.f -atmos_param/socrates/src/trunk/src/general/integrate_spline.f -atmos_param/socrates/src/trunk/src/general/rayleigh_scatter_air.f -atmos_param/socrates/src/trunk/src/general/lock_code.f -atmos_param/socrates/src/trunk/src/general/make_block_6_2.f -atmos_param/socrates/src/trunk/src/general/inner_bracket.f -atmos_param/socrates/src/trunk/src/general/svd_decompose.f -atmos_param/socrates/src/trunk/src/general/calc_planck_tbl.f -atmos_param/socrates/src/trunk/src/general/read_word.f +atmos_param/socrates/src/2207/src/aux/cdf_struc.finc +atmos_param/socrates/src/2207/src/aux/cdl_struc.finc +atmos_param/socrates/src/2207/src/aux/dec_disort.finc +atmos_param/socrates/src/2207/src/aux/call_disort.finc +atmos_param/socrates/src/2207/src/general/batch_error_main.finc +atmos_param/socrates/src/2207/src/general/aerosol_component.finc +atmos_param/socrates/src/2207/src/radiance_core/gauss_angle.F90 +atmos_param/socrates/src/2207/src/radiance_core/solver_mix_direct.F90 +atmos_param/socrates/src/2207/src/radiance_core/set_dirn_weights.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_brdf.F90 +atmos_param/socrates/src/2207/src/radiance_core/triple_solar_source.F90 +atmos_param/socrates/src/2207/src/radiance_core/eval_uplm.F90 +atmos_param/socrates/src/2207/src/radiance_core/shell_sort.F90 +atmos_param/socrates/src/2207/src/radiance_core/rad_pcf.F90 +atmos_param/socrates/src/2207/src/radiance_core/check_phf_term.F90 +atmos_param/socrates/src/2207/src/radiance_core/set_n_source_coeff.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_surf_rad.F90 +atmos_param/socrates/src/2207/src/radiance_core/solve_band_random_overlap.F90 +atmos_param/socrates/src/2207/src/radiance_core/scale_absorb.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_flux_ipa.F90 +atmos_param/socrates/src/2207/src/radiance_core/opt_prop_ice_cloud.F90 +atmos_param/socrates/src/2207/src/radiance_core/diff_planck_source_mod.F90 +atmos_param/socrates/src/2207/src/radiance_core/eig_sys.F90 +atmos_param/socrates/src/2207/src/radiance_core/adjust_ir_radiance.F90 +atmos_param/socrates/src/2207/src/radiance_core/set_rad_layer.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_dimen.F90 +atmos_param/socrates/src/2207/src/radiance_core/mcica_column.F90 +atmos_param/socrates/src/2207/src/radiance_core/interp1d.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_uplm_zero.F90 +atmos_param/socrates/src/2207/src/radiance_core/spline_fit.F90 +atmos_param/socrates/src/2207/src/radiance_core/gaussian_weight_pcf.F90 +atmos_param/socrates/src/2207/src/radiance_core/gas_list_pcf.F90 +atmos_param/socrates/src/2207/src/radiance_core/trans_source_coeff.F90 +atmos_param/socrates/src/2207/src/radiance_core/band_solver.F90 +atmos_param/socrates/src/2207/src/radiance_core/mcica_sample.F90 +atmos_param/socrates/src/2207/src/radiance_core/solver_mix_direct_hogan.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_uplm_sol.F90 +atmos_param/socrates/src/2207/src/radiance_core/sph_matrix_solver.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_spectrum.F90 +atmos_param/socrates/src/2207/src/radiance_core/solver_triple_app_scat.F90 +atmos_param/socrates/src/2207/src/radiance_core/grey_opt_prop.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_gauss_weight_90.F90 +atmos_param/socrates/src/2207/src/radiance_core/sum_k.F90 +atmos_param/socrates/src/2207/src/radiance_core/ses_rescale_contm.F90 +atmos_param/socrates/src/2207/src/radiance_core/spline_evaluate.F90 +atmos_param/socrates/src/2207/src/radiance_core/cg_kappa_ms.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_bound.F90 +atmos_param/socrates/src/2207/src/radiance_core/solve_band_random_overlap_resort_rebin.F90 +atmos_param/socrates/src/2207/src/radiance_core/monochromatic_gas_flux.F90 +atmos_param/socrates/src/2207/src/radiance_core/set_cloud_pointer.F90 +atmos_param/socrates/src/2207/src/radiance_core/set_cloud_geometry.F90 +atmos_param/socrates/src/2207/src/radiance_core/rescale_phase_fnc.F90 +atmos_param/socrates/src/2207/src/radiance_core/monochromatic_radiance_sph.F90 +atmos_param/socrates/src/2207/src/radiance_core/inter_k.F90 +atmos_param/socrates/src/2207/src/radiance_core/solve_band_one_gas.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_top_rad.F90 +atmos_param/socrates/src/2207/src/radiance_core/set_n_cloud_parameter.F90 +atmos_param/socrates/src/2207/src/radiance_core/set_level_weights.F90 +atmos_param/socrates/src/2207/src/radiance_core/solve_band_k_eqv_scl.F90 +atmos_param/socrates/src/2207/src/radiance_core/set_matrix_pentadiagonal.F90 +atmos_param/socrates/src/2207/src/radiance_core/mix_app_scat.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_out.F90 +atmos_param/socrates/src/2207/src/radiance_core/sol_scat_cos.F90 +atmos_param/socrates/src/2207/src/radiance_core/copy_clr_full.F90 +atmos_param/socrates/src/2207/src/radiance_core/eigenvalue_tri.F90 +atmos_param/socrates/src/2207/src/radiance_core/solver_homogen_direct.F90 +atmos_param/socrates/src/2207/src/radiance_core/rescale_continuum.F90 +atmos_param/socrates/src/2207/src/radiance_core/mixed_solar_source.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_aer.F90 +atmos_param/socrates/src/2207/src/radiance_core/opt_prop_inhom_corr_cairns.F90 +atmos_param/socrates/src/2207/src/radiance_core/rebin_esft_terms.F90 +atmos_param/socrates/src/2207/src/radiance_core/mix_column.F90 +atmos_param/socrates/src/2207/src/radiance_core/prsc_gather_spline.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_cg_coeff.F90 +atmos_param/socrates/src/2207/src/radiance_core/inter_pt_lookup.F90 +atmos_param/socrates/src/2207/src/radiance_core/opt_prop_ukca_aerosol.F90 +atmos_param/socrates/src/2207/src/radiance_core/scale_wenyi.F90 +atmos_param/socrates/src/2207/src/radiance_core/triple_column.F90 +atmos_param/socrates/src/2207/src/radiance_core/single_scattering_all.F90 +atmos_param/socrates/src/2207/src/radiance_core/inter_pt.F90 +atmos_param/socrates/src/2207/src/radiance_core/overlap_coupled.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_cld.F90 +atmos_param/socrates/src/2207/src/radiance_core/solar_coefficient_basic.F90 +atmos_param/socrates/src/2207/src/radiance_core/build_sph_matrix.F90 +atmos_param/socrates/src/2207/src/radiance_core/solve_band_k_eqv.F90 +atmos_param/socrates/src/2207/src/radiance_core/augment_tiled_radiance.F90 +atmos_param/socrates/src/2207/src/radiance_core/column_solver.F90 +atmos_param/socrates/src/2207/src/radiance_core/augment_radiance.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_control.F90 +atmos_param/socrates/src/2207/src/radiance_core/two_coeff_basic.F90 +atmos_param/socrates/src/2207/src/radiance_core/sph_solver.F90 +atmos_param/socrates/src/2207/src/radiance_core/solver_no_scat.F90 +atmos_param/socrates/src/2207/src/radiance_core/copy_clr_sol.F90 +atmos_param/socrates/src/2207/src/radiance_core/solar_source.F90 +atmos_param/socrates/src/2207/src/radiance_core/opt_prop_water_cloud.F90 +atmos_param/socrates/src/2207/src/radiance_core/legendre_weight.F90 +atmos_param/socrates/src/2207/src/radiance_core/solve_band_without_gas.F90 +atmos_param/socrates/src/2207/src/radiance_core/diff_albedo_basis.F90 +atmos_param/socrates/src/2207/src/radiance_core/increment_rad_cf.F90 +atmos_param/socrates/src/2207/src/radiance_core/single_scat_sol.F90 +atmos_param/socrates/src/2207/src/radiance_core/opt_prop_aerosol.F90 +atmos_param/socrates/src/2207/src/radiance_core/solve_band_ses.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_ss_prop.F90 +atmos_param/socrates/src/2207/src/radiance_core/prsc_opt_prop.F90 +atmos_param/socrates/src/2207/src/radiance_core/layer_part_integ.F90 +atmos_param/socrates/src/2207/src/radiance_core/two_coeff_fast_lw.F90 +atmos_param/socrates/src/2207/src/radiance_core/gas_optical_properties.F90 +atmos_param/socrates/src/2207/src/radiance_core/single_scattering.F90 +atmos_param/socrates/src/2207/src/radiance_core/monochromatic_ir_radiance.F90 +atmos_param/socrates/src/2207/src/radiance_core/hemi_sph_integ.F90 +atmos_param/socrates/src/2207/src/radiance_core/two_coeff_cloud.F90 +atmos_param/socrates/src/2207/src/radiance_core/read_spectrum.F90 +atmos_param/socrates/src/2207/src/radiance_core/inter_t_lookup.F90 +atmos_param/socrates/src/2207/src/radiance_core/solver_triple.F90 +atmos_param/socrates/src/2207/src/radiance_core/two_stream.F90 +atmos_param/socrates/src/2207/src/radiance_core/solver_triple_hogan.F90 +atmos_param/socrates/src/2207/src/radiance_core/monochromatic_radiance_tseq.F90 +atmos_param/socrates/src/2207/src/radiance_core/cloud_maxcs_split.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_atm.F90 +atmos_param/socrates/src/2207/src/radiance_core/two_coeff.F90 +atmos_param/socrates/src/2207/src/radiance_core/two_coeff_region.F90 +atmos_param/socrates/src/2207/src/radiance_core/quicksort.F90 +atmos_param/socrates/src/2207/src/radiance_core/rescale_tau_omega.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_radiance_ipa.F90 +atmos_param/socrates/src/2207/src/radiance_core/two_coeff_region_fast_lw.F90 +atmos_param/socrates/src/2207/src/radiance_core/set_truncation.F90 +atmos_param/socrates/src/2207/src/radiance_core/monochromatic_radiance.F90 +atmos_param/socrates/src/2207/src/radiance_core/aggregate_cloud.F90 +atmos_param/socrates/src/2207/src/radiance_core/radiance_calc.F90 +atmos_param/socrates/src/2207/src/radiance_core/ir_source.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_planck.F90 +atmos_param/socrates/src/2207/src/radiance_core/def_spherical_geometry.F90 +atmos_param/socrates/src/2207/src/radiance_core/spherical_trans_coeff.F90 +atmos_param/socrates/src/2207/src/radiance_core/spherical_solar_source.F90 +atmos_param/socrates/src/2207/src/radiance_core/diffusivity_factor.F90 +atmos_param/socrates/src/2207/src/radiance_core/planck_flux_band_mod.F90 +atmos_param/socrates/src/2207/src/radiance_core/spherical_path.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_actinic_flux_mod.F90 +atmos_param/socrates/src/2207/src/nlte/interpolate_p_mod.F90 +atmos_param/socrates/src/2207/src/radiance_core/rescale_tau_csr.F90 +atmos_param/socrates/src/2207/src/radiance_core/calc_contrib_func.F90 +atmos_param/socrates/src/2207/src/radiance_core/circumsolar_fraction.F90 +atmos_param/socrates/src/2207/src/radiance_core/legendre_mod.F90 +atmos_param/socrates/src/2207/src/aux/qsat_wat.F90 +atmos_param/socrates/src/2207/src/aux/qsat_gill.F90 +atmos_param/socrates/src/2207/src/aux/write_cdf.f90 +atmos_param/socrates/src/2207/src/aux/read_cdf.f90 +atmos_param/socrates/src/2207/src/aux/aerosol_representation_pcf.f90 +atmos_param/socrates/src/2207/src/aux/aerosol_profile_pcf.f90 +atmos_param/socrates/src/2207/src/aux/write_samson.f90 +atmos_param/socrates/src/2207/src/aux/filter_function.f90 +atmos_param/socrates/src/2207/src/aux/qsat_alg_pcf.f90 +atmos_param/socrates/src/2207/src/aux/method_merge_pcf.f90 +atmos_param/socrates/src/2207/src/aux/rand_gauss.f90 +atmos_param/socrates/src/2207/src/general/make_block_2_1.f90 +atmos_param/socrates/src/2207/src/general/make_block_11.f90 +atmos_param/socrates/src/2207/src/general/make_block_12.f90 +atmos_param/socrates/src/2207/src/general/sum_unity.f90 +atmos_param/socrates/src/2207/src/general/trapezoid_90.f90 +atmos_param/socrates/src/2207/src/general/get_free_unit.F90 +atmos_param/socrates/src/2207/src/general/rayleigh_scatter.f90 +atmos_param/socrates/src/2207/src/general/make_block_18.f90 +atmos_param/socrates/src/2207/src/general/remove_negative_gas_90.f90 +atmos_param/socrates/src/2207/src/general/make_block_17.f90 +atmos_param/socrates/src/2207/src/general/make_block_1.f90 +atmos_param/socrates/src/2207/src/general/make_block_19.f90 +atmos_param/socrates/src/2207/src/general/make_block_0.f90 +atmos_param/socrates/src/2207/src/general/make_block_10.f90 +atmos_param/socrates/src/2207/src/general/make_block_14.f90 +atmos_param/socrates/src/2207/src/general/read_solar_spectrum.f90 +atmos_param/socrates/src/2207/src/general/remove_negative_cont_90.f90 +atmos_param/socrates/src/2207/src/general/make_block_3_1.f90 +atmos_param/socrates/src/2207/src/general/set_interactive.f90 +atmos_param/socrates/src/2207/src/general/make_block_8.f90 +atmos_param/socrates/src/2207/src/general/make_block_3.f90 +atmos_param/socrates/src/2207/src/general/make_block_15.f90 +atmos_param/socrates/src/2207/src/general/make_block_9.f90 +atmos_param/socrates/src/2207/src/general/read_instrument_response_90.f90 +atmos_param/socrates/src/2207/src/general/make_block_4.f90 +atmos_param/socrates/src/2207/src/general/map_heap_func.f90 +atmos_param/socrates/src/2207/src/general/make_block_6.f90 +atmos_param/socrates/src/2207/src/general/out_spectrum.f90 +atmos_param/socrates/src/2207/src/general/make_block_2.f90 +atmos_param/socrates/src/2207/src/general/rayleigh_jeans_tail.f90 +atmos_param/socrates/src/2207/src/general/solar_intensity.f90 +atmos_param/socrates/src/2207/src/general/make_block_5.f90 +atmos_param/socrates/src/2207/src/general/rayleigh_scatter_h2he.f90 +atmos_param/socrates/src/2207/src/modules_gen/dimensions_field_cdf_ucf.f90 +atmos_param/socrates/src/2207/src/modules_gen/def_refract.f90 +atmos_param/socrates/src/2207/src/modules_gen/scatter_pp_pcf.f90 +atmos_param/socrates/src/2207/src/modules_gen/def_std_io_icf.f90 +atmos_param/socrates/src/2207/src/modules_gen/dimensions_cdl_ucf.f90 +atmos_param/socrates/src/2207/src/modules_gen/refract_re_ccf.f90 +atmos_param/socrates/src/2207/src/modules_gen/def_inst_flt.f90 +atmos_param/socrates/src/2207/src/modules_gen/dimensions_pp_ucf.f90 +atmos_param/socrates/src/2207/src/modules_gen/weighting_pcf.f90 +atmos_param/socrates/src/2207/src/modules_gen/error_pcf.f90 +atmos_param/socrates/src/2207/src/modules_gen/file_type_pcf.f90 +atmos_param/socrates/src/2207/src/modules_gen/def_data_in_icf.f90 +atmos_param/socrates/src/2207/src/modules_gen/dimensions_cdf_ucf.f90 +atmos_param/socrates/src/2207/src/modules_gen/unit_list_pcf.f90 +atmos_param/socrates/src/2207/src/modules_gen/realtypefx_rd.f90 +atmos_param/socrates/src/2207/src/modules_gen/def_solarspec.f90 +atmos_param/socrates/src/2207/src/modules_gen/interp_mode_pcf.f90 +atmos_param/socrates/src/2207/src/modules_gen/dimensions_fixed_pcf.f90 +atmos_param/socrates/src/2207/src/modules_gen/dimensions_field_ucf.f90 +atmos_param/socrates/src/2207/src/modules_gen/input_head_pcf.f90 +atmos_param/socrates/src/2207/src/modules_core/errormessagelength_mod.F90 +atmos_param/socrates/src/2207/src/modules_core/dimensions_spec_ucf.F90 +atmos_param/socrates/src/2207/src/modules_core/rad_ccf.F90 +atmos_param/socrates/src/2207/src/modules_core/yomhook.F90 +atmos_param/socrates/src/2207/src/modules_core/parkind1.F90 +atmos_param/socrates/src/2207/src/modules_core/file_manager.F90 +atmos_param/socrates/src/2207/src/modules_core/missing_data_mod.F90 +atmos_param/socrates/src/2207/src/modules_core/vectlib_mod.F90 +atmos_param/socrates/src/2207/src/modules_core/ereport_mod.F90 +atmos_param/socrates/src/2207/src/modules_core/realtype_rd.f90 +atmos_param/socrates/src/2207/src/modules_core/filenamelength_mod.F90 +atmos_param/socrates/src/2207/src/aux/output_vert_cdl.f +atmos_param/socrates/src/2207/src/aux/assign_input_opt_cdf.f +atmos_param/socrates/src/2207/src/aux/assign_input_ss_cdl.f +atmos_param/socrates/src/2207/src/aux/split_cdl_line.f +atmos_param/socrates/src/2207/src/aux/input_cloud_cdf.f +atmos_param/socrates/src/2207/src/aux/assign_viewing_geom_cdl.f +atmos_param/socrates/src/2207/src/aux/read_samson_p_field.f +atmos_param/socrates/src/2207/src/aux/output_opt_profile_cdl.f +atmos_param/socrates/src/2207/src/aux/input_cloud_cdl.f +atmos_param/socrates/src/2207/src/aux/output_radiance_cdl.f +atmos_param/socrates/src/2207/src/aux/fnc_density.f +atmos_param/socrates/src/2207/src/aux/calc_volume_fraction.f +atmos_param/socrates/src/2207/src/aux/calc_cdl_stride.f +atmos_param/socrates/src/2207/src/aux/interp.f +atmos_param/socrates/src/2207/src/aux/merge_pressure.f +atmos_param/socrates/src/2207/src/aux/angular_control_cdf.f +atmos_param/socrates/src/2207/src/aux/extinction_profile.f +atmos_param/socrates/src/2207/src/aux/read_genln2_flux.f +atmos_param/socrates/src/2207/src/aux/write_cdl.f +atmos_param/socrates/src/2207/src/aux/find_var_cdl.f +atmos_param/socrates/src/2207/src/aux/assign_input_vert_cdf.f +atmos_param/socrates/src/2207/src/aux/input_aerosol_cdf.f +atmos_param/socrates/src/2207/src/aux/assign_input_novert_cdl.f +atmos_param/socrates/src/2207/src/aux/find_dimen_cdl.f +atmos_param/socrates/src/2207/src/aux/output_flux_cdl.f +atmos_param/socrates/src/2207/src/aux/assign_input_opt_cdl.f +atmos_param/socrates/src/2207/src/aux/output_horiz_cdl.f +atmos_param/socrates/src/2207/src/aux/seaalbedo_driver.f +atmos_param/socrates/src/2207/src/aux/assign_viewing_geom_cdf.f +atmos_param/socrates/src/2207/src/aux/angular_control.f +atmos_param/socrates/src/2207/src/aux/output_vert_cdf.f +atmos_param/socrates/src/2207/src/aux/output_view_cdl.f +atmos_param/socrates/src/2207/src/aux/read_raw_profile.f +atmos_param/socrates/src/2207/src/aux/qsat_gg_ice.f +atmos_param/socrates/src/2207/src/aux/output_flux_cdf.f +atmos_param/socrates/src/2207/src/aux/assign_surface_char_cdf.f +atmos_param/socrates/src/2207/src/aux/name_length.f +atmos_param/socrates/src/2207/src/aux/sort_raw_profile.f +atmos_param/socrates/src/2207/src/aux/read_averaged_scatter.f +atmos_param/socrates/src/2207/src/aux/write_cdl_field.f +atmos_param/socrates/src/2207/src/aux/planck_ss_source.f +atmos_param/socrates/src/2207/src/aux/output_photolysis_cdf.f +atmos_param/socrates/src/2207/src/aux/output_radiance_cdf.f +atmos_param/socrates/src/2207/src/aux/write_profile.f +atmos_param/socrates/src/2207/src/aux/assign_surface_char_cdl.f +atmos_param/socrates/src/2207/src/aux/planck_cumul.f +atmos_param/socrates/src/2207/src/aux/input_aerosol_cdl.f +atmos_param/socrates/src/2207/src/aux/assign_input_novert_cdf.f +atmos_param/socrates/src/2207/src/aux/output_surf_cdl.f +atmos_param/socrates/src/2207/src/aux/mono_rad_ss.f +atmos_param/socrates/src/2207/src/aux/assign_horiz_cdl.f +atmos_param/socrates/src/2207/src/aux/qsat.f +atmos_param/socrates/src/2207/src/aux/set_state.f +atmos_param/socrates/src/2207/src/aux/l_find_component.f +atmos_param/socrates/src/2207/src/aux/qsat_gg.f +atmos_param/socrates/src/2207/src/aux/read_cdl.f +atmos_param/socrates/src/2207/src/aux/assign_input_vert_cdl.f +atmos_param/socrates/src/2207/src/aux/output_photolysis_cdl.f +atmos_param/socrates/src/2207/src/general/non_blank.f +atmos_param/socrates/src/2207/src/general/remove_blank.f +atmos_param/socrates/src/2207/src/general/simpsons_rule.f +atmos_param/socrates/src/2207/src/general/point_bracket.f +atmos_param/socrates/src/2207/src/general/trapezoid.f +atmos_param/socrates/src/2207/src/general/planck.f +atmos_param/socrates/src/2207/src/general/read_line.f +atmos_param/socrates/src/2207/src/general/make_block_6_1.f +atmos_param/socrates/src/2207/src/general/calc_thermal_coeff.f +atmos_param/socrates/src/2207/src/general/open_file_out.f +atmos_param/socrates/src/2207/src/general/back_substitute.f +atmos_param/socrates/src/2207/src/general/open_file_in.f +atmos_param/socrates/src/2207/src/general/integrate_spline.f +atmos_param/socrates/src/2207/src/general/rayleigh_scatter_air.f +atmos_param/socrates/src/2207/src/general/lock_code.f +atmos_param/socrates/src/2207/src/general/make_block_6_2.f +atmos_param/socrates/src/2207/src/general/inner_bracket.f +atmos_param/socrates/src/2207/src/general/svd_decompose.f +atmos_param/socrates/src/2207/src/general/calc_planck_tbl.f +atmos_param/socrates/src/2207/src/general/read_word.f diff --git a/src/extra/python/isca/__init__.py b/src/extra/python/isca/__init__.py index 830b10774..12ce5e24d 100644 --- a/src/extra/python/isca/__init__.py +++ b/src/extra/python/isca/__init__.py @@ -39,6 +39,14 @@ GFDL_SOC = None log.warning('Environment variable GFDL_SOC not set, but this is only required if using SocratesCodebase. Setting to '+str(GFDL_SOC)) +try: + GFDL_SOC_DIR = os.environ['GFDL_SOC_DIR'] +except: + # if the user doesn't have the SOC variable set, then use None + GFDL_SOC_DIR = None + log.warning('Environment variable GFDL_SOC_DIR not set, but this is only required if using SocratesCodebase with multiple socrates versions. Setting to '+str(GFDL_SOC_DIR)) + + def get_env_file(env=GFDL_ENV): filepath = os.path.join(GFDL_BASE, 'src', 'extra', 'env', env) if os.path.exists(filepath): diff --git a/src/extra/python/isca/codebase.py b/src/extra/python/isca/codebase.py index 1ff48389f..043803143 100644 --- a/src/extra/python/isca/codebase.py +++ b/src/extra/python/isca/codebase.py @@ -5,7 +5,7 @@ from jinja2 import Environment, FileSystemLoader import sh -from isca import GFDL_WORK, GFDL_BASE, GFDL_SOC, _module_directory, get_env_file +from isca import GFDL_WORK, GFDL_BASE, GFDL_SOC, GFDL_SOC_DIR, _module_directory, get_env_file from .loghandler import Logger from .helpers import url_to_folder, destructive, useworkdir, mkdir, git, P, git_run_in_directory, check_for_sh_stdout @@ -325,9 +325,13 @@ def disable_rrtm(self): self.log.info('RRTM compilation disabled.') def simlink_to_soc_code(self): - #Make symlink to socrates source code if one doesn't already exist. - socrates_desired_location = self.codedir+'/src/atmos_param/socrates/src/trunk' + if GFDL_SOC_DIR is None and self.socrates_version!='1703': + error_mesg = f'You have not set the value of GFDL_SOC_DIR, but you have asked for version {self.socrates_version} of Socrates when the default is 1703. Please see Isca docs page for Socrates for information at Isca/docs/source/modules/socrates.rst.' + self.log.error(error_mesg) + raise OSError(error_mesg) + #Make symlink to socrates source code if one doesn't already exist. + socrates_desired_location = self.codedir+f'/src/atmos_param/socrates/src/{self.socrates_version}' #First check if socrates is in correct place already if os.path.exists(socrates_desired_location): link_correct = os.path.exists(socrates_desired_location+'/src/') @@ -348,8 +352,11 @@ def simlink_to_soc_code(self): if socrates_code_in_desired_location: self.log.info('Socrates source code already in correct place. Continuing.') else: - if GFDL_SOC is not None: - sh.ln('-s', GFDL_SOC, socrates_desired_location) + if GFDL_SOC_DIR is not None: + self.log.info('You have set the value of GFDL_SOC_DIR, so Isca will be configured to allow for multiple socrates versions. ') + sh.ln('-s', f'{GFDL_SOC_DIR}/{self.socrates_version}/', socrates_desired_location) + elif GFDL_SOC is not None: + sh.ln('-s', GFDL_SOC, socrates_desired_location) elif GFDL_SOC is None: error_mesg = 'Socrates code is required for SocratesCodebase, but source code is not provided in location GFDL_SOC='+ str(GFDL_SOC) self.log.error(error_mesg)