	  .     k820309    Y
          11.1        y³ÌQ                                                                                                           
       diag56_mod.F DIAG56_MOD              CLEANUP_DIAG56 INIT_DIAG56 WRITE_DIAG56 ZERO_DIAG56 ND56 PD56 AD56 #         @                                                     #CLEANUP_DIAG56%ALLOCATED                  @                                 ALLOCATED #         @                                                                                                                                                    #         @                                                     #WRITE_DIAG56%DBLE                                                                                                                                              @                                 DBLE #         @                                                                                                                                                                                                                 3         @ @                              	                   	                &                   &                   &                                                         fn#fn     À   S   b   uapp(DIAG56_MOD      f       CLEANUP_DIAG56 )   y  B      CLEANUP_DIAG56%ALLOCATED    »  ¦       INIT_DIAG56    a  Û       WRITE_DIAG56 "   <  =      WRITE_DIAG56%DBLE    y  H       ZERO_DIAG56    Á  @       ND56      q       PD56    r  ¼       AD56 