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