Symbol Description Uses
recipNym1 13


File Line number Procedure Code
./pkg/cheapaml/cheapaml_fields_load.F 103 CHEAPAML_FIELDS_LOAD 
      _RL recipNym1, local, u, ssqa
./pkg/cheapaml/cheapaml_fields_load.F 105 CHEAPAML_FIELDS_LOAD 
      recipNym1 = Ny - 1
./pkg/cheapaml/cheapaml_fields_load.F 106 CHEAPAML_FIELDS_LOAD 
      IF ( Ny.GT.1 ) recipNym1 = 1. _d 0 / recipNym1
./pkg/cheapaml/cheapaml_fields_load.F 136 CHEAPAML_FIELDS_LOAD 
     &              - (jG-1)*recipNym1*(37.5 _d 0-dsolmn*xinxx)
./pkg/cheapaml/cheapaml_fields_load.F 175 CHEAPAML_FIELDS_LOAD 
              local = -5. _d 0*COS( 2. _d 0*PI*(jG-1)*recipNym1 )
./pkg/cheapaml/cheapaml_fields_load.F 445 CHEAPAML_FIELDS_LOAD 
              local = 225. _d 0 - (jG-1)*recipNym1*37.5 _d 0
./pkg/cheapaml/cheapaml_fields_load.F 501 CHEAPAML_FIELDS_LOAD 
              local = -5. _d 0*COS( 2. _d 0*PI*(jG-1)*recipNym1 )
./pkg/cheapaml/cheapaml_init_varia.F 110 CHEAPAML_INIT_VARIA 
             localt = 25. _d 0 - (jG-1)*recipNym1*10. _d 0
./pkg/cheapaml/cheapaml_init_varia.F 46 CHEAPAML_INIT_VARIA 
      _RL recipNym1, recipMW
./pkg/cheapaml/cheapaml_init_varia.F 53 CHEAPAML_INIT_VARIA 
      recipNym1 = Ny - 1
./pkg/cheapaml/cheapaml_init_varia.F 54 CHEAPAML_INIT_VARIA 
      IF ( Ny.GT.1 ) recipNym1 = 1. _d 0 / recipNym1