for !j=0 to 4
logexvi.uroot(c,!j) 
freeze logexvi.uroot(c,!j)
next
for !j=1 to 4
logexvi.uroot(t,!j) 
freeze logexvi.uroot(t,!j)
next
for !j=1 to 4
logexvi.uroot(n,!j) 
freeze logexvi.uroot(n,!j)
next