C **** dynamo.h.1 C **** /DYNAMO/ STORE FIELDS NEEDED FOR DYNAMO CALCULATION dynamo.h.2 C **** dynamo.h.3 COMMON/N2DYNAMO/SIGMA1(IMX,JMX,KMX),SIGMA2(IMX,JMX,KMX), dynamo.h.4 1 Z(IMX,JMX,KMXP),U(IMX,JMX,KMX),V(IMX,JMX,KMX), dynamo.h.5 2 W(IMX,JMX,KMX) dynamo.h.6 C **** dynamo.h.7 C **** WHERE: dynamo.h.8 C **** ZIMX=72, ZJMX=36, ZKMX=24 dynamo.h.9 C **** AND: dynamo.h.10 C **** ZIMXP1=ZIMX+1, ZKMXP=ZKMX+1 dynamo.h.11 C **** SIGMA1 = PEDESEN CONDUCTIVITY dynamo.h.12 C **** SIGMA2 = HALL CONDUCTIVITY dynamo.h.13 C **** Z = GEOPOTENIAL HEIGHT CM dynamo.h.14 C **** H = SCALE HEIGHT = RT/(MBAR*G) CM dynamo.h.15 C **** U = EASTWARD VELOCITY CM/SEC dynamo.h.16 C **** V = NORTHWARD VELOCITY CM/SEC dynamo.h.17 C **** W = VERTICAL VELOCITY CM/SEC dynamo.h.18 C **** dynamo.h.19 C dynamo.h.20