anchor.diff:  subroutineStmt
     specificationPart 
     executionPart
  -  internalSubprogramPart
  +  (internalSubprogramPart)?
   endSubroutineStmt
   ;
   // R1230
  
positive.code: functionStmt
    specificationPart
    executionPart
    internalSubprogramPart
  endFunctionStmt
  ;
  // R1224
  
negative.code:   programStmt  
    specificationPart  
    executionPart  
    (internalSubprogramPart)?
  endProgramStmt
  ;
  // R1103
  