anchor.diff:      ! Local variables
       INTEGER(KIND=C_INT)                             :: status_from_MAP
       CHARACTER(KIND=C_CHAR,len=1024)                 :: message_from_MAP = ""//CHAR(0)
  -    REAL(KIND=C_FLOAT)                              :: time = 0
  +    REAL(KIND=C_FLOAT)                              :: time 
   
       time = t
   
  
positive.code: 
      ErrStat = ErrID_None
      ErrMsg  = "" 
  
      ! Initialize the NWTC Subroutine Library
      CALL NWTC_Init( )   
      
  
negative.code:     CHARACTER(*)                    , INTENT(  OUT) :: ErrMsg     ! Error message if ErrStat /= ErrID_None
  
      ! Local variables
  !@marco: see my comment in the init routine about initializing variables in their declaration statements
      INTEGER(KIND=C_INT)                             :: status_from_MAP = 0
      CHARACTER(KIND=C_CHAR,len=1024)                 :: message_from_MAP = ""//CHAR(0)
      REAL(KIND=C_FLOAT)                              :: time = 0
  