Symbol Description Uses
nerrcode 38


File Line number Procedure Code
./pkg/cal/cal_printerror.F 102 CAL_PRINTERROR 
      nerrcode = mod(calerr,100)
./pkg/cal/cal_printerror.F 103 CAL_PRINTERROR 
      nroutine = (calerr - nerrcode)/100
./pkg/cal/cal_printerror.F 109 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 123 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 128 CAL_PRINTERROR 
        else if (nerrcode .eq. 2) then
./pkg/cal/cal_printerror.F 133 CAL_PRINTERROR 
        else if (nerrcode .eq. 3) then
./pkg/cal/cal_printerror.F 138 CAL_PRINTERROR 
        else if (nerrcode .eq. 4) then
./pkg/cal/cal_printerror.F 143 CAL_PRINTERROR 
        else if (nerrcode .eq. 5) then
./pkg/cal/cal_printerror.F 148 CAL_PRINTERROR 
        else if (nerrcode .eq. 6) then
./pkg/cal/cal_printerror.F 157 CAL_PRINTERROR 
        else if (nerrcode .eq. 7) then
./pkg/cal/cal_printerror.F 166 CAL_PRINTERROR 
        else if (nerrcode .eq. 10) then
./pkg/cal/cal_printerror.F 171 CAL_PRINTERROR 
        else if (nerrcode .eq. 11) then
./pkg/cal/cal_printerror.F 176 CAL_PRINTERROR 
        else if ( nerrcode .eq. 12) then
./pkg/cal/cal_printerror.F 181 CAL_PRINTERROR 
        else if ( nerrcode .eq. 13 ) then
./pkg/cal/cal_printerror.F 186 CAL_PRINTERROR 
        else if ( nerrcode .eq. 14 ) then
./pkg/cal/cal_printerror.F 191 CAL_PRINTERROR 
        else if ( nerrcode .eq. 15 ) then
./pkg/cal/cal_printerror.F 194 CAL_PRINTERROR 
        else if ( nerrcode .eq. 16 ) then
./pkg/cal/cal_printerror.F 199 CAL_PRINTERROR 
        else if ( nerrcode .eq. 17 ) then
./pkg/cal/cal_printerror.F 226 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 238 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 250 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 262 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 278 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 290 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 302 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 314 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 351 CAL_PRINTERROR 
        if (nerrcode .eq. 0) then
./pkg/cal/cal_printerror.F 360 CAL_PRINTERROR 
        else if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 365 CAL_PRINTERROR 
        else if (nerrcode .eq. 2) then
./pkg/cal/cal_printerror.F 370 CAL_PRINTERROR 
        else if (nerrcode .eq. 3) then
./pkg/cal/cal_printerror.F 375 CAL_PRINTERROR 
        else if (nerrcode .eq. 4) then
./pkg/cal/cal_printerror.F 380 CAL_PRINTERROR 
        else if (nerrcode .eq. 5) then
./pkg/cal/cal_printerror.F 385 CAL_PRINTERROR 
        else if (nerrcode .eq. 6) then
./pkg/cal/cal_printerror.F 390 CAL_PRINTERROR 
        else if (nerrcode .eq. 7) then
./pkg/cal/cal_printerror.F 395 CAL_PRINTERROR 
        else if (nerrcode .eq. 8) then
./pkg/cal/cal_printerror.F 412 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 429 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 96 CAL_PRINTERROR 
      integer nerrcode