Symbol Description Uses
nerrcode 26


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 124 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 129 CAL_PRINTERROR 
        else if (nerrcode .eq. 2) then
./pkg/cal/cal_printerror.F 134 CAL_PRINTERROR 
        else if (nerrcode .eq. 3) then
./pkg/cal/cal_printerror.F 139 CAL_PRINTERROR 
        else if (nerrcode .eq. 4) then
./pkg/cal/cal_printerror.F 227 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 239 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 251 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 263 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 279 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 291 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 303 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 315 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 352 CAL_PRINTERROR 
        if (nerrcode .eq. 0) then
./pkg/cal/cal_printerror.F 361 CAL_PRINTERROR 
        else if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 366 CAL_PRINTERROR 
        else if (nerrcode .eq. 2) then
./pkg/cal/cal_printerror.F 371 CAL_PRINTERROR 
        else if (nerrcode .eq. 3) then
./pkg/cal/cal_printerror.F 376 CAL_PRINTERROR 
        else if (nerrcode .eq. 4) then
./pkg/cal/cal_printerror.F 381 CAL_PRINTERROR 
        else if (nerrcode .eq. 5) then
./pkg/cal/cal_printerror.F 386 CAL_PRINTERROR 
        else if (nerrcode .eq. 6) then
./pkg/cal/cal_printerror.F 391 CAL_PRINTERROR 
        else if (nerrcode .eq. 7) then
./pkg/cal/cal_printerror.F 396 CAL_PRINTERROR 
        else if (nerrcode .eq. 8) then
./pkg/cal/cal_printerror.F 413 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 430 CAL_PRINTERROR 
        if (nerrcode .eq. 1) then
./pkg/cal/cal_printerror.F 96 CAL_PRINTERROR 
      integer nerrcode