update new files
[unres.git] / source / maxlik / src_FPy / dupa.f
1        subroutine dupa(x)
2        double precision x
3        read (*,*) x
4        return
5        end