Created and updated (2014.01.18)
To create a new input variable you need to edit the following routines:
! Scalars integer :: ntypat ! Pointers to arrays integer, pointer :: typat(:) ! typat(natom)
! Scalars dtout%ntypat = dtin%ntypat ! Pointers to arrays call deep_copy( dtin%typat, dtout%typat)