Initial commit

2016-02-03 18:52:05 +00:00
commit d40505e161
507 changed files with 91383 additions and 0 deletions
@@ -0,0 +1,16 @@
+! used for the stomatal optimization block
+      integer maxdimobs
+      parameter(maxdimobs=200)
+     
+      double precision xpco2i(maxdimobs),pco2s(maxdimobs),
+     &   rehulfsurf(maxdimobs),gammas(maxdimobs),pres_air(maxdimobs),
+     &   assim_net(maxdimobs),gswmeas(maxdimobs),pvapordef_s(maxdimobs),
+     &   bmin(10),bmax(10)
+
+      common /stomvariables/xpco2i,pco2s,rehulfsurf,gammas,
+     &   pres_air,assim_net,gswmeas,pvapordef_s,bmin,bmax
+     
+      integer istommodel,nobs
+      common /stomindices/istommodel,nobs
+
+!-------- End of list of common block variables ------------------