z == f[a, l, s, t, r] == Log[(1/Tan[(Pi/180) (13.1/2)]) (s/2) 2 (Pi/(t (a/(r Cos[(Pi/180) l]))))]/Log[2]