Fractint formula file:
dna {; z = pixel: z = exp(sinh((z * atan(sinh(sinh((z * atan(sinh(z))))))))), z <= 100 }