# File diffeq.rb, line 112
def set_zz2(a,mx_ord,start)
i = 1
while i <= mx_ord + 1 do 
j = start
while j <= $max_terms  do 
a[i][j] = $zero
j += 1
end
i += 1
end
end