RAMSES	Systems Ecology
Start         Modules:   A-Z   Function   Layer        QuickRefs:   DM   AuxLib   AuxLibE   SciLib   EasyMW   MW   ISIS   RMSLib

DEFINITION MODULE DegreeDays;

  (*******************************************************************

    Module  DegreeDays     (Version 1.0)

      Copyright (c) 1996-2006 by Dimitrios Gyalistras and ETH Zurich.

    Purpose   Calculate monthly and annual growing degree-days (GDD)
              from monthly mean temperature data.

    Remarks   This module was based on the submodel ForClim-E of the
              forest patch model ForClim v.2.6 (Harald Bugmann, 29.09.95).

              Procedures ending with a "T" test the input data for
              plausibility and correctness, recognize missing input
              data as DMConversions.UndefREAL's, and return UndefREAL's
              if not succesful, but otherwise perform the same calculations
              as their faster counterparts without a "T".

              Reference:
                Fischlin, A., Bugmann, H. & Gyalistras, D., 1995.
                Sensitivity of a forest ecosystem model to climate
                parametrization schemes.  Env. Poll., 87: 267-282.


    Programming

      o Design
        Dimitrios Gyalistras      27/11/1996
        Andreas Fischlin          22/06/2007

      o Implementation
        Dimitrios Gyalistras      27/11/1996
        Andreas Fischlin          22/06/2007


    ETH Zurich
    Systems Ecology
    CHN E 35.1
    Universitaetstrasse 16
    8092 Zurich
    SWITZERLAND

    URLs:
        <mailto:RAMSES@env.ethz.ch>
        <http://www.sysecol.ethz.ch>
        <http://www.sysecol.ethz.ch/SimSoftware/RAMSES>


    Last revision of definition:  19/12/1996  DG

  *******************************************************************)


  PROCEDURE GetGDDPars( VAR temperThreshold : REAL );  (*  temperature threshold for growth [degC]  *)

  PROCEDURE SetGDDPars( temperThreshold : REAL;
                        VAR errTxt      : ARRAY OF CHAR ): BOOLEAN;


  (*----------------------------------------------------------------------------*)


  PROCEDURE CalcMonthlyGDD ( monTemper  : REAL;   (*  monthly mean temperature [degC]  *)
                             VAR monGDD : REAL);  (*  monthly growing  degree-days *)

  PROCEDURE CalcMonthlyGDDT( monTemper  : REAL;
                             VAR monGDD : REAL;
                             VAR errTxt : ARRAY OF CHAR ): BOOLEAN;



  PROCEDURE CalcAnnualGDD (
              VAR monTemper : ARRAY OF REAL;  (*  monthly mean temperatures [degC], VAR for speed-up only  *)
              VAR annGDD    : REAL);          (*  annual growing degree-days  *)

  PROCEDURE CalcAnnualGDDT(
              VAR monTemper : ARRAY OF REAL;
              VAR annGDD    : REAL;
              VAR errTxt    : ARRAY OF CHAR ): BOOLEAN;



END DegreeDays.