「ぎょーむ日誌」目次に戻る | KuboWeb top に戻る | twilog | atom

ぎょーむ日誌 2001-12-19

苦情・お叱りは, たいへんお手数かけて恐縮ですが, 久保 (kubo@ees.hokudai.ac.jp) までお知らせください.

2001 年 12 月 19 日 (水)

	stem.diameter = stem.growth_rate * sqrt(stem.age),

	cohort.elements = {stem ∈ STEM | stem.age = age},
	cohort.total_area = Σ_{stem ∈ cohort.elements} stem.area,

	daughter_cohort = tree.cohort[age],
	mother_cohort = tree.cohort[age+1],
	... for each daughter_cohort for all age ∈ {1, 2, ..., tree.age - 1},

	daughter_cohort.pruning_area = tree.pruning_rate
		* (daughter_cohort.total_area - mother_cohort.total_area),

KuboLog | KuboWeb