diff --git a/protokoll_merge21_22_mg.txt b/protokoll_merge21_22_mg.txt deleted file mode 100644 index 6e8c0f65d0f2222e4f7853be7c05f09c9cba61a0..0000000000000000000000000000000000000000 --- a/protokoll_merge21_22_mg.txt +++ /dev/null @@ -1,50 +0,0 @@ -old_out.f -! 01.08.18 mg OUT_ALL: Ausgabe des NSC-Speichers -partitio.f -!* 01.08.18 mg partition: Implementierung NSC-Speicher -prepstand.f -!* 01.08.18 mg read_stand_threemore: neue subroutine -!* 01.08.18 mg read_stand: Implementierung NSC-Speicher -finisim.f -! 01.08.18 MG finish_simul: output of new tree.ini at the end of the simulation -stand_bal.f -! 01.08.18 mg senescence: balance fine root and leave disturbance, not finnished -dist_manag.f -! 01.08.18 mg second final version of subroutines for biotic disturbances -amod_par.f -! 01.08.18 MG Implementation of fraction of dry matter for NSC-pool -amod_stand.f -! 01.08.18 MG type_cohort: Variablen fuer NSC-pool implementiert -daily.f -! 01.08.18 MG stand_daily: changes to call of disturbance routines -soil_cn_link.f -! 01.08.18 MG s_cn_gener: litter initialisation for disturbed fine root and foliage c-content auch fuer flag_dis=2 -prepsite.f -! 01.08.18 MG prepare_site: disturbance ini auch fuer flag_dis=2 -simul.f -! 01.08.18 MG simulation_4c: implementierung von flag_dis=2 -soil.f -! 01.08.18 MG upt_wat: implementierung der xylem_clogger disturbance xylem_dis -npp.f --> Fragen Mistel -alt::: ! limiting function (preliminary, must be replaced by something more meaningful) - select case(flag_limi) - case(0,2,4,6,8,14) - drLimF = 1.0 - - case default - if (p%coh%species.eq.nspec_tree+2) then !set drought limitation to 0 for mistletoe - drLimF = 1.0 - else - drLimF = p%coh%drIndPS - end if - end select -neu:::: ! limiting function (preliminary, must be replaced by something more meaningful) - select case(flag_limi) - case(0,2,4,6,8,14) - drLimF = 1.0 - - case default - drLimF = p%coh%drIndPS - - end select - \ No newline at end of file