00001 include '../Subroutine/IO_input_initial_3D_CF_BH.f90' 00002 include '../Subroutine/IO_input_initial_3D_WL.f90' 00003 include '../Subroutine/IO_output_AHfinder.f90' 00004 include '../Subroutine/IO_output_AHfinder_gnuplot.f90' 00005 include '../Subroutine/IO_output_solution_3D_CF_BH.f90' 00006 include '../Subroutine/IO_output_solution_3D_WL.f90' 00007 include '../Subroutine/adjusthij.f90' 00008 include '../Subroutine/allocate_horizon.f90' 00009 include '../Subroutine/allocate_metric_BH_WL.f90' 00010 include '../Subroutine/allocate_metric_WL.f90' 00011 include '../Subroutine/ap2alps.f90' 00012 include '../Subroutine/bh_boundary_analytic.f90' 00013 include '../Subroutine/calc_AHarea_AHfinder.f90' 00014 include '../Subroutine/calc_admmom_asympto.f90' 00015 include '../Subroutine/calc_angmom_asympto.f90' 00016 include '../Subroutine/calc_mass_asympto.f90' 00017 include '../Subroutine/calc_physical_quantities_BH_WL.f90' 00018 include '../Subroutine/calc_shift2rotshift.f90' 00019 include '../Subroutine/calc_shift_down2up.f90' 00020 include '../Subroutine/calc_shift_up2down.f90' 00021 include '../Subroutine/calc_vector_bh.f90' 00022 include '../Subroutine/calc_vector_phi_grav.f90' 00023 include '../Subroutine/calc_vector_x_grav.f90' 00024 include '../Subroutine/cleargeometry.f90' 00025 include '../Subroutine/compute_alps2alph.f90' 00026 include '../Subroutine/compute_fnc_multiple.f90' 00027 include '../Subroutine/coordinate_patch_kit_bhex.f90' 00028 include '../Subroutine/copy_Aij_pBH_to_tfkij.f90' 00029 include '../Subroutine/copy_to_hgfn_and_gfnsf.f90' 00030 include '../Subroutine/cristoffel_gridpoint.f90' 00031 include '../Subroutine/cristoffel_midpoint.f90' 00032 include '../Subroutine/dadbscalar_3rd2nd_type0.f90' 00033 include '../Subroutine/dadbscalar_type0.f90' 00034 include '../Subroutine/dadbscalar_type3.f90' 00035 include '../Subroutine/error_metric_type2.f90' 00036 include '../Subroutine/error_metric_type3.f90' 00037 include '../Subroutine/error_surface.f90' 00038 include '../Subroutine/excurve_TrpBH.f90' 00039 include '../Subroutine/excurve_TrpBH_gridpoint.f90' 00040 include '../Subroutine/excurve_WL_gridpoint.f90' 00041 include '../Subroutine/excurve_WL_midpoint.f90' 00042 include '../Subroutine/excurve_traceK_WL.f90' 00043 include '../Subroutine/gauge.f90' 00044 include '../Subroutine/gauge_fix_kerr_schild.f90' 00045 include '../Subroutine/gauge_hiju.f90' 00046 include '../Subroutine/gauge_shift.f90' 00047 include '../Subroutine/grd2phi_midpoint_type0.f90' 00048 include '../Subroutine/grdphi_gridpoint_type0.f90' 00049 include '../Subroutine/grdphi_midpoint_type0.f90' 00050 include '../Subroutine/grdr_gridpoint_type0_3rd_nosym.f90' 00051 include '../Subroutine/grdr_gridpoint_type0_nosym.f90' 00052 include '../Subroutine/grdtp_2Dsurf_midpoint_type0.f90' 00053 include '../Subroutine/grgrad1g_midpoint.f90' 00054 include '../Subroutine/grgrad_2nd_gridpoint.f90' 00055 include '../Subroutine/grgrad_4th_gridpoint.f90' 00056 include '../Subroutine/grgrad_4th_gridpoint_bhex.f90' 00057 include '../Subroutine/grgrad_gridpoint_type0.f90' 00058 include '../Subroutine/grgrad_midpoint.f90' 00059 include '../Subroutine/grgrad_midpoint_r3rd_type0.f90' 00060 include '../Subroutine/grgrad_midpoint_type0.f90' 00061 include '../Subroutine/grgrad_type0.f90' 00062 include '../Subroutine/index_vec_down2up.f90' 00063 include '../Subroutine/index_vec_up2down.f90' 00064 include '../Subroutine/initial_AHfinder.f90' 00065 include '../Subroutine/initial_metric_BH_WL.f90' 00066 include '../Subroutine/interpo_3D_initial_4th.f90' 00067 include '../Subroutine/interpo_linear_surface_type0.f90' 00068 include '../Subroutine/interpo_linear_type0.f90' 00069 include '../Subroutine/interpo_linear_type0_2Dsurf.f90' 00070 include '../Subroutine/invhij.f90' 00071 include '../Subroutine/invhij_up2down.f90' 00072 include '../Subroutine/iteration_AHfinder.f90' 00073 include '../Subroutine/iteration_BH_WL.f90' 00074 include '../Subroutine/kerr_schild_gradH.f90' 00075 include '../Subroutine/kerr_schild_metric_3plus1.f90' 00076 include '../Subroutine/kerr_schild_r_lv_home.f90' 00077 include '../Subroutine/kerr_schild_traceK.f90' 00078 include '../Subroutine/kerr_schild_transverse_part.f90' 00079 include '../Subroutine/liegmab_gridpoint.f90' 00080 include '../Subroutine/liegmab_midpoint.f90' 00081 include '../Subroutine/poisson_solver.f90' 00082 include '../Subroutine/poisson_solver_1bh_homosol.f90' 00083 include '../Subroutine/poisson_solver_AHfinder.f90' 00084 include '../Subroutine/poisson_solver_bhex_surf_int.f90' 00085 include '../Subroutine/printout_error.f90' 00086 include '../Subroutine/printout_error_metric_combined_3.f90' 00087 include '../Subroutine/printout_physq_BH.f90' 00088 include '../Subroutine/read_parameter_bh.f90' 00089 include '../Subroutine/reset_kerr_parameter.f90' 00090 include '../Subroutine/riccitensor_midpoint.f90' 00091 include '../Subroutine/source_AHarea_AHfinder.f90' 00092 include '../Subroutine/source_HaC_WL_BH.f90' 00093 include '../Subroutine/source_MoC_WL_BH.f90' 00094 include '../Subroutine/source_admmom_asympto.f90' 00095 include '../Subroutine/source_angmom_asympto.f90' 00096 include '../Subroutine/source_mass_asympto.f90' 00097 include '../Subroutine/source_trG_WL_BH.f90' 00098 include '../Subroutine/source_trfreeG_WL_BH.f90' 00099 include '../Subroutine/sourceterm_AHfinder.f90' 00100 include '../Subroutine/sourceterm_HaC_CF.f90' 00101 include '../Subroutine/sourceterm_HaC_WL.f90' 00102 include '../Subroutine/sourceterm_MoC_CF_with_divshift.f90' 00103 include '../Subroutine/sourceterm_MoC_WL.f90' 00104 include '../Subroutine/sourceterm_surface_int_homosol.f90' 00105 include '../Subroutine/sourceterm_trG_CF.f90' 00106 include '../Subroutine/sourceterm_trG_WL.f90' 00107 include '../Subroutine/sourceterm_trfreeG_WL.f90' 00108 include '../Subroutine/surf_int_grav_rg.f90' 00109 include '../Subroutine/surf_int_grav_solidangle.f90' 00110 include '../Subroutine/transverse_part.f90' 00111 include '../Subroutine/update_grfield.f90' 00112 include '../Subroutine/update_surface.f90'