!*==aa0044.spg processed by SPAG 6.70Rc at 21:09 on 9 Dec 2012 use c_w1wind implicit none !*--AA00444 ! !*** Start of declarations rewritten by SPAG ! ! Local variables ! integer :: mntime ! !*** End of declarations rewritten by SPAG ! ! ! + + + VARIABLE DEFINITIONS + + + ! ! awtmmx - Maximum monthly air temperature (deg C) average ! ! range values min max ! ------------ --------- --------- ! fixed fmin fmax ! typical tmin tmax ! ------------ --------- --------- ! ! - This variable contains the average for the month ! of the maximum daily air temperature. ! ! awtmmn - Minimum monthly air temperature (deg C) average ! ! range values min max ! ------------ --------- --------- ! fixed fmin fmax ! typical tmin tmax ! ------------ --------- --------- ! ! - This variable contains the average of the month ! of the minimum daily air temperature. ! ! awdair - Average air density (Kg/m^3) for the month ! ! range values min max ! ------------ --------- --------- ! fixed fmin fmax ! typical tmin tmax ! ------------ --------- --------- ! ! - This variable contains the average of the monthly ! air density. ! ! awzppt - Total period precipitation (mm) ! ! range values min max ! ------------ --------- --------- ! fixed fmin fmax ! typical tmin tmax ! ------------ --------- --------- ! ! - This variable contains the value of the total period ! precipitation. ! ! awtpav - Mean period air temperature (deg C) ! ! range values min max ! ------------ --------- --------- ! fixed fmin fmax ! typical tmin tmax ! ------------ --------- --------- ! ! - This variable contains the value of the mean period ! air temperature. ! ! awupav - Average daily daily windspeed (m/s) ! ! range values min max ! ------------ --------- --------- ! fixed fmin fmax ! typical tmin tmax ! ------------ --------- --------- ! ! - This variable contains the value of the average daily ! windspeed the simulation period. ! ! awnuet - Number of days wind speed exceeds threshold ! ! range values min max ! ------------ --------- --------- ! fixed fmin fmax ! typical tmin tmax ! ------------ --------- --------- ! ! - This variable contains the number of days the wind ! speed exceeds the threshold. ! ! aweuet - Total wind energy exceeding threshold (MJ) ! ! range values min max ! ------------ --------- --------- ! fixed fmin fmax ! typical tmin tmax ! ------------ --------- --------- ! ! - This variable contains the value of the total wind ! energy that exceeds the threasold. ! ! ------------------------------------------------------------------ !$Author: joelevin $ !$Date: 2012-03-30 10:14:38 -0500 (Fri, 30 Mar 2012) $ !$Revision: 12163 $ !$HeadURL: https://eweru-dev1.eweru.ksu.edu/svn/code/weps1/branches/WEPS_F90_update/weps.src/src/inc/w1wind.inc $ ! ------------------------------------------------------------------ ! file 'w1wind.inc' ! This common block contains the state variables relating to ! the daily WERM weather parameters generated by the WIND weather ! generator. ! Parameter include files: p1werm.inc ! + + + VARIABLE DECLARATIONS + + +