source nova_jaskyna.th
  
  layout nova_jaskyna
  
        #vypnutie hlavicky
        
        map-header 0 0 off
        legend off
      
        #siet 1x1 m
        
        grid bottom
        grid-size 1 1 1 m
        
        #spojnice bodov
        
        code metapost
        def l_survey_cave (expr p) =
              draw p withpen PenD withcolor (0.0,0.0,0.0);
        enddef;
      
      endlayout
      
      export map -layout nova_jaskyna