#!/bin/csh -f
#
#  Draw external Julia set for given external angle p/q
#
set pi = 3.1415926535897932384
set r  = 1.00000001
set a  = `(echo "$r*c($pi * $1 / $2); $r*s($pi * $1 / $2)") | bc -l`
set c  = `m $a`
quad -C $c $3 $3 $5 $6 $7 $8 $9 $10 $11
