13 | | * `wtype` : `integer, intent(in)`[[BR]] Type of weight function:[[BR]] (0) unit weight (=1 up to radius `~~local_range`) [[BR]] (1) exponential decrease (1/e at distance=srange; 0 for distance>local_range)[[BR]] (2) 5th order polynomial with support radius srange (Gaspari&Cohn 1999; 0 for distance>srange~~) |

14 | | * `~~local_range` : `real, intent(in)`[[BR]] Cut-off radius (weight is always =0 for distance>local_range~~) |

15 | | * `sra~~nge~~` : `real, intent(in)`[[BR]] Support radius of weight function |

| 13 | * `wtype` : `integer, intent(in)`[[BR]] Type of weight function:[[BR]] (0) unit weight (=1 up to radius `cradius`) [[BR]] (1) exponential decrease (1/e at distance=sradius; 0 for distance>cradius)[[BR]] (2) 5th order polynomial with support radius sradius (Gaspari&Cohn 1999; 0 for distance>sradius) |

| 14 | * `cradius` : `real, intent(in)`[[BR]] Cut-off radius (weight is always =0 for distance>cradius) |

| 15 | * `sradius` : `real, intent(in)`[[BR]] Support radius of weight function |