New changes from l2g
w
This commit is contained in:
@@ -10,7 +10,7 @@ c
|
||||
&gammas0(npoints),yAnet0(npoints),gswmeas0(npoints),
|
||||
&pvapordef_s0(npoints),stomintercept,stomslope,rayDzero
|
||||
integer i,ndim
|
||||
double precision beta(10),fatbeta,ftol
|
||||
double precision beta(10),fatbeta,ftol,f1dim_stom
|
||||
parameter(ftol=1.0d-7)
|
||||
external funkmin_stom,f1dim_stom
|
||||
|
||||
|
||||
Reference in New Issue
Block a user