anchor.diff:  !       Begin Simulation Setup
   !-------------------------------------------------------------------------------------
      
  +print*,'PRP inputs file'
   
      IF ( drvrInitInp%PRPInputsMod == 2 ) THEN
         
  
positive.code:    CALL HydroDyn_DestroyInitInput(  InitInData,  ErrStat, ErrMsg )
     CALL HydroDyn_DestroyInitOutput( InitOutData, ErrStat, ErrMsg )
     
     
        
     ! Set any steady-state inputs, once before the time-stepping loop   
  
negative.code:       
        IF ( u(1)%WAMITMesh%Initialized ) THEN 
              
              ! Map PRP kinematics to the WAMIT mesh with 1 to NBody nodes
           CALL Transfer_Point_to_Point( u(1)%PRPMesh, u(1)%WAMITMesh, HD_Ref_2_WB_P, ErrStat2, ErrMsg2 ); CALL SetErrStat(ErrStat2,ErrMsg2,ErrStat,ErrMsg,'HydroDynDriver')  
           if (errStat >= AbortErrLev) then
  