Lines Matching refs:range_max
3 & tol_reset, range_max,check_s)
26 double precision range_max
78 range_max=0d0
87 . g_s, dbl_mb(ipmat),job_grid_acc,iat_diff,range_max,
91 if((nint(range_max)).gt.rad_cutoff(1,iatype(iat))) then
97 rad_cutoff(1,iatype(iat)) = nint(range_max)
108 call ga_dgop(msg_igop_tru3,range_max,1,'max')
141 range_max=max(range_max,dble(rad_cutoff(itype,1)))
165 radius = range_max + 3.0d0
275 . iat_diff,range_max,
295 double precision range,range_max
301 range_max=0d0
338 if(range.gt.range_max) then
340 range_max = range
350 , ' range = ',range_max, ' acc ',my_acc,
368 double precision min_exp,range_max,range
388 range_max=10d0
406 range_max=0d0
421 if(range.gt.range_max) then
422 range_max = range
446 double precision min_exp,range_max,range
474 range_max=10d0
492 range_max=0d0
507 if(range.gt.range_max) then
508 range_max = range