Symbol Description Uses
recipNym1 11



File Line number Procedure Code
./pkg/cheapaml/cheapaml_fields_load.F 105 CHEAPAML_FIELDS_LOAD
      _RL recipNym1, local, u, ssqa
./pkg/cheapaml/cheapaml_fields_load.F 107 CHEAPAML_FIELDS_LOAD
      recipNym1 = Ny - 1
./pkg/cheapaml/cheapaml_fields_load.F 108 CHEAPAML_FIELDS_LOAD
      IF ( Ny.GT.1 ) recipNym1 = 1. _d 0 / recipNym1
./pkg/cheapaml/cheapaml_fields_load.F 456 CHEAPAML_FIELDS_LOAD
              local = 225. _d 0 - (jG-1)*recipNym1*37.5 _d 0
./pkg/cheapaml/cheapaml_fields_load.F 512 CHEAPAML_FIELDS_LOAD
              local = -5. _d 0*COS( 2. _d 0*PI*(jG-1)*recipNym1 )
./pkg/cheapaml/cheapaml_init_varia.F 106 CHEAPAML_INIT_VARIA
             localt = 25. _d 0 - (jG-1)*recipNym1*10. _d 0
./pkg/cheapaml/cheapaml_init_varia.F 45 CHEAPAML_INIT_VARIA
      _RL recipNym1
./pkg/cheapaml/cheapaml_init_varia.F 52 CHEAPAML_INIT_VARIA
      recipNym1 = Ny - 1
./pkg/cheapaml/cheapaml_init_varia.F 53 CHEAPAML_INIT_VARIA
      IF ( Ny.GT.1 ) recipNym1 = 1. _d 0 / recipNym1