#!/bin/sh

#make
rm out.dat
./sch > sch.out

./rthetaphi_xyz.sh
./ohyb_svetla.sh

awk '(NR==2){ print "r0 = ", $1; }' tp.in > r0.plt
./sch.plt

