  n  >   k820309    M          9.1         õçxH                                                                                                       
       cflcheck_3d.f90 CFLCHECK_3D          CFLCHECKTIMESHORT CFLCHECKTIMELONGVELX CFLCHECKTIMELONGVELY CFLCHECKTIMELONGVELZ                  @                       
       DP                  @                       
       MESSAGENOTIFY                                          
  	     DIMXMIN DIMXMAX DIMYMIN DIMYMAX DIMZMIN DIMZMAX XYZ_DX XYZ_DY XYZ_DZ                                          
       DELTIMESHORT DELTIMELONG            €                              u #MESSAGENOTIFYC    #MESSAGENOTIFYI    #     @     @                                    #MESSAGENOTIFYC%TRIM    #LEVEL    #WHERE    #MESSAGE 	   #I 
   #R    #D    #L    #N    #C1    #C2    #C3    #CA              @                         TRIM       
   @                                 1       
   @                                 1       
   @                     	            1       
  @                      
                     &                             
  @                                 	          &                             
  @                                
          &                             
  @                                           &                             
  @                                           &                             
  @                                 1       
  @                                 1       
  @                                 1 ,      
  @                                           &                       1 #     @     @                                     #MESSAGENOTIFYI%PRESENT    #NUMBER    #WHERE    #MESSAGE    #I    #R    #D    #L    #N    #C1    #C2    #C3    #CA               @                         PRESENT       
   @                                   
   @                                 1       
  @                                 1       
  @                                           &                             
  @                                 	 	         &                             
  @                                
 
         &                             
  @                                           &                             
  @                                           &                             
  @                                 1       
  @                                 1       
  @                                 1 ,      
  @                                            &                       1                                  !                                                @   !                   "           
        &           &           &                              @   !                   #           
        &           &           &                              @   !                   $           
        &           &           &                       #     @                          %                  #CFLCHECKTIMESHORT%MAXVAL &   #CFLCHECKTIMESHORT%MINVAL '   #CFLCHECKTIMESHORT%MIN (   #XYZ_VELSOUND )             @                    &     MAXVAL           @                    '     MINVAL           @                    (     MIN      
  @@                     )            
        5 r *     5 r +   5 r ,   p    5 r ,     5 r -   5 r .   p    5 r .     & 5 r .   5 r -     & 5 r ,   5 r +     & 5 r *   5 r /         5 r -   5 r .   p        5 r +   5 r ,   p        5 r /   5 r *   p              #     @                          0                  #CFLCHECKTIMELONGVELX%ABS 1   #CFLCHECKTIMELONGVELX%MAXVAL 2   #PYZ_VELX 3             @                    1     ABS           @                    2     MAXVAL      
   @                     3            
        5 r *     5 r +   5 r ,   p    5 r ,     5 r -   5 r .   p    5 r .     & 5 r .   5 r -     & 5 r ,   5 r +     & 5 r *   5 r /         5 r -   5 r .   p        5 r +   5 r ,   p        5 r /   5 r *   p              #     @                          4                  #CFLCHECKTIMELONGVELY%ABS 5   #CFLCHECKTIMELONGVELY%MAXVAL 6   #XQZ_VELY 7             @                    5     ABS           @                    6     MAXVAL      
   @                     7            
        5 r *     5 r +   5 r ,   p    5 r ,     5 r -   5 r .   p    5 r .     & 5 r .   5 r -     & 5 r ,   5 r +     & 5 r *   5 r /         5 r -   5 r .   p        5 r +   5 r ,   p        5 r /   5 r *   p              #     @                          8                  #CFLCHECKTIMELONGVELZ%ABS 9   #CFLCHECKTIMELONGVELZ%MAXVAL :   #XYR_VELZ ;             @                    9     ABS           @                    :     MAXVAL      
   @                     ;            
        5 r *     5 r +   5 r ,   p    5 r ,     5 r -   5 r .   p    5 r .     & 5 r .   5 r -     & 5 r ,   5 r +     & 5 r *   5 r /         5 r -   5 r .   p        5 r +   5 r ,   p        5 r /   5 r *   p                       @                      *                 @                      /                 @                      ,                 @                      +                 @                      .                 @                      -           œ   $      fn#fn !   À   ]   b   uapp(CFLCHECK_3D      7   J  DC_TYPES    T  B   J  DC_MESSAGE    –  y   J  GRIDSET_3D      M   J  TIMESET -   \  \       gen@MESSAGENOTIFY+DC_MESSAGE 9   ¸  »      MESSAGENOTIFYC+DC_MESSAGE=MESSAGENOTIFYC 4   s  1      MESSAGENOTIFYC%TRIM+DC_MESSAGE=TRIM 0   ¤  8   e   MESSAGENOTIFYC%LEVEL+DC_MESSAGE 0   Ü  8   e   MESSAGENOTIFYC%WHERE+DC_MESSAGE 2     8   e   MESSAGENOTIFYC%MESSAGE+DC_MESSAGE ,   L  `   e   MESSAGENOTIFYC%I+DC_MESSAGE ,   ¬  `   e   MESSAGENOTIFYC%R+DC_MESSAGE ,     `   e   MESSAGENOTIFYC%D+DC_MESSAGE ,   l  `   e   MESSAGENOTIFYC%L+DC_MESSAGE ,   Ì  `   e   MESSAGENOTIFYC%N+DC_MESSAGE -   ,  8   e   MESSAGENOTIFYC%C1+DC_MESSAGE -   d  8   e   MESSAGENOTIFYC%C2+DC_MESSAGE -   œ  8   e   MESSAGENOTIFYC%C3+DC_MESSAGE -   Ô  d   e   MESSAGENOTIFYC%CA+DC_MESSAGE 9   8  ¿      MESSAGENOTIFYI+DC_MESSAGE=MESSAGENOTIFYI :   ÷  4      MESSAGENOTIFYI%PRESENT+DC_MESSAGE=PRESENT 1   +  0   e   MESSAGENOTIFYI%NUMBER+DC_MESSAGE 0   [  8   e   MESSAGENOTIFYI%WHERE+DC_MESSAGE 2   “  8   e   MESSAGENOTIFYI%MESSAGE+DC_MESSAGE ,   Ë  `   e   MESSAGENOTIFYI%I+DC_MESSAGE ,   +	  `   e   MESSAGENOTIFYI%R+DC_MESSAGE ,   ‹	  `   e   MESSAGENOTIFYI%D+DC_MESSAGE ,   ë	  `   e   MESSAGENOTIFYI%L+DC_MESSAGE ,   K
  `   e   MESSAGENOTIFYI%N+DC_MESSAGE -   «
  8   e   MESSAGENOTIFYI%C1+DC_MESSAGE -   ã
  8   e   MESSAGENOTIFYI%C2+DC_MESSAGE -     8   e   MESSAGENOTIFYI%C3+DC_MESSAGE -   S  d   e   MESSAGENOTIFYI%CA+DC_MESSAGE    ·  T       DP+DC_TYPES '     |       XYZ_DX+XYZ_BASE_MODULE '   ‡  |       XYZ_DY+XYZ_BASE_MODULE '     |       XYZ_DZ+XYZ_BASE_MODULE "     ¥       CFLCHECKTIMESHORT )   $  3      CFLCHECKTIMESHORT%MAXVAL )   W  3      CFLCHECKTIMESHORT%MINVAL &   Š  0      CFLCHECKTIMESHORT%MIN /   º  ´  a   CFLCHECKTIMESHORT%XYZ_VELSOUND %   n  ‰       CFLCHECKTIMELONGVELX )   ÷  0      CFLCHECKTIMELONGVELX%ABS ,   '  3      CFLCHECKTIMELONGVELX%MAXVAL .   Z  ´  a   CFLCHECKTIMELONGVELX%PYZ_VELX %     ‰       CFLCHECKTIMELONGVELY )   —  0      CFLCHECKTIMELONGVELY%ABS ,   Ç  3      CFLCHECKTIMELONGVELY%MAXVAL .   ú  ´  a   CFLCHECKTIMELONGVELY%XQZ_VELY %   ®  ‰       CFLCHECKTIMELONGVELZ )   7  0      CFLCHECKTIMELONGVELZ%ABS ,   g  3      CFLCHECKTIMELONGVELZ%MAXVAL .   š  ´  a   CFLCHECKTIMELONGVELZ%XYR_VELZ +   N  0      DIMZMIN+Z_BASE_MODULE=KMIN +   ~  0      DIMZMAX+Z_BASE_MODULE=KMAX +   ®  0      DIMYMIN+Y_BASE_MODULE=JMIN +   Þ  0      DIMYMAX+Y_BASE_MODULE=JMAX +     0      DIMXMIN+X_BASE_MODULE=IMIN +   >  0      DIMXMAX+X_BASE_MODULE=IMAX 