Fractint formula file:
dna {;
z = pixel:
z = ((z - acos(((atanh(8.32166) * (z * atan(sinh(z)))) / pixel))) * atan(pixel)),
z <= 100
}